ShowAsOutlookAB 属性

       

返回或设置文件夹是否作为“Outlook 通讯簿”显示。Boolean 类型。可读写。

expression.ShowAsOutlookAB

expression  必选。该表达式返回 MAPIFolder 对象。

示例

以下示例创建对新文件夹的引用,然后修改其 ShowAsOutlookAB 属性以便作为通讯簿显示。


Sub FaveChange()

    Dim olApp As Outlook.Application
    Dim nmsName As namespace
    Dim fldFolder As MAPIFolder

    Set olApp = Outlook.Application
    'Create instance of namespace
    Set nmsName = olApp.GetNamespace("Mapi")
    Set fldFolder = nmsName.GetDefaultFolder(olFolderInbox)

    'Display the folder as Outlook Address Book
    fldFolder.ShowAsOutlookAB = True

End Sub