テーマカラーで網かけ(パターン)の色の取得・設定(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ソース
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 |
Sub Sample_PatternThemeColor() With Range("B2:E5").Interior 'パターンの種類を設定 .Pattern = xlPatternHorizontal 'パターンの色を設定 .PatternThemeColor = msoThemeAccent1 'パターンの色の明るさを設定 .PatternTintAndShade = 0.2 End With End Sub |
実行結果
関連記事
-
-
セルの値を置換(Replace メソッド)
Replace メソッド 任意のセル範囲内から特定の値を一括して置換します。Fi …
-
-
セルを参照する(Range プロパティ)
Range プロパティ 任意のセルにアクセスするには Range プロパティを使 …
-
-
セル内部を参照(Interior プロパティ)
Interior プロパティ Interior プロパティで、セルの内部を参照し …
-
-
セルが結合セルの一部である場合、その結合セルの範囲を取得(MergeArea プロパティ)
MergeArea プロパティ MergeArea プロパティは、指定したセルが …
-
-
終端セルを参照する(End プロパティ)
End プロパティ End プロパティは、基準となるセルが含まれる領域の指定した …
-
-
セルを削除する(Delete メソッド)
Delete メソッド Delete メソッドで、指定したセル・セル範囲を削除し …
-
-
セルを挿入する(Insert メソッド)
Insert メソッド Insert メソッドで、指定した場所に新規の空白セルを …
-
-
セルに値を設定する・セルの値を参照する(Value プロパティ)
Value プロパティ Value プロパティは、セルの値を取得したり、値を設定 …
-
-
セル・セル範囲を切り取る(Cut メソッド)
Cut メソッド Cut メソッドは、指定したセル範囲を切り取り、引数に指定した …
-
-
フリガナの取得(GetPhonetic メソッド)
GetPhonetic メソッド GetPhonetic メソッドは、指定した文 …