共用方式為

Word) (Application.Languages 屬性

  • 發行項

會傳回代表 [ 語言 ] 對話方塊中所列校訂 語言的 Languages 集合。

語法

expression。 Languages

expression 代表 Application 物件的變數。

註解

如需傳回集合中單一成員的資訊，請參閱 從集合傳回物件。

範例

本範例會傳回使用中拼字檢查字典的檔案路徑及檔案名稱。

Dim dicSpell As Dictionary 
 
Set dicSpell = _ 
 Languages(Selection.LanguageID).ActiveSpellingDictionary 
 
MsgBox dicSpell.Path & Application.PathSeparator & dicSpell.Name

此範例會使用 數 aLang() 組來儲存校訂語言名稱。

Dim intCount As Integer 
Dim langLoop As Language 
Dim aLang(Languages.Count - 1) As String 
 
intCount = 0 
For Each langLoop In Languages 
 aLang(intCount) = langLoop.NameLocal 
 intCount = intCount + 1 
Next langLoop

另請參閱

Application 物件

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。