Partager via


DocumentBase.DocumentTheme, propriété

Obtient le thème Microsoft Office appliqué au document.

Espace de noms :  Microsoft.Office.Tools.Word
Assembly :  Microsoft.Office.Tools.Word.v4.0.Utilities (dans Microsoft.Office.Tools.Word.v4.0.Utilities.dll)

Syntaxe

'Déclaration
Public ReadOnly Property DocumentTheme As OfficeTheme
public OfficeTheme DocumentTheme { get; }

Valeur de propriété

Type : Microsoft.Office.Core.OfficeTheme
Objet Microsoft.Office.Core.OfficeTheme qui représente le thème Microsoft Office appliqué au document.

Notes

Utilisez la méthode ApplyDocumentTheme pour appliquer un thème Microsoft Office au document.

Exemples

L'exemple de code suivant extrait le thème de document actuel et son jeu de polices correspondant.Le code extrait ensuite et affiche les noms de la police principale et de la police secondaire du type de police Latin dans un message.Pour utiliser cet exemple, exécutez-le à partir de la classe ThisDocument dans un projet au niveau du document.

Private Sub GetDocumentTheme()
    Dim theme As Office.OfficeTheme = Me.DocumentTheme
    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.DocumentTheme;            
    Office.ThemeFontScheme fontScheme = theme.ThemeFontScheme;            
    Office.ThemeFont majorFont = fontScheme.MajorFont.Item(
        Office.MsoFontLanguageIndex.msoThemeLatin);
    Office.ThemeFont minorFont = fontScheme.MinorFont.Item(
        Office.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);
}

Sécurité .NET Framework

Voir aussi

Référence

DocumentBase Classe

Microsoft.Office.Tools.Word, espace de noms