Email Auto par Gmail

Y compris Power BI, Power Query et toute autre question en lien avec Excel
Avatar du membre
Sebyg
Membre fidèle
Membre fidèle
Messages : 362
Appréciations reçues : 3
Inscrit le : 14 février 2018
Version d'Excel : 2013

Message par Sebyg » 7 juin 2018, 10:53

Bonjour,

J'ai bien vue qu'il y avait déjà des post concernant ce sujet. Je suis également aller sur internet faire des recherches mais je vois des lignes VBA différente à chaque fois.
Me voilà donc perdu je ne sais pas par ou commencer.

Mon but étant:

Dans la Feuil Inscription Colonne F je rentre les email des personnes.
Puis dans ma Feuil Email en B1 j'ai l'adresse avec laquelle j'aimerai envoyer l'email. En B2 je récupère tous les contacts de la colonne F de la Feuil Inscription (Cette étape n'est peut être pas utile..) Puis mon texte en B3.

Petit plus si vous voyez d'autre chose à améliorer dans le fichier c'est avec plaisir ! :D
Gestion de commande v1.xlsm
(70.12 Kio) Téléchargé 4 fois
Avatar du membre
Sebyg
Membre fidèle
Membre fidèle
Messages : 362
Appréciations reçues : 3
Inscrit le : 14 février 2018
Version d'Excel : 2013

Message par Sebyg » 8 juin 2018, 08:16

J'ai l'impression d'avoir posé une colle.. ^^
Il n'est peut être pas possible d'envoyer un mail autre qu'avec Outlook..
Avatar du membre
Sebyg
Membre fidèle
Membre fidèle
Messages : 362
Appréciations reçues : 3
Inscrit le : 14 février 2018
Version d'Excel : 2013

Message par Sebyg » 8 juin 2018, 15:48

J'ai test ceci:

Sub EnvoiMail()
Dim Destinataire As String, Sujet As String, Texte As String
Texte = Sheets("Feuil8").Range("B3")
Destinataire = "xxxxxxxxx@gmail.com"
Sujet = "Journée Kombéo"
ActiveWorkbook.SendMail Recipients:=Destinataire, Subject:=Sujet
End Sub

Sans résultat.

Et j'ai découvert un excel top.
Envoi_Mail_Par_Gmail_FINAL.xls
(73.5 Kio) Téléchargé 6 fois
Répondre Sujet précédentSujet suivant
  • Sujets similaires
    Réponses
    Vues
    Dernier message