Método Application.SetDefaultTheme (Word)
Establece un tema predeterminado para que Word lo use con nuevos documentos, mensajes de correo electrónico o páginas web.
Sintaxis
expresión. SetDefaultTheme (Name, DocumentType)
expresión requerida. Variable que representa un objeto Application.
Parameters
| Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
|---|---|---|---|
| Name | Obligatorio | String | Nombre del tema que desee utilizar como predeterminado más las opciones de formato del tema que desee aplicar. El formato de esta cadena es "themennn" donde theme y nnn se definen en la tabla Themes . |
| DocumentType | Obligatorio | WdDocumentMedium | Tipo de nuevo documento al que se asigna un tema predeterminado. |
Temas
| Cadena | Descripción |
|---|---|
| theme | Nombre de la carpeta que contiene los datos del tema solicitado. (La ubicación predeterminada para las carpetas de datos de tema es C:\Archivos de programa\Archivos comunes\Microsoft Shared\Themes). Debe usar el nombre de carpeta del tema en lugar del nombre para mostrar que aparece en el cuadro de diálogo Tema (comando Tema , menú Formato ). |
| nnn | Cadena de tres dígitos que indica las opciones de formato del tema que se desea activar (1 para activar, 0 para desactivar). Los dígitos corresponden a las casillas de verificación Colores intensos, Gráficos activos e Imagen de fondo del cuadro de diálogo Tema (comando Tema, menú Formato). Si se omite esta cadena, el valor predeterminado de nnn es "011" (se activan los gráficos activos y la imagen de fondo). |
Comentarios
El tema predeterminado establecido no se aplica automáticamente al documento en blanco que se crea al iniciar Word. A todos los documentos nuevos que cree posteriormente sí se les aplicará el tema predeterminado.
También puede usar la propiedad ThemeName para devolver y establecer el tema predeterminado para los nuevos mensajes de correo electrónico.
Ejemplo:
En este ejemplo se especifica que Word use el tema Plano técnico para todos los mensajes de correo electrónico nuevos.
Application.SetDefaultTheme "blueprnt", wdEmailMessage
En este ejemplo se especifica que Word use el tema Expedición con gráficos activos para todas las páginas web nuevas.
Application.SetDefaultTheme "expeditn 010", wdWebPage
Vea también
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.