FormDescription.PublishForm 方法 (Outlook)

在指定的窗体注册表 (库) 中保存 答复 对象的定义。

语法

expression。 PublishForm( _Registry_ , _Folder_ )

表达 一个代表 FormDescription 对象的变量。

参数

名称	必需/可选	数据类型	说明
注册表	必需	OlFormRegistry	窗体类。
Folder	可选	Variant	返回 Folder 对象的表达式。 只用于窗体注册表。 必须通过文件夹对象访问窗体。

备注

注意

必须先设置 Name 属性，然后才能使用 PublishForm 方法。

窗体注册为以下三类之一：文件夹、组织或个人。 "文件夹"窗体注册表拥有一组只能从该特定文件夹访问的窗体，不管是公用的还是私有的。 "组织"窗体注册表拥有整个企业都可以共享的窗体，每个人都可以访问。 “个人”窗体注册表仅拥有当前存储用户可以访问的窗体。

示例

此 Visual Basic for Applications (VBA) 示例创建了一个联系人、 获取其 答复 对象，并将其保存在默认的 联系人文件夹的文件夹窗体注册表中。

注意

如果未首先设置窗体的标题 (名称) ，则 PublishForm 方法将返回错误。

Sub PublishToFolder() 
 
 Dim myNamespace As Outlook.NameSpace 
 
 Dim myFolder As Outlook.Folder 
 
 Dim myItem As Outlook.ContactItem 
 
 Dim myForm As Outlook.FormDescription 
 
 
 
 Set myNamespace = Application.GetNamespace("MAPI") 
 
 Set myFolder = _ 
 
 myNamespace.GetDefaultFolder(olFolderContacts) 
 
 Set myItem = Application.CreateItem(olContactItem) 
 
 Set myForm = myItem.FormDescription 
 
 myForm.Name = "My Contact" 
 
 myForm.PublishForm olFolderRegistry, myFolder 
 
End Sub

本 VBA 示例创建约会、 获取其 答复 对象，并将其保存在用户的个人窗体注册表中。

要查看已发布的窗体，请在 "文件" 菜单上指向 "新建"，再单击 "选择窗体" 。 然后在 "查找" 对话框中，单击 "个人窗体库" 。 要打开新窗体，请双击 "Interview Scheduler"。

Set myItem = Application.CreateItem(olAppointmentItem) 
 
Set myForm = myItem.FormDescription 
 
myForm.Name = "Interview Scheduler" 
 
myForm.PublishForm olPersonalRegistry

另请参阅

答复对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。