VBA coller une liste d'émail dans CCI

Bonjour,

Je souhaite coller une liste de mail dans CCI d'un email outlook via VBA.

Est ce que quelqu'un a un code type sachant que ma liste de mail se situe de la cellule W1 à W26?

Cordialement

Agrimaman

bonjour,

.cc = Join(Application.Transpose(Range("W1:W26").Value), ";")

je ne sais pas le tester pour le moment, si cela ne fonctionne pas, utilisez "," au lieu de ";"

Bonjour Agrimaman,

Vous avez déjà le code pour créer votre mail ? Supposons que la variable "LeMail" Contient votre object mail..

For Each cel In Range("W1:W26")
memoire = memoire & cel & " ; "
Next cel
LeMail.bcc = memoire

A tester et adapter donc

A+

Bonjour,

Ok je teste vos deux solutions dés que possible et je reviens vers vous.

Merci

Agrimaman

Re,

La méthode de BsAlv fonctionne. Merci