Метод Global.GetSpellingSuggestions (Word)

Статья
04/07/2023

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

Синтаксис

выражение. GetSpellingSuggestions( _Word_ , _CustomDictionary_ , _IgnoreUppercase_ , _MainDictionary_ , _SuggestionMode_ , _CustomDictionary2_ , _CustomDictionary3_ , _CustomDictionary4_ , _CustomDictionary5_ , _CustomDictionary6_ , _CustomDictionary7_ , _CustomDictionary8_ , _CustomDictionary9_ , _CustomDictionary10_ )

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

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
Word	Обязательный	String	Слово, правописание которого необходимо проверить.
IgnoreUppercase	Необязательный	Variant	Значение true , чтобы игнорировать слова во всех прописных буквах. Если этот аргумент опущен, используется текущее значение свойства IgnoreUppercase .
SuggestionMode	Необязательный	Variant	Указывает способ, с помощью функции word выдается орфографические предложения. Может быть одной из следующих констант WdSpellingWordType : wdAnagram, wdSpellword или wdWildcard. Значение по умолчанию — WdSpellword.

Замечания

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

Пример

В этом примере выполняется поиск альтернативных предложений по написанию для слова "*ook." Предложения, включающих замены для * подстановочного знака. Все предлагаемые орфографии отображаются в окнах сообщений.

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

См. также

Глобальный объект

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

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

Поделиться через