WorkbookBase.Theme – vlastnost
Získá motiv, který je používán v sešitu.
Obor názvů: Microsoft.Office.Tools.Excel
Sestavení: Microsoft.Office.Tools.Excel.v4.0.Utilities (v Microsoft.Office.Tools.Excel.v4.0.Utilities.dll)
Syntaxe
'Deklarace
Public ReadOnly Property Theme As OfficeTheme
public OfficeTheme Theme { get; }
Hodnota vlastnosti
Typ: Microsoft.Office.Core.OfficeTheme
A Microsoft.Office.Core.OfficeTheme , která představuje motiv, který je používán v sešitu.
Příklady
Následující příklad kódu načte motiv aktuálního sešitu.Příkladu se potom zobrazí jména hlavní a vedlejší písmo ve schématu písem motivu sešitu.
V tomto příkladu je úroveň dokument přizpůsobení.
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);
}
Zabezpečení rozhraní .NET Framework
- Plná důvěra přímému volajícímu. Částečně zabezpečený kód nemůže tento člen použít. Další informace naleznete v tématu Používání knihoven z částečně důvěryhodného kódu.