ExcelWork.info

Excel(エクセル)のマクロ・VBA・関数・操作などのメモ

テーマカラーで網かけ(パターン)の色の取得・設定(PatternThemeColor プロパティ・PatternTintAndShade プロパティ)

      2015/08/26

PatternThemeColor プロパティ・PatternTintAndShade プロパティ

テーマカラーを使用して、網かけ(パターン)の色を設定する場合、PatternThemeColor プロパティで、基準となる色を指定し、PatternTintAndShade プロパティで、明るさを指定します。
網かけを取得・設定する方法は、網かけ(パターン)の取得・設定(Pattern プロパティ) を参照してください。

PatternThemeColor プロパティ

【書式】

<取得>
result = Object.PatternThemeColor

<設定>
Object.PatternThemeColor = index

引数・戻り値

  • object  ・・・  対象となる Interior オブジェクトを指定します。
  • index  ・・・  テーマカラーの基本色を表すMsoPatternThemeColorSchemeindex 列挙型(または XlThemeColor 列挙型)の定数または値(1 ~ 12)を指定します。
  • result  ・・・  設定されているテーマカラーを表す値1 ~ 12)。

テーマカラーの基本 12 色( ※ テーマカラーは、Excel 2007 以降で追加された機能なので、それ以前のバージョンでは使用できません。)
テーマカラー 基本色

引数 index に指定する定数(MsoPatternThemeColorSchemeIndex 列挙)

定数 内容
msoThemeDark1 1 テキスト/背景:濃色 1
msoThemeLight1 2 テキスト/背景:淡色 1
msoThemeDark2 3 テキスト/背景:濃色 2
msoThemeLight2 4 テキスト/背景:淡色 2
msoThemeAccent1 5 アクセント 1
msoThemeAccent2 6 アクセント 2
msoThemeAccent3 7 アクセント 3
msoThemeAccent4 8 アクセント 4
msoThemeAccent5 9 アクセント 5
msoThemeAccent6 10 アクセント 6
msoThemeHyperlink 11 ハイパーリンク
msoThemeFollowedHyperlink 12 表示済みのハイパーリンク


PatternTintAndShade プロパティ

【書式】

<取得>
result = Object.PatternTintAndShade

<設定>
Object.PatternTintAndShade = single

引数・戻り値

  • object  ・・・  対象となる Interior オブジェクトを指定します。
  • single  ・・・  網かけ(パターン)の色の明るさを -1(暗い)1(明るい)で指定します。
  • result  ・・・  網かけ(パターン)の色の明るさを示す値(内部処理形式 Single のバリアント型)。

テーマカラーの基本色の明るさ
テーマカラー 明るさ



PatternThemeColor・PatternTintAndShade 使用例

サンプルVBAソース


実行結果

PatternThemeColor プロパティ 例


 - セルの操作 , , , , , ,

Message

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください

  関連記事

ハイパーリンク(Hyperlink オブジェクト)

Hyperlink オブジェクト Hyperlinks コレクション のメンバー …

Row プロパティ・Column プロパティ 例
セルの行番号または列番号を取得(Row プロパティ,Column プロパティ)

Row プロパティ・Column プロパティ Row プロパティは、指定したセル …

対象のセルが直接参照しているセル全てを取得(DirectPrecedents プロパティ)

DirectPrecedents プロパティ DirectPrecedents …

セルに値を設定する・セルの値を参照する(Value2 プロパティ)

Value2 プロパティ Value プロパティとの違いは、Value2 プロパ …

フリガナの設定(SetPhonetic メソッド)

フリガナの設定(SetPhonetic メソッド) SetPhonetic メソ …

列名・列番号取得 使用例
列名を取得、列番号を取得(Address プロパティ,Column プロパティ)

列番号を取得する セル番地(「A1」や「B3」)や列名(「A」「B」「C」&#8 …

セルを参照する(Cells プロパティ)

Cells プロパティ Cells プロパティは、ワークシートの行番号と列番号を …

RemoveDuplicates メソッド 使用例1a
重複するデータを削除(RemoveDuplicates メソッド)

RemoveDuplicates メソッド 指定したセル範囲から重複データを含む …

セル範囲内を検索(Find メソッド)

Find メソッド 指定したセル範囲内の特定の情報を含むセルを検索します。 【書 …

文字列の一部の書式を変更(Characters プロパティ)

文字列の一部を参照(Characters プロパティ) Characters プ …