Selection.LanguageDetected (Word)
Devuelve o establece un valor de tipo Boolean que especifica si Microsoft Word ha detectado el idioma del texto seleccionado.
Compruebe la propiedad LanguageID muestra el resultado de una detección de idioma anterior. La propiedad LanguageDetected se establece en True cuando se llama al método DetectLanguage.
With Selection
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