A voir également:
- Nouveau message outlook via vba excel
- Message - Guide
- Nouveau outlook - Accueil - Mail
- Liste déroulante excel - Guide
- Recuperer message whatsapp supprimé - Guide
- Message d'absence thunderbird - Guide
2 réponses
Syzygy
Messages postés
378
Date d'inscription
vendredi 29 avril 2011
Statut
Membre
Dernière intervention
31 décembre 2011
143
6 juin 2011 à 23:01
6 juin 2011 à 23:01
Bonjour,
Essayez le code suivant :
Sub NouveauMessage()
'Définition des objets Outlook et du message.
Dim ObjOutlook As Object
Dim ObjMessage As Object
'Ouverture d'Outlook et création d'un message vierge
Set ObjOutlook = CreateObject("Outlook.Application")
Set ObjMessage = ObjOutlook.createitem(0)
ObjMessage.Display
'Libération des variables
Set ObjOutlook = Nothing
End Sub
Bonne soirée,
Essayez le code suivant :
Sub NouveauMessage()
'Définition des objets Outlook et du message.
Dim ObjOutlook As Object
Dim ObjMessage As Object
'Ouverture d'Outlook et création d'un message vierge
Set ObjOutlook = CreateObject("Outlook.Application")
Set ObjMessage = ObjOutlook.createitem(0)
ObjMessage.Display
'Libération des variables
Set ObjOutlook = Nothing
End Sub
Bonne soirée,
Modifié le 10 mai 2019 à 11:42
Excusez moi de detterer un sujet si vieux. Premièrement merci beaucoup ce code m'aide beaucoup mais savez vous comment faire exactement la même chose sauf que le document Excel se met automatiquement en pièce jointe
Merci