DisplayedModuleCount Property
Collapse the table of content
Expand the table of content

NavigationPane.DisplayedModuleCount Property (Outlook)

Office 2013 and later
GitHub-Mark-64px

Contribute to this content

Use GitHub to suggest and submit changes. See our guidelines for contributing to VBA documentation.

Returns or sets a Long value that indicates the number of NavigationModule objects displayed in the Navigation Pane. Read/write.

expression .DisplayedModuleCount

expression A variable that represents a NavigationPane object.

This property can only be set to a value between 0 and the value of the Count property for the Modules collection of the NavigationPane object. If this property is set to a value greater than the maximum allowable value, the property value is automatically set to the maximum allowable value. An error occurs if this property is set to less than 0.

If the IsCollapsed property of the NavigationPane object is set to False, then this property value represents the number of navigation modules for which both icon and name are displayed in the Navigation Pane. If IsCollapsed is set to True, then the DisplayedModuleCount property value represents the number of navigation modules for which an icon is displayed in the Navigation Pane.

Setting the value of this property resizes the Modules section of the Navigation Pane to display more or fewer NavigationModule objects as needed.

The following Visual Basic for Applications (VBA) example displays all navigation modules contained by the Navigation Pane, by setting the value of the DisplayedModuleCount property equal to the Count property of the Modules collection for the NavigationPane object.

Sub DisplayAllModules() 
 
 Dim objPane As NavigationPane 
 
 
 
 ' Get the NavigationPane object for the 
 
 ' currently displayed Explorer object. 
 
 Set objPane = Application.ActiveExplorer.NavigationPane 
 
 
 
 ' Set the DisplayedModuleCount property to 
 
 ' display all modules contained by the 
 
 ' Navigation Pane. 
 
 objPane.DisplayedModuleCount = objPane.Modules.Count 
 
End Sub
Show:
© 2016 Microsoft