Bonjour à tous,
J'ai ici une macro qui ouvre outlook 2007, nomme un destinataire, écrit un mémo et est supposé l'expédier vers le destinataire. Mon problème se situe à la commande "send". La macro se déroule bien jusqu'à la commande "send" - à ce moment-là, il arrête la macro et donne une erreur. Il me semble que j'aie bien suivi les données recueillies.
Voici la macro:
Dim objOutlook As New Outlook.Application
Set objOutlook = New Outlook.Application
Dim objOutlookMsg As Outlook.MailItem
Set objOutlookMsg = objOutlook.CreateItem(olMailItem)
With objOutlookMsg
.To = "vvv@bbn"
.Subject = "Suivi de documents"
.Body = "Vous avez une non-conformité."
.Send
End With
Set objOutlookMsg = Nothing 'Ferme outlook
Merci de m'aider.
Michel
J'ai ici une macro qui ouvre outlook 2007, nomme un destinataire, écrit un mémo et est supposé l'expédier vers le destinataire. Mon problème se situe à la commande "send". La macro se déroule bien jusqu'à la commande "send" - à ce moment-là, il arrête la macro et donne une erreur. Il me semble que j'aie bien suivi les données recueillies.
Voici la macro:
Dim objOutlook As New Outlook.Application
Set objOutlook = New Outlook.Application
Dim objOutlookMsg As Outlook.MailItem
Set objOutlookMsg = objOutlook.CreateItem(olMailItem)
With objOutlookMsg
.To = "vvv@bbn"
.Subject = "Suivi de documents"
.Body = "Vous avez une non-conformité."
.Send
End With
Set objOutlookMsg = Nothing 'Ferme outlook
Merci de m'aider.
Michel