通过

Application.CreateItemFromTemplate 方法 (Outlook)

  • 项目

根据 Outlook 模板 (.oft) 创建一个新的 Microsoft Outlook 项目并返回这一新项目。

语法

expression。 CreateItemFromTemplate( _TemplatePath_ , _InFolder_ )

expression：表示“Application”对象的变量。

参数

名称 必需/可选 数据类型 说明
TemplatePath 必需 String 新项目的 Outlook 模板的路径与文件名。
InFolder 可选 Variant 将在其中创建项目的文件夹。 如果忽略此参数，将使用此项目类型的默认文件夹。

返回值

一个代表新 Outlook 项目的 Object 值。

备注

不管新项目保存到磁盘时处于何种模式，始终会以撰写模式（而不是读取模式）打开该项目。

示例

此 Visual Basic for Applications (VBA) 示例使用 CreateItemFromTemplate 从 Outlook 模板创建一个新项，然后显示它。 CreateTemplate宏显示如何创建在第一个示例中使用的模板。 若要避免错误，您的通讯簿中一个有效的名称替换 Dan Wilson。

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 for Applications (VBA) 示例演示如何在调用 CreateItemFromTemplate 方法时使用可选的 InFolder 参数。

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 支持和反馈，获取有关如何接收支持和提供反馈的指南。