Propiedad Application.Languages (Word)
Devuelve una colección Languages que representa los idiomas de corrección enumerados en el cuadro de diálogo Idioma .
Sintaxis
expresión. Languages
expresión Variable que representa un objeto Application.
Comentarios
Para obtener información sobre cómo devolver un único miembro de una colección, vea Devolver un objeto de una colección.
Ejemplo:
En este ejemplo se devuelve la ruta de acceso completa y el nombre del archivo del diccionario ortográfico activo.
Dim dicSpell As Dictionary
Set dicSpell = _
Languages(Selection.LanguageID).ActiveSpellingDictionary
MsgBox dicSpell.Path & Application.PathSeparator & dicSpell.Name
En este ejemplo se usa la aLang()
matriz para almacenar los nombres de idioma de corrección.
Dim intCount As Integer
Dim langLoop As Language
Dim aLang(Languages.Count - 1) As String
intCount = 0
For Each langLoop In Languages
aLang(intCount) = langLoop.NameLocal
intCount = intCount + 1
Next langLoop
Vea también
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.