allora è + complicato

codice:
Dim ObjOutlook
Dim objMail

ObjOutlook = CreateObject("Outlook.Application")
objMail = ObjOutlook.createitem(0)
objMail.To = "mail_to@dominio.it"
objMail.cc = "mail_cc@dom.it"
objMail.body = "messaggio"
objMail.subject = "oggetto"
objMail.display()
objMail = Nothing
ObjOutlook = Nothing
Il problema è che, pur impostando objOutlook=Nothing, non riesco ancora a chiudere Outlook qualora l'utente dovesse chiudere la maschera del messaggio (non lo vedi a video, ma lo vedi nel Task). Quindi se tentao di aprirne una seconda mi da errore. Se nel frattempo trovi te la soluzione a questo problema mi fai un grande favore!