Clase Dictionary (Word VBA)

La clase Dictionary representa un diccionario.

Los principales procedimientos de la clase Dictionary son Dictionaries.Add, Delete y HangulHanjaConversionDictionaries.Add

Set

Para usar una variable de clase Dictionary, primero debe ser instanciado, por ejemplo

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

Los siguientes procedimientos se pueden usar para establecer variables de clase Dictionary : Application.CustomDictionaries, Dictionaries.Add, Dictionaries.Item, Dictionaries.ActiveCustomDictionary, HangulHanjaConversionDictionaries.Add, HangulHanjaConversionDictionaries.Item, HangulHanjaConversionDictionaries.ActiveCustomDictionary, Language.ActiveGrammarDictionary, Language.ActiveHyphenationDictionary, Language.ActiveSpellingDictionary, Language.ActiveThesaurusDictionary y Application.HangulHanjaDictionaries

For Each

A continuación, se muestra un ejemplo de cómo procesar los elementos Dictionary en una colección.

Dim dictCustomDictionary As Dictionary
For Each dictCustomDictionary In CustomDictionaries
	
Next dictCustomDictionary

Temas

Los siguientes procedimientos de esta clase se han agrupado y se describen en una página temática separada

Add with its procedures Dictionaries.Add y HangulHanjaConversionDictionaries.Add

Métodos

Los principales métodos de la clase Dictionary son

Delete - Elimina el diccionario especificado.

CustomDictionaries(1).Delete

Propiedades

Dictionaries.ActiveCustomDictionary Devuelve o establece un objeto Dictionary que representa el diccionario personalizado al que se agregarán las palabras.

CustomDictionaries.ActiveCustomDictionary =

Dictionaries.Count Devuelve un Long que representa el número de diccionarios de la colección.

Dim lngCount As Long
lngCount = CustomDictionaries.Count

Dictionaries.Maximum Devuelve el número máximo de diccionarios personalizados o de conversión permitidos.

Dim lngMaximum As Long
lngMaximum = CustomDictionaries.Maximum

Dictionaries.Parent Devuelve un objeto Object que representa el objeto primario del objeto Dictionaries especificado.

Dim objParent As Object
Set objParent = CustomDictionaries.Parent

LanguageID Devuelve o establece una constante WdLanguageID que representa el idioma del objeto especificado.

CustomDictionaries(1).LanguageID = wdAfrikaans

LanguageSpecific True si el diccionario personalizado va a utilizarse sólo con texto con formato para un idioma específico.

CustomDictionaries(1).LanguageSpecific = True

Name Devuelve el nombre del objeto especificado.

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

Parent Devuelve un objeto Object que representa el objeto primario del objeto Dictionary especificado.

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

Path Devuelve la ruta de acceso al diccionario especificado.

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

ReadOnly True si no se puede cambiar el diccionario especificado.

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

Type Devuelve el tipo de diccionario.

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

HangulHanjaConversionDictionaries.ActiveCustomDictionary Devuelve o establece un objeto Dictionary que representa el diccionario personalizado al que se agregarán las palabras.

HangulHanjaDictionaries.ActiveCustomDictionary =

HangulHanjaConversionDictionaries.Count Devuelve un Long que representa el número de diccionarios de la colección.

Dim lngCount As Long
lngCount = HangulHanjaDictionaries.Count

HangulHanjaConversionDictionaries.Maximum Devuelve el número máximo de diccionarios personalizados o de conversión permitidos.

Dim lngMaximum As Long
lngMaximum = HangulHanjaDictionaries.Maximum

HangulHanjaConversionDictionaries.Parent Devuelve un objeto Object que representa el objeto primario del objeto HangulHanjaConversionDictionaries especificado.

Dim objParent As Object
Set objParent = HangulHanjaDictionaries.Parent