Document.DetectLanguage (Word)
Analyse le texte spécifié pour en déterminer la langue.
Lorsqu’elle est appliquée à un objet document , la méthode DetectLanguage vérifie tout le texte disponible dans le document (en-têtes, pieds de page, zones de texte, etc.). Si la méthode DetectLanguage a déjà été appliquée au texte spécifié, la propriété LanguageDetected est définie sur 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