Application.Check拼寫沒有返回正確的布爾值

Question

我想準備一個excel文件，它會自動顯示任何單詞拼寫錯誤。有些代碼顯示並突出顯示特定單詞字段，當單詞拼寫錯誤時，但是我想突出顯示不同的單元格，如果任何 的單詞拼寫錯誤。

這是我做過什麼： -

Function GFD() As Boolean 

Application.CheckSpelling (Range("a1").Text) 

End Function 

'======================================================= 

Function GFF() As Boolean 

Application.CheckSpelling (Range("a2").Text) 

End Function 

問題是在功能，我沒有得到正確的值，如果我寫在A2的功能被設置爲假「asdfsd」，這是正確的。但是，如果我寫「完美」這是正確的，它再次返回False。

請幫忙。

Answer 1

你要設置的功能到應用程序的返回值：

Function GFD() As Boolean 
    GFD = Application.CheckSpelling(Range("a1").Text) 
End Function