Propriedade Document.ActiveWritingStyle (Word)
Retorna ou define o estilo de texto para um idioma especificado no documento especificado. Cadeia de caracteres de leitura/gravação.
Sintaxe
expression. ActiveWritingStyle( _LanguageID_ )
expressão Obrigatório. Uma variável que representa um objeto Document.
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| LanguageID | Obrigatório | Variant | O idioma para definir o estilo de escrita no documento especificado. Pode ser uma cadeia de caracteres ou uma das seguintes constantes WdLanguageID. Algumas das constantes WdLanguageID podem não estar disponíveis para você, dependendo do suporte a idioma (inglês americano, por exemplo) que você selecionou ou instalou. |
Comentários
A propriedade WritingStyleList retorna uma matriz de nomes de estilos de texto disponíveis.
Exemplo
Este exemplo define o estilo de texto usado para francês, alemão e inglês americano no documento ativo. Para executar este exemplo, você deve ter os arquivos de gramática instalados para francês, alemão e inglês americano.
With ActiveDocument
.ActiveWritingStyle(wdFrench) = "Commercial"
.ActiveWritingStyle(wdGerman) = "Technisch/Wiss"
.ActiveWritingStyle(wdEnglishUS) = "Technical"
End With
Este exemplo retorna o estilo de texto para o idioma da seleção.
Sub WhichLanguage()
Dim varLang As Variant
varLang = Selection.LanguageID
MsgBox ActiveDocument.ActiveWritingStyle(varLang)
End Sub
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? 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.