Document.DetectLanguage (Word)

Analiza el texto especificado para determinar el idioma en que está escrito.

Cuando se aplica a un objeto Document , el método DetectLanguage comprueba todo el texto disponible en el documento (encabezados, pies de página, cuadros de texto, etc.). Si el método DetectLanguage ya se ha aplicado al texto especificado, la propiedad LanguageDetected se establece en True.

With ActiveDocument 
 If .LanguageDetected = True Then 
 x = MsgBox("This document has already " _ 
 & "been checked. Do you want to check " _ 
 & "it again?", vbYesNo) 
 If x = vbYes Then 
 .LanguageDetected = False 
 .DetectLanguage 
 End If 
 Else 
 .DetectLanguage 
 End If 
 If .Range.LanguageID = wdEnglishUS Then 
 MsgBox "This is a U.S. English document." 
 Else 
 MsgBox "This is not a U.S. English document." 
 End If 
End With