WebNavigationBarSetName Property

Microsoft Publisher Visual Basic

WebNavigationBarSetName Property

Returns a String that represents the name of the Web navigation bar set the specified shape is an instance of. Read-only.

expression.WebNavigationBarSetName

expression    Required. An expression that returns one of the objects in the Applies To list.

Remarks

This property is only accessible for shapes that represent an instance of a Web navigation bar set. Use the Type property of the Shape object to determine if a shape represents an instance of a Web navigation bar set.

Use the WebNavigationBarSetName property to return the name of a WebNavigationBarSet object. Multiple pages in a Web publication can each have a shape representing an instance of the same Web navigation bar set. Changes made to a WebNavigationBarSet object are reflected in all the shapes representing instances of that Web navigation bar set.

Example

The following example tests to determine which shapes on the first page of the active document represent instances of Web navigation bars. For each such shape found, the Web navigation bar it represents an instance of is set to auto update.

    Sub SetWebBarsToAutoUpdate()

Dim shpLoop As Shape
Dim strWebNavBarName As String

For Each shpLoop In ActiveDocument.Pages(1).Shapes
    If shpLoop.Type = pbWebNavigationBar Then
        
        strWebNavBarName = shpLoop.WebNavigationBarSetName
            With ActiveDocument.WebNavigationBarSets(strWebNavBarName)
                .AutoUpdate = True
            End With
        
    End If
Next
    
End Sub