Mit VBA eine Outlook-Nachricht mit benutzerdefinierter Signatur auf Basis einer Vorlage erstellen
19.01.2012
13:55:29 Uhr2946 Aufrufe
13:55:29 Uhr
Noch nicht bewertet
Mit dieser Vorgehensweise haben sie eine Möglichkeit aus sämtlichen Office Applikationen die VBA unterstützen, eine E-Mail mit angepasster Signatur zu erstellen.
Schritt 1: Erstellen der Mail-Vorlagendatei
- Wir erstellen zu aller erst eine Mail mit unserer eigenen Signatur ...
- die wir dann im Format *.OFT abspeichern.
Schritt 2: Der VBA Code für die Office-Applikation (z.B. Excel)
- Wir öffnen den VBA-Editor z.B. von Excel mit der Tastenkombination ALT-F11 .
- Im Menü "Extras/Verweise" fügen wir einen Verweis zur Microsoft Outlook Object Library hinzu.
- Jetzt erstellen wir eine Routine für das Aufrufen einer neuen Nachricht in Outlook mit folgendem Code:
01.
Sub sendMailWithSignature() 02.
Dim BETREFF,BODY,EMPFAENGER as String 03.
Dim objOL As New Outlook.Application 04.
Dim objMail As Outlook.MailItem 05.
06.
BETREFF = "[IHR BETREF]" 07.
BODY = "[IHRE NACHRICHT(Kann HTML enthalten)]" 08.
EMPFAENGER = "[EMPFÄNGER E-MAIL ADRESSE]" 09.
10.
'Hier den Pfad zur Vorlagendatei anpassen 11.
Set objMail = objOL.CreateItemFromTemplate("[PFAD ZUR OFT-DATEI]") 12.
objMail.Subject = BETREFF 13.
objMail.HTMLBody = BODY & objMail.HTMLBody 14.
objMail.To = EMPFAENGER 15.
'Nachricht anzeigen 16.
objMail.Display 17.
End Sub01.
Set objMail = objOL.CreateItemFromTemplate("[PFAD ZUR OFT-DATEI]")Der Betreff und der eigentliche Inhalt ist mit den jeweiligen Variablen anpassbar.
Es wäre zwar auch möglich die Signatur direkt als HTML-Code in den VBA-Code einzubetten. Jedoch ist die Methode mit der Vorlage eleganter und schneller erledigt. So brauchen wir den bei Änderungen der Signatur nur die OFT-Vorlage zu ändern und nicht den VBA-Code.
