Application.CreateItemFromTemplate-Methode (Outlook)

Artikel
04/07/2023

Erstellt ein neues Microsoft Outlook-Element aus einer Outlook-Vorlage (OFT) und gibt das neue Element zurück.

Syntax

Ausdruck. CreateItemFromTemplate( _TemplatePath_ , _InFolder_ )

expression Eine Variable, die ein Application-Objekt darstellt.

Parameter

Name	Erforderlich/Optional	Datentyp	Beschreibung
TemplatePath	Erforderlich	String	Der Pfad und der Dateiname der Outlook-Vorlage für das neue Element.
InFolder	Optional	Variant	Der Ordner, in dem das Element erstellt werden soll. Wenn dieses Argument ausgelassen wird, wird der Standardordner für den jeweiligen Elementtyp verwendet.

Rückgabewert

Ein Object-Wert, der das neue Microsoft Outlook-Element darstellt.

HinwBemerkungeneise

Neue Elemente werden immer im Erstellungsmodus im Gegensatz zum Lesemodus geöffnet, unabhängig von dem Modus, in dem die Elemente auf dem Datenträger gespeichert wurden.

Beispiel

In diesem beispiel für Visual Basic for Applications (VBA) wird CreateItemFromTemplate verwendet, um ein neues Element aus einer Outlook-Vorlage zu erstellen und dann zu zeigen. Das CreateTemplate-Makro zeigt das Erstellen der Vorlage, die im ersten Beispiel verwendet wurde. Um Fehler zu vermeiden, sollten Sie "Dan Wilson" durch einen gültigen Namen in Ihrem Adressbuch ersetzen.

Sub CreateFromTemplate() 
 Dim MyItem As Outlook.MailItem 
 
 Set MyItem = Application.CreateItemFromTemplate("C:\statusrep.oft") 
 MyItem.Display 
End Sub 
 
Sub CreateTemplate() 
 Dim MyItem As Outlook.MailItem 
 
 Set MyItem = Application.CreateItem(olMailItem) 
 MyItem.Subject = "Status Report" 
 MyItem.To = "Dan Wilson" 
 MyItem.Display 
 MyItem.SaveAs "C:\statusrep.oft", OlSaveAsType.olTemplate 
End Sub

Das folgende beispiel für Visual Basic for Applications (VBA) zeigt, wie der optionale InFolder-Parameter beim Aufrufen der CreateItemFromTemplate-Methode verwendet wird.

Sub CreateFromTemplate2() 
 Dim MyItem As Outlook.MailItem 
 
 Set MyItem = Application.CreateItemFromTemplate("C:\statusrep.oft", _ 
 Application.Session.GetDefaultFolder(olFolderDrafts)) 
 MyItem.Save 
End Sub

Siehe auch

Application-Objekt

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.

Share via