Método Document. DetectLanguage (Word)Document.DetectLanguage method (Word)

Analisa o texto especificado para determinar o idioma em que está escrito.Analyzes the specified text to determine the language that it is written in.

SintaxeSyntax

expression.expression. DetectLanguage

expression é obrigatório.expression Required. Uma variável que representa um objeto Document.A variable that represents a Document object.

ComentáriosRemarks

Quando aplicado a um objeto Document , o método DetectLanguage verifica todo o texto disponível no documento (cabeçalhos, rodapés, caixas de texto e assim por diante).When applied to a Document object, the DetectLanguage method checks all available text in the document (headers, footers, text boxes, and so forth). Se o texto especificado contiver uma frase parcial, a seleção ou o intervalo é estendido até o final da frase.If the specified text contains a partial sentence, the selection or range is extended to the end of the sentence.

Se o método DetectLanguage já tiver sido aplicado ao texto especificado, a propriedade LanguageDetected é definida como True.If the DetectLanguage method has already been applied to the specified text, the LanguageDetected property is set to True. Para reavaliar o idioma do texto especificado, você deve primeiro definir a propriedade LanguageDetected como false.To re-evaluate the language of the specified text, you must first set the LanguageDetected property to False.

ExemploExample

Este exemplo verifica o documento ativo para determinar o idioma em que ele está escrito e exibe o resultado.This example checks the active document to determine the language it's written in and then displays the result.

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

Confira tambémSee also

Objeto DocumentDocument Object

Suporte e comentáriosSupport and feedback

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação?Have questions or feedback about Office VBA or this documentation? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.