Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Define um tema padrão para o Word usar com novos documentos, mensagens de email ou páginas da Web.
Sintaxe
mais simples. SetDefaultTheme (Name, DocumentType)
expressão Obrigatório. Uma variável que representa um objeto Application.
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| Name | Obrigatório | String | O nome do tema que você quer definir como padrão, além de quaisquer opções de formatação do tema que você queira aplicar. O formato dessa cadeia de caracteres é "themennn", em que theme e nnn são definidos na tabela Themes . |
| DocumentType | Obrigatório | WdDocumentMedium | O tipo do novo documento ao qual você está atribuindo um tema padrão. |
Temas
| String | Descrição |
|---|---|
| tema | O nome da pasta que contém os dados do tema desejado. (O local padrão das pastas de dados de tema é C:\Program Files\Common Files\Microsoft Shared\Themes.) Você deve usar o nome da pasta do tema em vez do nome de exibição que aparece na caixa de diálogo Tema (comando Tema, menu Formatar). |
| nnn | Uma sequência de três dígitos que indica quais opções de formatação do tema devem ser ativadas (1 para ativar, 0 para desativar). Os dígitos correspondem às caixas de seleção Cores vivas, Elementos gráficos ativos e Imagem de plano de fundo na caixa de diálogo Tema (comando Tema, menu Formatar). Se essa cadeia de caracteres for omitida, o valor padrão para nnn será "011" (os gráficos ativos e a imagem de plano de fundo estão ativados). |
Comentários
A configuração de um tema padrão não aplicará esse tema ao documento em branco criado automaticamente ao iniciar o Word. Todos os novos documentos criados depois disso terão o tema padrão.
Você também pode usar a propriedade ThemeName para retornar e definir o tema padrão para novas mensagens de email.
Exemplo
Este exemplo especifica que o Word use o tema Blueprint para todas as novas mensagens de email.
Application.SetDefaultTheme "blueprnt", wdEmailMessage
Este exemplo especifica que o Word use o tema Expedição com Active Graphics para todas as novas páginas da Web.
Application.SetDefaultTheme "expeditn 010", wdWebPage
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.