ShowAsOutlookAB Property
Returns or sets a read-only Boolean variable that specifies whether the folder will be displayed as an Outlook Address Book. Read-write.
expression.ShowAsOutlookAB
expression Required. An expression that returns a MAPIFolder object.
Example
The following example creates a reference to a new folder and modifies its ShowAsOutlookAB property so that it is displayed as an Address Book.
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