Font.UseDiacriticColor-Eigenschaft (Publisher)
Dient zum Zurückgeben oder Festlegen einer MsoTriState-Konstante , die angibt, ob Sie die Farbe diakritischer Zeichen im angegebenen Textbereich festlegen können. Lese-/Schreibzugriff.
Syntax
Ausdruck. UseDiacriticColor
Ausdruck Eine Variable, die ein Font-Objekt darstellt.
Rückgabewert
MsoTriState
HinwBemerkungeneise
Der Wert der UseDiacriticColor -Eigenschaft kann eine der in der Microsoft Office-Typbibliothek deklarierten und in der folgenden Tabelle angezeigten MsoTriState -Konstanten sein.
Konstante | Beschreibung |
---|---|
msoFalse | Die Farbe diakritischer Zeichen in dem angegebenen Textbereich kann nicht festgelegt werden. |
msoTriStateMixed | Ein Rückgabewert, der eine Kombination aus msoTrue und msoFalse für den angegebenen Formbereich angibt. |
msoTriStateToggle | Ein Festgelegter Wert, der zwischen msoTrue und msoFalse wechselt. |
msoTrue | Die Farbe diakritischer Zeichen in dem angegebenen Textbereich kann festgelegt werden. |
Beispiel
In diesem Beispiel wird der Text im ersten Abschnitt der Publikation auf den Zustand der UseDiacriticColor-Eigenschaft überprüft. Wenn sie auf msoTrue festgelegt ist, wird der Wert der DiacriticColor -Eigenschaft auf Blau festgelegt. Andernfalls wird ein Meldungsfeld angezeigt.
Sub UseDiaColor()
Dim fntDC As Font
Set fntDC = Application.ActiveDocument.Stories(1).TextRange.Font
If fntDC.UseDiacriticColor = msoTrue Then
fntDC.DiacriticColor.RGB = RGB(Red:=0, Green:=0, Blue:=255)
Else
MsgBox "The UseDiacriticColor property is set to False"
End If
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.
Feedback
https://aka.ms/ContentUserFeedback.
Bald verfügbar: Im Laufe des Jahres 2024 werden wir GitHub-Issues stufenweise als Feedbackmechanismus für Inhalte abbauen und durch ein neues Feedbacksystem ersetzen. Weitere Informationen finden Sie unterFeedback senden und anzeigen für