Freigeben über


Font.Bold-Eigenschaft (Publisher)

Gibt eine MsoTriState-Konstante zurück, die den Zustand der Bold-Eigenschaft für die Zeichen in einem Textbereich darstellt, oder legt sie fest. Lese-/Schreibzugriff.

Syntax

Ausdruck. Kühn

Ausdruck Eine Variable, die ein Font-Objekt darstellt.

Rückgabewert

MsoTriState

Hinweise

Der Wert der Bold -Eigenschaft kann eine der folgenden in der Microsoft Office-Typbibliothek deklarierten MsoTriState -Konstanten sein.

Konstante Beschreibung
msoFalse Keines der Zeichen innerhalb des Bereichs ist fett formatiert.
msoTriStateMixed Ein Rückgabewert, der angibt, dass der Bereich Text enthält, der fett formatiert ist, und einen Text, der nicht fett formatiert ist.
msoTriStateToggle Ein Festgelegter Wert, der zwischen msoTrue und msoFalse wechselt.
msoTrue Alle Zeichen innerhalb des Bereichs sind fett formatiert.

Beispiel

In diesem Beispiel wird der gesamte Text im zweiten Abschnitt der aktiven Publikation getestet, und wenn er sowohl fett als auch nicht fett formatierten Text enthält, wird der gesamte Text fett formatiert. Wenn der Text vollständig fett oder nicht fett formatiert ist, wird eine Meldung angezeigt, die den Benutzer darüber informiert, dass keine gemischte Fettschrift vorhanden ist. Damit dieser Code ordnungsgemäß ausgeführt werden kann, müssen in der aktiven Publikation mindestens zwei Storys mit Text vorhanden sein.

Sub BoldStory() 
 
 Dim stf As Publisher.Font 
 
 Set stf = Application.ActiveDocument.Stories(2).TextRange.Font 
 With stf 
 If .Bold = msoTriStateMixed Then 
 .Bold = msoTrue 
 Else 
 MsgBox "Mixed bolding is not in this story." 
 End If 
 End With 
 
End Sub

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.