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 を使っています。コメントデータの処理方法の詳細はこちらをご覧ください

  関連記事

Locked プロパティ
セルのロック(Locked プロパティ)

セルのロック(Locked プロパティ) Locked プロパティで、セルのロッ …

セル内部を参照(Interior プロパティ)

Interior プロパティ Interior プロパティで、セルの内部を参照し …

並べ替え(Sort メソッド)

Sort メソッド 任意のセル範囲内で、並べ替えを行います。引数で、並べ替えの条 …

AutoFill メソッド 使用例 1
連続データを入力する(AutoFill メソッド)

AutoFill メソッド Excel で、連続するデータを入力する「オートフィ …

セル・セル範囲を切り取る(Cut メソッド)

Cut メソッド Cut メソッドは、指定したセル範囲を切り取り、引数に指定した …

フリガナの取得(GetPhonetic メソッド)

GetPhonetic メソッド GetPhonetic メソッドは、指定した文 …

オートフィルタ(日付による抽出)AutoFilter メソッド

日付で、抽出する(AutoFilter メソッド) 【書式】 object.Au …

ハイパーリンク(Hyperlink オブジェクトのメソッド)

Hyperlink オブジェクトのメソッド Hyperlinks コレクション …

配列数式を取得または設定する(FormulaArray プロパティ)

FormulaArray プロパティ FormulaArray プロパティは、対 …

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

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