AddToEveryPage Method

Microsoft Publisher Visual Basic

Top   Required Variant. The position of the top edge of the shape representing the Web navigation bar set.

Width   Optional Variant. The width of the shape representing the Web navigation bar set.

Remarks

The specified Web navigation bar set must exist before calling this method.

Example

The following example adds a Web navigation bar set named "WebNavBarSet1" to the top of every page in the active document.

ActiveDocument.WebNavigationBarSets("WebNavBarSet1") _
    .AddToEveryPage Left:=10, Top:=20

The following example adds a new Web navigation bar set to the active document and adds it to every page of the publication.

Dim objWebNavBarSet As WebNavigationBarSet

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

objWebNavBarSet.AddToEveryPage Left:=50, Top:=10, Width:=500