WebNavigationBarSet.IsHorizontal-Eigenschaft (Publisher)

Artikel
04/07/2023

True, Wenn die angegebenen WebNavigationBarSet-Objekt eine horizontale Ausrichtung aufweist. Schreibgeschützter boolescher Wert.

Syntax

Ausdruck. IsHorizontal

Ausdruck Eine Variable, die ein WebNavigationBarSet-Objekt darstellt.

Rückgabewert

Boolesch

Bemerkungen

Diese Eigenschaft wird bestimmt die Ausrichtung der Navigationsleiste vor dem Festlegen bestimmter Eigenschaften, die eine horizontale Ausrichtung wie die HorizontalAlignment -Eigenschaft voraussetzen festgelegt.

Beispiel

In diesem Beispiel wird jeder Seite die erste Navigationsleiste in der WebNavigationBarSets-Auflistung des aktiven Dokuments hinzugefügt und dann die Schaltflächenformatvorlage auf klein festgelegt.

Es wird ein Test durchgeführt, um zu bestimmen, ob der Navigationsleistensatz horizontal ist. Andernfalls wird die ChangeOrientation-Methode aufgerufen, und die Ausrichtung wird auf horizontal festgelegt. Nachdem die Navigationsleiste horizontal ausgerichtet ist, wird die anzahl der horizontalen Schaltflächen auf 3 und die horizontale Ausrichtung der Schaltflächen auf pbnbAlignLeft festgelegt.

Dim objWebNav As WebNavigationBarSet 
Set objWebNav = ActiveDocument.WebNavigationBarSets(1) 
With objWebNav 
 .AddToEveryPage Left:=10, Top:=10 
 .ButtonStyle = pbnbButtonStyleSmall 
 If .IsHorizontal = False Then 
 .ChangeOrientation pbNavBarOrientHorizontal 
 End If 
 .HorizontalButtonCount = 3 
 .HorizontalAlignment = pbnbAlignLeft 
End With

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.

Freigeben über