How to Always Reply and Forward Emails From a Specific Exchange Account in Outlook

Question

this VBA doesn't work on exchange but Kutools addon managed to automate this, I don't want to pay addon just for this option :(
need help

Public Sub ReplyBySpecAccount()
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.ActiveExplorer.Selection(1).Reply
oMail.SendUsingAccount = oAccount
oMail.Display
End If
Next

End Sub

Answer 1

When using a single Exchange mail account with multiple mailboxes, you'll need to set the From address and not the account.
See: Send As a Delegate or a Distribution Group by default