LanguageID Property Example
This example sets the language for the specified text in shape one to US English.
ActivePresentation.Slides(1).Shapes(1).TextFrame.TextRange _ .LanguageID = msoLanguageIDEnglishUS