Excel - VBscript для проверки орфографии

Question

Я хотел бы проверить орфографию, чтобы проверить правописание в определенной ячейке в Excel. Я использую приведенный ниже код, который работает.

If Target = rDNotes Then 
    Target.CheckSpelling 
End If 

Дело в том, что мне не нравится в этом коде является то, что он не предложит вам ни на что, даже если он не нашел каких-либо ошибок в клетке. Он спросит, хочу ли я проверить орфографию на остальной части рабочего листа.

Есть ли способ проверить орфографию, и если он не видит никаких ошибок, он не запрашивает никаких предупреждений или вообще не отображает всплывающие окна, что позволит вам продолжить работу? Я хочу, чтобы это только подсказывало мне, когда оно обнаруживает орфографическую ошибку и только тогда, когда ошибка обнаружена в этой конкретной ячейке.

Спасибо за любую помощь или предложения, которые могут быть у кого-либо.

Answer 1

Я на самом деле просто понял. Мне нужно было положить.

If Target = rDNotes Then 
    Target.CheckSpelling SpellLang:=1033 
End If 

Я не уверен, что SpellLang: = 1033 означает, но это работает точно так же, как мне нужно работать. Мне нужно будет продолжить исследования, чтобы узнать, что это делает, и другие варианты, которые, я уверен, есть.