Метод Application.CreateItemFromTemplate (Outlook)

Создает новый элемент Microsoft Outlook из шаблона Outlook (OFT) и возвращает новый элемент.

Синтаксис

выражение. CreateItemFromTemplate( _TemplatePath_ , _InFolder_ )

выражение: переменная, представляющая объект Application.

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
TemplatePath	Обязательный	String	Путь и имя файла шаблона Outlook для нового элемента.
Папка "InFolder"	Необязательный	Variant	Папка, в которой необходимо создать элемент. Если этот аргумент опущен, будет использоваться папка по умолчанию для этого типа элемента.

Возвращаемое значение

Значение объекта , представляющее новый элемент Outlook.

Примечания

Новые элементы всегда открываются в режиме создания, а не чтения, независимо от режима, в котором они были сохранены на диск.

Пример

В этом примере Visual Basic для приложений (VBA) CreateItemFromTemplate используется для создания нового элемента на основе шаблона Outlook, а затем он отображается. В CreateTemplate макросе показано, как создать шаблон, используемый в первом примере. Чтобы избежать ошибок, замените имя "Денис Уилсон" на допустимое имя в адресной книге.

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

В следующем примере Visual Basic для приложений (VBA) показано, как использовать необязательный параметр InFolder при вызове метода CreateItemFromTemplate.

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

См. также

Объект Application

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.