Propriedade Application.Languages (Word)

Retorna uma coleção de idiomas que representa os idiomas de revisão de texto listados na caixa de diálogo Idioma .

Sintaxe

expression. Languages

expressão Uma variável que representa um Aplicativo objeto.

Comentários

Para obter informações sobre como retornar um único membro de uma coleção, consulte Retornar um objeto de uma coleção.

Exemplo

Este exemplo retorna o caminho completo e o o nome de arquivo do dicionário de ortografia ativo.

Dim dicSpell As Dictionary 
 
Set dicSpell = _ 
 Languages(Selection.LanguageID).ActiveSpellingDictionary 
 
MsgBox dicSpell.Path & Application.PathSeparator & dicSpell.Name

Este exemplo usa a aLang() matriz para armazenar os nomes de idioma de revisão de texto.

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

Confira também

Objeto de Aplicativo

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.