Language.ActiveThesaurusDictionary-Eigenschaft (Word)
Gibt ein Dictionary-Objekt zurück, das das aktive Thesauruswörterbuch für die angegebene Sprache darstellt.
Syntax
Ausdruck. ActiveThesaurusDictionary
Ausdruck Ein Ausdruck, der ein Language-Objekt zurückgibt.
HinwBemerkungeneise
Wenn für die angegebene Sprache kein Thesauruswörterbuch installiert ist, gibt diese Eigenschaft Nothing zurück.
Beispiel
In diesem Beispiel werden der vollständige Pfad- und Dateiname des aktiven Thesauruswörterbuchs zurückgegeben.
Dim lngLanguage As Long
Dim dicThesaurus As Dictionary
lngLanguage = Selection.LanguageID
Set dicThesaurus = Languages(lngLanguage).ActiveThesaurusDictionary
If dicThesaurus Is Nothing Then
MsgBox "No thesaurus dictionary installed!"
Else
MsgBox dicThesaurus.Path & Application.PathSeparator _
& dicThesaurus.Name
End If
Siehe auch
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