ShowSelected Property

True if the selected button is highlighted for the specified WebNavigationBarSet object. Read/write Boolean.

expression.ShowSelected

expression    Required. An expression that returns a WebNavigationBarSet object.

Example

The following example adds a new Web navigation bar to the active document, adds it to every page, and then sets the ShowSelected property to False so that the selected button will not be highlighted in the navigation bar.

    Dim objWebNav As WebNavigationBarSet
Set objWebNav = ActiveDocument.WebNavigationBarSets.AddSet(Name:="newNavBar")
With objWebNav
    .AddToEveryPage Left:=10, Top:=10
    .ButtonStyle = pbnbButtonStyleSmall
    .ShowSelected = False
End With