Método Global.GetSpellingSuggestions (Word)
Retorna uma coleção SpellingSuggestions que representa as palavras sugeridas como substituições de ortografia para uma determinada palavra.
Sintaxe
expression. GetSpellingSuggestions
( _Word_
, _CustomDictionary_
, _IgnoreUppercase_
, _MainDictionary_
, _SuggestionMode_
, _CustomDictionary2_
, _CustomDictionary3_
, _CustomDictionary4_
, _CustomDictionary5_
, _CustomDictionary6_
, _CustomDictionary7_
, _CustomDictionary8_
, _CustomDictionary9_
, _CustomDictionary10_
)
expressão Obrigatório. Uma variável que representa um objeto 'Global'.
Parâmetros
Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
---|---|---|---|
Word | Obrigatório | String | A palavra cuja ortografia deve ser verificada. |
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. |
SuggestionMode | Opcional | Variant | Especifica a maneira como o Word faz sugestões de ortografia. Pode ser uma das seguintes constantes WdSpellingWordType: wdAnagram, wdSpellword ou wdWildcard. O valor padrão é WdSpellword. |
Comentários
Se a palavra estiver ortograficamente correta, a propriedade Count do objeto SpellingSuggestions retorna 0 (zero).
Exemplo
Este exemplo procura as sugestões ortográficas alternativas para a palavra "*ook."
Sugestões incluem substituições para o *
caractere curinga. Todas as ortografias sugeridas são exibidas em caixas de mensagens.
Sub DisplaySuggestions()
Dim sugList As SpellingSuggestions
Dim sug As SpellingSuggestion
Dim strSugList As String
Set sugList = GetSpellingSuggestions(Word:="lrok", _
SuggestionMode:=wdSpellword)
If sugList.Count = 0 Then
MsgBox "No suggestions."
Else
For Each sug In sugList
strSugList = strSugList & vbTab & sug.Name & vbLf
Next sug
MsgBox "The suggestions for this word are: " _
& vbLf & strSugList
End If
End Sub
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.