Compartir a través de


WorkbookBase.Theme (Propiedad)

Obtiene el tema que se aplica al libro.

Espacio de nombres:  Microsoft.Office.Tools.Excel
Ensamblado:  Microsoft.Office.Tools.Excel.v4.0.Utilities (en Microsoft.Office.Tools.Excel.v4.0.Utilities.dll)

Sintaxis

'Declaración
Public ReadOnly Property Theme As OfficeTheme
public OfficeTheme Theme { get; }

Valor de propiedad

Tipo: Microsoft.Office.Core.OfficeTheme
Objeto Microsoft.Office.Core.OfficeTheme que representa el tema que se aplica al libro.

Ejemplos

En el ejemplo de código siguiente se recupera el tema del libro activo.A continuación, se muestran los nombres de la fuente principal y secundaria hallados en la combinación de fuentes del tema del libro.

Se trata de un ejemplo para una personalización en el nivel del documento.

Private Sub GetDocumentTheme()
    Dim theme As Office.OfficeTheme = Me.Theme
    Dim fontScheme As Office.ThemeFontScheme = theme.ThemeFontScheme
    Dim majorFont As Office.ThemeFont = fontScheme.MajorFont.Item( _
        Microsoft.Office.Core.MsoFontLanguageIndex.msoThemeLatin)
    Dim minorFont As Office.ThemeFont = fontScheme.MinorFont.Item( _
        Microsoft.Office.Core.MsoFontLanguageIndex.msoThemeLatin)
    MessageBox.Show("Name of major font in current document theme: " _
                    + majorFont.Name)
    MessageBox.Show("Name of minor font in current document theme: " _
                    + minorFont.Name)
End Sub
private void GetDocumentTheme()
{
    Office.OfficeTheme theme = this.Theme;
    Office.ThemeFontScheme fontScheme = theme.ThemeFontScheme;
    Office.ThemeFont majorFont = fontScheme.MajorFont.Item(
        Microsoft.Office.Core.MsoFontLanguageIndex.msoThemeLatin);
    Office.ThemeFont minorFont = fontScheme.MinorFont.Item(
        Microsoft.Office.Core.MsoFontLanguageIndex.msoThemeLatin);
    MessageBox.Show("Name of major font in current document theme: "
                    + majorFont.Name);
    MessageBox.Show("Name of minor font in current document theme: "
                    + minorFont.Name);
}

Seguridad de .NET Framework

Vea también

Referencia

WorkbookBase Clase

Microsoft.Office.Tools.Excel (Espacio de nombres)