Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Devolve uma coleção de Idiomas que representa os idiomas de verificação linguística 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 devolver um único membro de uma coleção, veja Devolver 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 utiliza a aLang() matriz para armazenar os nomes dos idiomas de verificação linguística.
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
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.