Envoie mail en VBA par outlook

Fermé
kikou69 Messages postés 29 Date d'inscription jeudi 16 août 2007 Statut Membre Dernière intervention 7 juin 2010 - 21 sept. 2007 à 16:31
kikou69 Messages postés 29 Date d'inscription jeudi 16 août 2007 Statut Membre Dernière intervention 7 juin 2010 - 21 sept. 2007 à 16:47
Bonjour,

J'ai créé une macro en VBA sur excel qui permet d'envoyer un mail par outlook au destianatairee qui se trouve en : tableausuivi(i, 5).
Je voudrais aussi envoyer ce meme mail en meme temps a une personne en copie en : tableausuivi(i, 6).


Voici mon code:


MailAd = tableausuivi(i, 5)

If MailAd <> "" Then

Set omessage = osession.Outbox.Messages.Add
omessage.Subject = "RELANCE/REMINDER Supplier : " & tableausuivi(i, 0)
Set oRecip = omessage.Recipients.Add(MailAd)
oRecip.Resolve
omessage.Text = message
omessage.Send True


C'est surment tres simple :) mais je n'ai pas la solution :s ,

merci de votre aide.

++
A voir également:

1 réponse

kikou69 Messages postés 29 Date d'inscription jeudi 16 août 2007 Statut Membre Dernière intervention 7 juin 2010 1
21 sept. 2007 à 16:47
En fait j'aimerai envoyer le mail a un destinataire qui se trouve dans la case tableausuivi(i, 5) et de mettre en copie un autre destinataire qui se trouve dans la case tableausuivi(i, 6).

Et je ne trouve pas la fonction pour mettre en copie :s
0