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 = _ 
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