Propriedade Language.ActiveSpellingDictionary (Word)

Retorna um objeto Dictionary que representa o dicionário de ortografia ativo para o idioma especificado.

Sintaxe

expression. ActiveSpellingDictionary

Expressão Uma expressão que retorna um objeto 'Language'.

Comentários

Se não houver nenhum dicionário de ortografia instalado para o idioma especificado, essa propriedade retornará Nothing.

Exemplo

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

Dim lngLanguage As Long 
Dim dicSpelling As Dictionary 
 
lngLanguage = Selection.LanguageID 
Set dicSpelling = Languages(lngLanguage).ActiveSpellingDictionary 
If dicSpelling Is Nothing Then 
 MsgBox "No spelling dictionary installed!" 
Else 
 MsgBox dicSpelling.Path & Application.PathSeparator _ 
 & dicSpelling.Name 
End If 

Confira também

Objeto Language

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.