Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Gibt eine MsoTriState-Konstante zurück, die den Status der Fett-Eigenschaft für die Zeichen in einem Textbereich darstellt, oder legt sie fest. Lese-/Schreibzugriff.
Syntax
Ausdruck verwendet werden. 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 einen fett formatierten Text und keinen nicht fett formatierten Text enthält. |
| 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. Wenn diese sowohl fett als auch keinen fett formatierten Text enthält, wird der gesamte Text fett formatiert. Wenn der Text ganz fett oder nicht fett ist, wird eine Meldung angezeigt, die den Benutzer darüber informiert, dass keine gemischte Fettschrift vorhanden ist. Damit dieser Code ordnungsgemäß ausgeführt wird, müssen in der aktiven Publikation mindestens zwei Textabschnitte 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.