Export (0) Print
Expand All
Expand Minimize

Application.Languages Property (Word)

Returns a Languages collection that represents the proofing languages listed in the Language dialog box.

expression .Languages

expression A variable that represents an Application object.

For information about returning a single member of a collection, see Returning an Object from a Collection.

This example returns the full path and file name of the active spelling dictionary.

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

This example uses the aLang() array to store the proofing language names.

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
Show:
© 2014 Microsoft