expression.AutoKeyboardSwitching
expression Required. An expression that returns one of the objects in the Applies To list.
Remarks
To use this property, you must have the CheckLanguage property set to True.
For more information on using Word with multiple languages, see Troubleshoot Multilingual Text and Automatic Language Detection.
Example
This example asks the user to choose whether or not to enable automatic keyboard switching for multilingual documents.
x = MsgBox("Enable automatic keyboard switching?", vbYesNo)
If x = vbYes Then
Application.CheckLanguage = True
Options.AutoKeyboardSwitching = True
MsgBox "Automatic keyboard switching enabled!"
End If