BusinessCardView.Copy 方法 (Outlook)

基于现有的 BusinessCardView 对象创建新的 View 对象。

语法

表达式复制 (名称SaveOption)

表达 返回 BusinessCardView 对象的表达式。

参数

名称 必需/可选 数据类型 说明
Name 必需 String 新视图的名称。
SaveOption 可选 OlViewSaveOption 新视图的保存选项。

返回值

表示新视图的 视图 对象。

示例

(VBA) 示例下面的 Visual Basic for Applications 创建 BusinessCardView 对象,名为"新卡视图"的副本,并将其保存在 联系人默认文件夹中。 若要运行此示例,您需要首先创建一个 BusinessCardView 对象,该对象以编程方式或通过使用Microsoft Outlook用户界面,名为"卡视图"。

Sub CopyBusinessCardView() 
 
 
 
 Dim objName As NameSpace 
 
 Dim objViews As Views 
 
 Dim objNewView As BusinessCardView 
 
 
 
 ' Get the Views collection of the Contacts default folder. 
 
 Set objName = Application.GetNamespace("MAPI") 
 
 Set objViews = objName.GetDefaultFolder(olFolderContacts).Views 
 
 
 
 ' Copy the existing view. 
 
 Set objNewView = objViews("Card View").Copy( _ 
 
 "New Card View", _ 
 
 olViewSaveOptionThisFolderEveryone) 
 
 
 
End Sub

另请参阅

BusinessCardView 对象

支持和反馈

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