Word) (Language.ActiveSpellingDictionary 屬性
會傳回代表指定語言之使用中拼字檢查字典的 Dictionary 物件。
語法
expression。 ActiveSpellingDictionary
表達 會傳回 'Language' 物件的運算式。
註解
如果沒有安裝指定語言的拼字檢查字典,這個屬性會傳回 Nothing 。
範例
本範例會傳回使用中拼字檢查字典的檔案路徑及檔案名稱。
Dim lngLanguage As Long
Dim dicSpelling As Dictionary
lngLanguage = Selection.LanguageID
Set dicSpelling = Languages(lngLanguage).ActiveSpellingDictionary
If dicSpelling Is Nothing Then
MsgBox "No spelling dictionary installed!"
Else
MsgBox dicSpelling.Path & Application.PathSeparator _
& dicSpelling.Name
End If
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。