Envoi de mail sur outlook via vba
Bonjour.
Je suis sur excel 2010
J'ai un tableau a 4 feuilles pour une gestion de stock, avec des alertes de stock minimum.
Quand une commande me fait passer en dessous de cette alerte, cela incrémente automatiquement mon tableau de commande pour les articles a commander.
J'ai créer un bouton pour faire un envoi de mail au fournisseur avec une sélection de cellule qui va de A1 à B5.
J'ai mis ce code qui fonctionne.
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
| Sub Send_Range()
ActiveSheet.Range("A1:B5").Select
ActiveWorkbook.EnvelopeVisible = True
With ActiveSheet.MailEnvelope
.Introduction = "Ceci est un exemple."
.Item.To = "mon adresse E-Mail_ici"
.Item.Subject = "Mon sujet"
.Item.Send
End With
End Sub |
Maintenant, j'aimerais pouvoir mettre ma signature que j'ai sur Outlook 2010 qui part normalement dans tous mes emails mais pas dans celui ci.
Et j'aimerais aussi ajouter une ligne pour les envois en "cc".
Je suis sur que ce sujet a certainement été traité, mais je suis ici depuis ce matin a parcourir les sujets sans trouver chaussure a mon pied ....
Merci pour votre aide.
PS. je suis débutant alors si je pouvais avoir des explications sur les modifs a faire, je vous en serais reconnaissant.
Merci a vous
