AddSet Method

Adds a new WebNavigationBarSet object representing a Web navigation bar set to the specified WebNavigationBarSets collection.

expression.AddSet(Name, [Design], [AutoUpdate] )

expression    Required. An expression that returns a WebNavigationBarSet object.

Name   Required String. The name of the Web navigation bar to be added. This parameter must be unique.

Design   Optional pbWizardNavBarDesign. Specifies the navigation bar design scheme.

AutoUpdate   Optional Boolean. True if all pages with the AddHyperlinkToWebNavBar property set to True are added as links to the navigation bar and the navigation bar is kept updated.

Remarks

The Name parameter must be unique to avoid a run time error.

Example

The following example adds a WebNavigationBarSet object to the WebNavigationBarSets collection of the active document then sets some properties.

    Dim objWebNavBarSet As WebNavigationBarSet

Set objWebNavBarSet = ActiveDocument.WebNavigationBarSets.AddSet( _
    Name:="WebNavBarSet1", _
    Design:=pbnbDesignAmbient, _
    AutoUpdate:=True)

With objWebNavBarSet
    .AddToEveryPage Left:=50, Top:=10
    .ButtonStyle = pbnbDesignTopLine
    .ChangeOrientation pbNavBarOrientHorizontal
End With