Método Range.GetSpellingSuggestions (Word)

Retorna uma coleção SpellingSuggestions que representa as palavras sugeridas como substituições de ortografia para a primeira palavra no intervalo especificado.

Sintaxe

expressão. GetSpellingSuggestions (CustomDictionary, IgnoreUppercase, MainDictionary, SuggestionMode, CustomDictionary2, CustomDictionary3, CustomDictionary4, CustomDictionary5, CustomDictionary6, CustomDictionary7, CustomDictionary8, CustomDictionary9, CustomDictionary10)

expressão Obrigatório. Uma variável que representa um objeto Range.

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
CustomDictionary	Opcional	Variant	Uma expressão que retorna um objeto Dictionary ou o nome de arquivo do dicionário personalizado.
IgnoreUppercase	Opcional	Variant	True para ignorar palavras com todas as letras maiúsculas. Se esse argumento for omitido, o valor atual da propriedade IgnoreUppercase é usado.
MainDictionary	Opcional	Variant	Uma expressão que retorna um objeto Dictionary ou o nome de arquivo do dicionário principal. Se você não especificar um dicionário principal, o Microsoft Word usa o dicionário principal que corresponde à formatação de idioma da primeira palavra no intervalo.
SuggestionMode	Opcional	Variant	Especifica a maneira como o Word faz sugestões de ortografia. Pode ser uma das seguintes constantes WdSpellingWordType. O valor padrão é wdSpellword.
CustomDictionary2 – CustomDictionary10	Opcional	Variant	Uma expressão que retorna um objeto Dictionary ou o nome do arquivo de um dicionário personalizado adicional. Você pode especificar até nove dicionários adicionais.

Valor de retorno

Spellingsuggestions

Comentários

Se a palavra estiver ortograficamente correta, a propriedade Count do objeto SpellingSuggestions retorna 0 (zero).

Exemplo

Este exemplo procura sugestões de ortografia alternativa para a primeira palavra do intervalo selecionado. Se houver sugestões, o exemplo executará uma verificação ortográfica na seleção.

If Selection.Range.GetSpellingSuggestions.Count = 0 Then 
 Msgbox "No suggestions." 
Else 
 Selection.Range.CheckSpelling 
End If

Confira também

Objeto Range

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.