Método Range.GetSpellingSuggestions (Word)
Devuelve una colección SpellingSuggestions que representa las palabras sugeridas como términos de reemplazo de la primera palabra del intervalo especificado.
Sintaxis
expresión. GetSpellingSuggestions (CustomDictionary, IgnoreUppercase, MainDictionary, SuggestionMode, CustomDictionary2, CustomDictionary3, CustomDictionary4, CustomDictionary5, CustomDictionary6, CustomDictionary7, CustomDictionary8, CustomDictionary9, CustomDictionary10)
expresión requerida. Variable que representa un objeto Range.
Parameters
Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
---|---|---|---|
CustomDictionary | Opcional | Variant | Expresión que devuelve un objeto Dictionary o el nombre de archivo del diccionario personalizado. |
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. |
MainDictionary | Opcional | Variant | Expresión que devuelve un objeto Dictionary o el nombre de archivo del diccionario principal. Si no especifica un diccionario principal, Microsoft Word utiliza el diccionario principal que corresponde al formato de idioma de la primera palabra del intervalo. |
SuggestionMode | Opcional | Variant | Especifica la forma en que Word realiza las sugerencias de ortografía. Puede ser una de las siguientes constantes WdSpellingWordType. El valor predeterminado es wdSpellword. |
CustomDictionary2 : CustomDictionary10 | Opcional | Variant | Expresión que devuelve un objeto Dictionary o el nombre de archivo de un diccionario personalizado adicional. Puede especificar hasta nueve diccionarios adicionales. |
Valor devuelto
SpellingSuggestions
Comentarios
Si la palabra es correcta, la propiedad Count del objeto SpellingSuggestions devuelve 0 (cero).
Ejemplo:
En este ejemplo, se buscan las sugerencias de términos alternativos para la primera palabra del intervalo seleccionado. Si hay sugerencias, el ejemplo ejecuta una revisión ortográfica de la selección.
If Selection.Range.GetSpellingSuggestions.Count = 0 Then
Msgbox "No suggestions."
Else
Selection.Range.CheckSpelling
End If
Vea también
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.