Klasse Dictionary (Word VBA)

Die Klasse Dictionary stellt ein Wörterbuch dar.

Die wichtigste Prozeduren der Klasse Dictionary sind Dictionaries.Add, Delete und HangulHanjaConversionDictionaries.Add

Set

Um eine Dictionary -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise

Dim dict as Dictionary
Set dict = CustomDictionaries(Index:=1)

Die folgenden Prozeduren können zum Festlegen der Dictionary Klassenvariablen verwendet werden : Application.CustomDictionaries, Dictionaries.Add, Dictionaries.Item, Dictionaries.ActiveCustomDictionary, HangulHanjaConversionDictionaries.Add, HangulHanjaConversionDictionaries.Item, HangulHanjaConversionDictionaries.ActiveCustomDictionary, Language.ActiveGrammarDictionary, Language.ActiveHyphenationDictionary, Language.ActiveSpellingDictionary, Language.ActiveThesaurusDictionary und Application.HangulHanjaDictionaries

For Each

Hier ist ein Beispiel für die Verarbeitung der Dictionary -Elemente in einer Sammlung

Dim dictCustomDictionary As Dictionary
For Each dictCustomDictionary In CustomDictionaries
	
Next dictCustomDictionary

Themas

Die folgenden Prozeduren in dieser Klasse wurden zusammengefasst und auf eine separate Themenseite beschrieben

Add with its procedures Dictionaries.Add und HangulHanjaConversionDictionaries.Add

Methoden

Die Hauptmethoden der Klasse Dictionary sind

Delete - Löscht das angegebene Wörterbuch.

CustomDictionaries(1).Delete

Eigenschaften

Dictionaries.ActiveCustomDictionary Gibt ein Dictionary -Objekt zurück, das das Benutzerwörterbuch darstellt, dem Wörter hinzugefügt werden, oder legt dieses fest.

CustomDictionaries.ActiveCustomDictionary =

Dictionaries.Count Gibt einen Wert vom Typ Long zurück, der die Anzahl der Wörterbücher in der Auflistung darstellt.

Dim lngCount As Long
lngCount = CustomDictionaries.Count

Dictionaries.Maximum Gibt die maximal zulässige Anzahl von Benutzer- oder Konvertierungswörterbüchern zurück.

Dim lngMaximum As Long
lngMaximum = CustomDictionaries.Maximum

Dictionaries.Parent Gibt einen Wert vom Typ Object zurück, der das übergeordnete Objekt des angegebenen Dictionaries-Objekts darstellt.

Dim objParent As Object
Set objParent = CustomDictionaries.Parent

LanguageID Gibt eine WdLanguageID -Konstante zurück, die die Sprache für das angegebene Objekt darstellt, oder legt diese fest.

CustomDictionaries(1).LanguageID = wdAfrikaans

LanguageSpecific True, wenn das Benutzerwörterbuch nur für Text verwendet wird, der für eine bestimmte Sprache formatiert wurde.

CustomDictionaries(1).LanguageSpecific = True

Name Gibt den Namen des angegebenen Objekts zurück.

Dim strName As String
strName = CustomDictionaries(1).Name

Parent Gibt einen Wert vom Typ Object zurück, der das übergeordnete Objekt des angegebenen Dictionary-Objekts darstellt.

Dim objParent As Object
Set objParent = CustomDictionaries(1).Parent

Path Gibt den Pfad zum angegebenen Wörterbuch zurück.

Dim strPath As String
strPath = CustomDictionaries(1).Path

ReadOnly True, wenn das angegebene Wörterbuch nicht geändert werden kann.

Dim booReadOnly As Boolean
booReadOnly = CustomDictionaries(1).ReadOnly

Type Gibt den Typ des Wörterbuchs zurück.

Dim wdtType As WdDictionaryType
wdtType = CustomDictionaries(1).Type

HangulHanjaConversionDictionaries.ActiveCustomDictionary Gibt ein Dictionary -Objekt zurück, das das Benutzerwörterbuch darstellt, dem Wörter hinzugefügt werden, oder legt dieses fest.

HangulHanjaDictionaries.ActiveCustomDictionary =

HangulHanjaConversionDictionaries.Count Gibt einen Wert vom Typ Long zurück, der die Anzahl der Wörterbücher in der Auflistung darstellt.

Dim lngCount As Long
lngCount = HangulHanjaDictionaries.Count

HangulHanjaConversionDictionaries.Maximum Gibt die maximal zulässige Anzahl von Benutzer- oder Konvertierungswörterbüchern zurück.

Dim lngMaximum As Long
lngMaximum = HangulHanjaDictionaries.Maximum

HangulHanjaConversionDictionaries.Parent Gibt einen Wert vom Typ Object zurück, der das übergeordnete Objekt des angegebenen HangulHanjaConversionDictionaries-Objekts darstellt.

Dim objParent As Object
Set objParent = HangulHanjaDictionaries.Parent