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
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.