Caricare un indirizzo email in una finestra di outlook

Caro Joe, io ho risolto così; vedi se ti può servire

Sub OUTLOOKMESSAGGIInvia()
  On Error Resume Next
 'Working in Office 2000-2010
  Dim OutApp As New Outlook.Application
  Dim OutMail As Outlook.MailItem
  Dim Messaggio As String
    Set OutMail = OutApp.CreateItem(0)
       strbody = "Auguri di Buon anno NUOVO"      
   With OutMail
        .To = "pincopallo@miamial.it"
         .CC = "pincopallino@miamial.it"
         .BCC = ""
         .Subject = "Auguri"
         .Body = strbody        
         .Attachments.Add ("Allegato.pdf")
         .Send   'or use .Display
     End With
     On Error GoTo 0
  Set OutMail = Nothing
  Set OutApp = Nothing
End Sub

Rocco ... ti faccio notare, se non te ne fossi accorto, che stai rispondendo ad un thread di 10 anni fa!!

Dopo 10 anni Joe ha sicuramente risolto oppure non segue più il forum da tempo (anche perché il ultimo messaggio è di 8 anni fa!), ovvero si parla di tecnologie e metodologie molto distanti nel tempo.

Il fenomeno del necroposting (cerca su internet), seppure controverso, non ha molto senso in un forum.

Nonostante ciò, lasciamo il tuo post in questa discussione (che potrebbe servire a qualcuno) e chiudiamo il thread.