Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Envoi de mail

Envoi de mail

6 réponses
Avatar
defluc
Bonjour

J'ai un tableau qui contient une colonne d'adresses Email.
Comment envoyer un mail à chacune des adresses de cette colonne.

Merci
Signaler un problème avec ce contenu

6 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
HD
Bonjour,

J'ai une bidouille, mais qui fonctionne je pense :
Mettre la liste en ligne par un collage spécial transposé,
Enregistrer le fichier Excel en .csv (séparateur ;)
L'ouvrir en texte et sélectionner la ligne et la copier vers Outlook (ou
autre)...

Mais il doit y avoir surement bien mieux :)
A++
HD

"defluc" a écrit dans le message de news:
ew$
Bonjour

J'ai un tableau qui contient une colonne d'adresses Email.
Comment envoyer un mail à chacune des adresses de cette colonne.

Merci


Avatar
Daniel.j
Bonjour
Un tas de trucs ici :
http://dj.joss.free.fr/web.htm

Daniel

--
FAQ MPFE
FAQ du forum microsoft.public.fr.excel
http://dj.joss.free.fr/faq.htm



"defluc" a écrit dans le message de news:
ew$
Bonjour

J'ai un tableau qui contient une colonne d'adresses Email.
Comment envoyer un mail à chacune des adresses de cette colonne.

Merci


Avatar
defluc
Avec un "enregistrer sous", j'ai ma colonne en format txt mais avec des
séparateurs de ligne plutôt qu'un enregistrement unique dans lequel
chaque adresse serait séparée par une virgule.
Comment écrire cet enregistrement unique ?
Avatar
HD
Tu as fait le collage spécial pour avoir tes données en ligne ?

"defluc" a écrit dans le message de news:
%
Avec un "enregistrer sous", j'ai ma colonne en format txt mais avec des
séparateurs de ligne plutôt qu'un enregistrement unique dans lequel chaque
adresse serait séparée par une virgule.
Comment écrire cet enregistrement unique ?


Avatar
HD
Oki, mais je ne sais pas s'il souhaite fait juste une manipulation à partir
d'une liste ou si c'est de la programmation qu'il veut...

"Daniel.j" a écrit dans le message de news:

Bonjour
Un tas de trucs ici :
http://dj.joss.free.fr/web.htm

Daniel

--
FAQ MPFE
FAQ du forum microsoft.public.fr.excel
http://dj.joss.free.fr/faq.htm



"defluc" a écrit dans le message de news:
ew$
Bonjour

J'ai un tableau qui contient une colonne d'adresses Email.
Comment envoyer un mail à chacune des adresses de cette colonne.

Merci






Avatar
defluc
J'ai trouvé

Sub TxtTransfer()
Dim i, Counter As Integer
Dim Text, FileName As String

Text = ""
Counter = 0
FileName = InputBox("Nom du fichier")
Open FileName For Output As #1
For i = 1 To 350
If Cells(i, 2) <> "" Then
Counter = Counter + 1
If Counter = 1 Then Text = Cells(i, 2) _
Else Text = Text + ", " + Cells(i, 2)
End If
Next i
Print #1, Text
Close #1
End Sub