J'ai un fichier excel avec 3 feuilles contenant des infos et des adresses
email et j'aimerais sortir les adresses séparées par des point-virgules et
ainsi envoyer un email à ces personnes (uniquement de la première feuille au
fait)
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
JB
Bonjour
Crée un lien mailto avec les emails dans la colonne A:
Sub essai() temp = "mailto:" For Each c In Range([A1], [a65000].End(xlUp)) temp = temp & c.Value & ";" Next c [c1].Select ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:=temp End sub
Cordialement JB
Bonjour
Crée un lien mailto avec les emails dans la colonne A:
Sub essai()
temp = "mailto:"
For Each c In Range([A1], [a65000].End(xlUp))
temp = temp & c.Value & ";"
Next c
[c1].Select
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:=temp
End sub
Crée un lien mailto avec les emails dans la colonne A:
Sub essai() temp = "mailto:" For Each c In Range([A1], [a65000].End(xlUp)) temp = temp & c.Value & ";" Next c [c1].Select ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:=temp End sub
