Range.LanguageDetected (Word)
Cette propriété renvoie ou définit une valeur qui indique si Microsoft Word a détecté la langue du texte spécifié.
Vérifiez la propriété LanguageID pour les résultats des détections précédentes de la langue. La propriété LanguageDetected est définie sur True lorsque la méthode DetectLanguage est appelée.
With ActiveDocument.Range
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