Office: Absendeaccount bei weitergeleiteten eMails per VBA wählen

Hallo allerseits,

ich möchte eMails aus einem anderen Postfach (das ich einsehen, aber darüber nicht versenden kann) per VBA weiterleiten und dabei mein Account als Absender verwenden.

Wenn ich den nachfolgenden Code ausführe, ändert sich der Absender leider nicht und die email geht nicht raus, weil ich nicht die Berechtigung zum Senden unter dem verwendeten Absender habe.

Sub Test_SendUsingAccount_Weiterleitung()
Dim OutlookAccount As Outlook.Account
Dim aktuelle_eMail As Outlook.MailItem
Dim eMailweiterleitung As Outlook.MailItem

Set OutlookAccount = Application.Session.Accounts(1)

Set Auswahl = Application.ActiveExplorer.Selection
For Each aktuelle_eMail In Auswahl
Set eMailweiterleitung = aktuelle_eMail.Forward
eMailweiterleitung.SendUsingAccount = OutlookAccount
eMailweiterleitung.To = "test@test.de"
eMailweiterleitung.Send
Next
End Sub​

Hat jemand eine Idee, was ich tun kann?

Vielen Dank im Voraus

Rolf

 

Na, Du eifriger Crossposter?! Hier gibt's schon Antworten ...

 

Hallo d`r Bastler,

das Thema brennt mir unter den Fingernägeln.
Ich bin davon ausgegangen, dass die Foren nicht untereinander vernetzt sind. Daher habe ich mehrfach gepostet.