Método Application.SetDefaultTheme (Word)

  • Artigo

Define um tema padrão para o Word usar com novos documentos, mensagens de email ou páginas da Web.

Sintaxe

expressão. SetDefaultTheme (Nome, 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 o tema e o nnn são definidos na tabela Temas.
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 para pastas de dados de tema é C:\Arquivos de Programa\Arquivos Comuns\Microsoft Shared\Temas.) Você deve usar o nome da pasta para o 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" (Active Graphics e Background Image serã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 usa o tema Blueprint para todas as novas mensagens de email.

Application.SetDefaultTheme "blueprnt", wdEmailMessage

Este exemplo especifica que o Word usa o tema Expedição com o 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.