Compartir a través de


Método Global.GetSpellingSuggestions (Word)

Devuelve una colección SpellingSuggestions que representa las palabras sugeridas como reemplazos para la ortografía de una palabra determinada.

Sintaxis

expresión. GetSpellingSuggestions( _Word_ , _CustomDictionary_ , _IgnoreUppercase_ , _MainDictionary_ , _SuggestionMode_ , _CustomDictionary2_ , _CustomDictionary3_ , _CustomDictionary4_ , _CustomDictionary5_ , _CustomDictionary6_ , _CustomDictionary7_ , _CustomDictionary8_ , _CustomDictionary9_ , _CustomDictionary10_ )

expresión requerida. Variable que representa un objeto "Global".

Parameters

Nombre Obligatorio/opcional Tipo de datos Descripción
Word Obligatorio String Palabra cuya ortografía se va a revisar.
IgnoreUppercase Opcional Variant True para omitir las palabras en mayúsculas. Si se omite este argumento, se usa el valor actual de la propiedad IgnoreUppercase.
SuggestionMode Opcional Variant Especifica la forma en que Word realiza las sugerencias de ortografía. Puede ser una de las siguientes constantes WdSpellingWordType: wdAnagram, wdSpellword o wdWildcard. El valor predeterminado es WdSpellword.

Comentarios

Si la palabra es correcta, la propiedad Count del objeto SpellingSuggestions devuelve 0 (cero).

Ejemplo:

En este ejemplo se buscan sugerencias ortográficas alternativas para la palabra "*ook." Sugerencias que incluyen reemplazos para el * carácter comodín. Las sugerencias aparecen en cuadros de mensaje.

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

Consulte también

Global (objeto)

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.