In diesem Artikel zeigen wir Ihnen, wie Sie VBA nutzen können, um E-Mails von einer bestimmten Adresse oder Verteilergruppe in Outlook zu senden. Wir gehen davon aus, dass Sie die erforderliche „Senden als“ Berechtigung für die gewählte Adresse haben. Sie werden sehen, dass dieser Ansatz nicht nur Ihre Effizienz steigert, sondern Ihnen auch ermöglicht, Ihre Kommunikation zu standardisieren und zu professionalisieren.
Um eine E-Mail von einer bestimmten E-Mail-Adresse mit VBA zu senden, können Sie den folgenden Code als Ausgangspunkt verwenden:
Sub SendEmailFromSpecificAddress()
Dim olApp As Object
Dim olMail As Object
Set olApp = CreateObject("Outlook.Application")
Set olMail = olApp.CreateItem(0)
With olMail
.SentOnBehalfOfName = "email@domain.com" ' Ihre E-Mail-Verteilergruppe Adresse
.To = "empfanger@domain.com" ' Empfänger E-Mail Adresse
.Subject = "Betreff" ' E-Mail Betreff
.Body = "Nachrichtentext" ' E-Mail Text
.Send
End With
Set olMail = Nothing
Set olApp = Nothing
End Sub
In diesem Code wird eine neue Instanz von Outlook erstellt und eine neue E-Mail erstellt. Die `SentOnBehalfOfName` Eigenschaft wird verwendet, um die Adresse festzulegen, von der die E-Mail gesendet wird. Stellen Sie sicher, dass Sie die erforderlichen Berechtigungen für diese Adresse haben.
Ersetzen Sie „email@domain.com“ durch die E-Mail-Adresse der Verteilergruppe, von der Sie senden möchten, „empfanger@domain.com“ durch die E-Mail-Adresse des Empfängers, „Betreff“ durch den Betreff Ihrer E-Mail und „Nachrichtentext“ durch den Text Ihrer E-Mail.
Bitte beachten Sie, dass dieser Code Outlook im Hintergrund verwendet und dass Outlook auf Ihrem Computer installiert und konfiguriert sein muss. Außerdem muss die „Senden als“ Berechtigung für die gewählte E-Mail-Adresse in Ihrem Outlook- oder Exchange-Server korrekt eingerichtet sein.
