Envoi mail : destinataires dans une colonne

ananar · 16 Octobre 2009

Bonjour à toutes et à tous,

Je dois envoyer un mail en copie cachée à une liste de destinataires.
Cette liste se trouve dans une colonne (sa longueur peut varier).

Je n'arrive pas à sélectionner, copier cette liste et à la coller dans [.BCC =].

J'ai parcouru le forum et je n'ai pas trouvé de solution à mon problème 😱
Alors, je m'en remets à votre expertise.

En PJ, mon fichier.

D'avance merci pour vos réponses.

Bien cordialement,

Guest · 16 Octobre 2009

Re : Envoi mail : destinataires dans une colonne

Bonjour;

Voici une fonction qui te renverras une chaine de caractères formée par la liste des destinataires, séparés par un ";".

Code:

Function GetDestinataires()
Dim  Destinataires As String
With ThisWorkbook.Sheets("mail")
 GetDestinataires = Join(Application.Transpose(.Range("A2:A" & .Range("A" & .Rows.Count).End(xlUp).Row).Value), ";")
End With
End Function

Dans la macro l'utiliser comme suit:

Code:

Dim ListeDestinataire As String
ListeDestinataire = GetDestinataires()

A+

pierrejean · 16 Octobre 2009

Re : Envoi mail : destinataires dans une colonne

bonjour ananar

Je n'utilise pas Outlook , je n'ai donc pas testé en vraie grandeur

Edit: salut Hasco 🙂

ananar · 16 Octobre 2009

Re : Envoi mail : destinataires dans une colonne [RESOLU]

Bonjour Hasco et pierrejean,

Merci pour vos réponses.

C'est exactement ce qu'il me fallait 🙂

Bonne fin de journée.

Bien cordialement,

Envoi mail : destinataires dans une colonne

ananar

Guest

Pièces jointes

Guest

Guest

pierrejean

XLDnaute Barbatruc

Pièces jointes

ananar

Guest

Discussions similaires

Envoi mail : destinataires dans une colonne

ananar

Guest

Pièces jointes

Guest

Guest

pierrejean

XLDnaute Barbatruc

Pièces jointes

ananar

Guest

Discussions similaires

Privacy & Transparency

Privacy & Transparency