Come inviare sempre una nuova email da un account specifico in Outlook?

Supponiamo che tu abbia configurato più account email in Outlook: quando invii un messaggio, l’account visualizzato nel campo “Da” dipende dall’account attualmente selezionato. Tuttavia, indipendentemente dall’account in uso, desideri che ogni nuova email venga sempre inviata da uno specifico indirizzo. La guida seguente ti offre la soluzione perfetta per ottenere esattamente questo risultato.

Invia sempre un Nuova Email da un account specifico con codice VBA

---

Invia sempre un Nuova Email da un account specifico con codice VBA

Questo codice VBA ti permette di inviare facilmente una nuova email da un account specifico in Outlook. Procedi come segue.

1. Premi «Alt» + «F11» per aprire la finestra di Microsoft Visual Basic for Applications.

2. Espandi «Project1» > «Microsoft Outlook Objects» facendo doppio clic su ciascuno, quindi fai doppio clic su «ThisOutlookSession» per aprire la finestra del progetto VBA «VbaProject.OTM».

3. Copia e incolla il codice VBA seguente nella finestra di dialogo.

VBA: invia sempre una nuova email da un account specifico.

Public Sub NewBySpecAccount()
Dim oAccount As Outlook.Account
Dim oMail As Outlook.MailItem
For Each oAccount In Application.Session.Accounts
If oAccount.DisplayName = "Your account name" Then
    Set oMail = Application.CreateItem(olMailItem)
    oMail.SendUsingAccount = oAccount
    oMail.Display
End If
Next
End Sub

4. Ora devi sostituire «Your Nome utente» con l’indirizzo email dell’account da cui desideri inviare sempre una nuova email.

5. Premi quindi il tasto «F5» sulla tastiera per eseguire il codice VBA.

6. Dopo aver eseguito il codice VBA, si aprirà una nuova finestra «Messaggio»: componi il tuo messaggio e clicca su «Invia» per inviarlo.

Nota: questo codice VBA è stato testato con successo in Outlook 2007, 2010 e 2013, ma non deve essere eseguito su Exchange 2007 e 2010.