Метод Range.GetSpellingSuggestions (Word)

  • Статья

Возвращает коллекцию SpellingSuggestions , представляющую слова, предложенные в качестве замены для первого слова в указанном диапазоне.

Синтаксис

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

выражение (обязательно). Переменная, представляющая объект Range .

Параметры

Имя Обязательный или необязательный Тип данных Описание
CustomDictionary Необязательный Variant Выражение, возвращающее объект Dictionary , или имя файла настраиваемого словаря.
IgnoreUppercase Необязательный Variant Значение true , чтобы игнорировать слова во всех прописных буквах. Если этот аргумент опущен, используется текущее значение свойства IgnoreUppercase .
MainDictionary Необязательный Variant Выражение, возвращающее объект Dictionary , или имя файла основного словаря. Если не указать основной словарь, Microsoft Word использует основной словарь, соответствующий формату языка первого слова в диапазоне.
SuggestionMode Необязательный Variant Указывает способ, с помощью функции word выдается орфографические предложения. Может быть одной из следующих констант WdSpellingWordType . Значение по умолчанию — wdSpellword.
CustomDictionary2 — CustomDictionary10 Необязательный Variant Выражение, возвращающее объект Dictionary , или имя файла дополнительного настраиваемого словаря. Можно указать целых девять дополнительных словарей.

Возвращаемое значение

SpellingSuggestions

Замечания

Если слово написано правильно, свойство Count объекта SpellingSuggestions возвращает значение 0 (ноль).

Пример

В этом примере выполняется поиск альтернативных вариантов написания первого слова в выбранном диапазоне. Если есть предложения, в примере выполняется проверка орфографии для выделенного фрагмента.

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

См. также

Объект Range

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.