Application.Languages Property (Word)

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

Syntax

expression. Languages

expression A variable that represents an 'Application' object.

Remarks

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

Example

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

See also

Application Object