outlook 2013 - send all emails from same account

[TheMadTree]

Good afternoon,
I don't know anything about macro's working with Outlook.
I have several inboxes in my outlook and I would like to make sure that all emails I send are sent from my personal account.
Could anyone help me write a macro that automatically selects my personal account as sender account whenever I write an email?
Thank you!

 

[TheMadTree]

bump.

 

[TheMadTree]

Good morning,
I wanted to share the workaround I've come up with just in case anyone has the same or a similar issue.
The following macro will warn you when you're sending an email form a certain account (so you can change it if necessary).

Hope it helps!

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)


If Item.MessageClass <> "IPM.Note" Then
Exit Sub
End If


If Item.SentOnBehalfOfName = " ACCOUNTNAME " Then
Prompt$ = "You sending this from " & Item.SentOnBehalfOfName & ". Are you sure you want to send it?"
If MsgBox(Prompt$, vbYesNo + vbQuestion + vbMsgBoxSetForeground, "Check Sending Account") = vbNo Then
Cancel = True
End If
End If


End Sub

 

[Peter_SSs]

I suspect one reason that you didn't receive any responses previously was that you had posted this in the "Excel Questions" forum.
I've moved it to the forum where this type of question is more commonly placed.