Envoie e_mail pour un groupe d'adresses cachés(1000)

bonjour à tous,

suite à cette macro ci_dessous je ne peux pas envoyer à delà de 40 adresses

est ce que c'est logique

ma macro :

Sub PrepareUnMail()

Dim MailAd As String

Dim Subj As String

Dim URLto As String, Bcc As String

For Each Lescellules In Range("D7:D46")

Bcc = Lescellules.Value & ";" & Bcc

Next

MailAd = Range("A1")

Subj = Range("A3")

URLto = "mailto:" & MailAd & "?subject=" & Subj & "&Bcc=" & Bcc

ActiveWorkbook.FollowHyperlink Address:=URLto

End Sub

merci

Bonsoir

J'ai déjà déplacé le même fil à la suite de celui que tu as ouvert sur le même sujet.

https://forum.excel-pratique.com/post126604.html#p126604

Merci de ne pas en ouvrir d'autres.

Sujet verrouillé.

Rechercher des sujets similaires à "envoie mail groupe adresses caches 1000"