Bonjour Enzo,Pascal et Michel,
avant tout, milles excuses pour ne pas avoir donné suite à vos messages...
En fait, j'ai eu beaucoup de mal à retrouver mon message, car, absent de ma messagerie privée...
Bref, je suis content de le retrouver aujourdhui, et vous remercie d'avance de vos remarques que je vais potasser.
Cependant, je me permets de répondre à vos questions :
je vous joint le message d'erreur (qui n'était pas zippé la derniere fois...)
Quand au script utilisé faisant apparaitre le message... :
----------------------------------------------
Sub Moutlook()
.
'Déclaration des objets de la messagerie
Set mailobj = CreateObject('Outlook.Application')
Set mail = mailobj.CreateItem(olMailItem)
'désactivation des messages d'alerte
Application.DisplayAlerts = False
'On prépare l'envoi de Mail
With mail
.SentOnBehalfOfName = SentOnName
'Mettre ici le ou les destinataires
.To = 'dstinataire'
.Subject = 'Commande ouverte '
.Body = 'essai'
.Display
.Send
End With
'réactiver les messages d'alerte
Application.DisplayAlerts = False
End Sub
----------------------------------------------------------
voila,...si vous avez d'autres infos...
Merci d'avance
Excellement
Frédéric.