DocumentBase.DocumentTheme プロパティ
文書に適用されている Microsoft Office テーマを取得します。
名前空間: Microsoft.Office.Tools.Word
アセンブリ: Microsoft.Office.Tools.Word.v4.0.Utilities (Microsoft.Office.Tools.Word.v4.0.Utilities.dll 内)
構文
'宣言
Public ReadOnly Property DocumentTheme As OfficeTheme
public OfficeTheme DocumentTheme { get; }
プロパティ値
型 : Microsoft.Office.Core.OfficeTheme
文書に適用されている Microsoft Office テーマを表す Microsoft.Office.Core.OfficeTheme オブジェクト。
解説
Microsoft Office テーマを文書に適用するには、ApplyDocumentTheme メソッドを使用します。
例
次のコード例では、現在の文書のテーマと、対応するフォント パターンを取得します。次に、欧文フォントのメジャー フォントとマイナー フォントの名前を取得し、メッセージ ボックスに表示します。この例を使用するには、これをドキュメント レベルのプロジェクトの ThisDocument クラスから実行します。
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);
}
.NET Framework セキュリティ
- 直前の呼び出し元に対する完全な信頼。このメンバーは、部分的に信頼されているコードから使用することはできません。詳細については、「部分信頼コードからのライブラリの使用」を参照してください。