[VBA]Uso di Outlook da VBA

[andreaciao_22]

aggiungi i riferimenti di outlook al progetto e metti questa sub:

Sub CreaVisualizzaMail(strDestinatario As String)
    Dim oMail As Outlook.MailItem, oApp As Outlook.Application
    Set oApp = New Outlook.Application
    Set oMail = oApp.CreateItem(olMailItem)
    oMail.To = strDestinatario
    oMail.Display
    Set oMail = Nothing
    Set oApp = Nothing
End Sub

per inviare la mail a più utenti devi mettere ; e uno spazio dopo ogni nome