ExcelWork.info

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

網かけ(パターン)の取得・設定(Pattern プロパティ)

      2015/08/26

網かけ(パターン)を取得・設定する

セルの背景に網かけ(パターン)を設定したり、設定されている網かけを取得するには、Interior オブジェクトPattern プロパティを使用します。パターンを表す定数(XlPattern 列挙型)を指定することができます。
また、網かけ(パターン)の色を設定するには、PatternColor プロパティPatternColorIndex プロパティPatternThemeColor プロパティを使用します。

Pattern プロパティ

【書式】

<取得>
result = Object.Pattern

<設定>
Object.Pattern = const

引数・戻り値

  • object  ・・・  対象となる Interior オブジェクトを指定します。
  • const  ・・・  網かけ(パターン)を表す定数(XlPattern 列挙型)を指定します。
  • result  ・・・  設定されている網かけ(パターン)を表す値(XlPattern 列挙型)。

対象となるオブジェクトは、Interior オブジェクトの他、ChartFillFormat(グラフ要素)、FillFormat(図形)、LineFormat(線・矢印)などがあります。ただし、指定できる定数は、オブジェクトによって異なります

引数 const に指定する定数(XlPattern 列挙)

定数 内容 パターン
xlPatternAutomatic -4105 Excel がパターンを制御   
xlPatternChecker 9 チェッカーボード   
xlPatternCrissCross 16 十字線   
xlPatternDown -4121 左上から右下までの濃い対角線   
xlPatternGray16 17 16% 灰色   
xlPatternGray25 -4124 25% 灰色   
xlPatternGray50 -4125 50% 灰色   
xlPatternGray75 -4126 75% 灰色   
xlPatternGray8 18 8% 灰色   
xlPatternGrid 15 グリッド   
xlPatternHorizontal -4128 濃い横線   
xlPatternLightDown 13 左上から右下までの明るい対角線   
xlPatternLightHorizontal 11 明るい横線   
xlPatternLightUp 14 左下から右上までの明るい対角線   
xlPatternLightVertical 12 明るい縦線   
xlPatternNone -4142 パターンなし   
xlPatternSemiGray75 10 75% 濃いモアレ   
xlPatternSolid 1 純色   
xlPatternUp -4162 左下から右上までの濃い対角線   
xlPatternVertical -4166 濃い縦線   


PatternColor プロパティ・PatternColorIndex プロパティ

【書式:PatternColor プロパティ】

<取得>
result_rgb = Object.PatternColor

<設定>
Object.PatternColor = rgb


【書式:PatternColorIndex プロパティ】

<取得>
result_index = Object.PatternColorIndex

<設定>
Object.PatternColorIndex = index

引数・戻り値

  • object  ・・・  対象となる Interior オブジェクトを指定します。
  • rgb  ・・・  網かけ(パターン)の色をRGB 値で指定します。RGB 値は、RGB 関数で取得することもできます。  ⇒ RGB 値一覧表  ⇒ RGB 関数
  • result_rgb  ・・・  RGB 値
  • index  ・・・  カラーパレットの色を表す 1 ~ 56 パレット番号を指定します。
  • result_index  ・・・  設定されているカラーパレットパレット番号


網かけ(パターン)を取得・設定する 使用例

サンプルVBAソース


実行結果

Pattern プロパティ 例


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

Message

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

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

  関連記事

任意のセルを含む行または列全体を参照(EntireRow プロパティ,EntireColumn プロパティ)

EntireRow プロパティ・EntireColumn プロパティ Entir …

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

Dependents プロパティ Dependents プロパティは、対象のセル …

AutoFilter オブジェクト(メソッド・プロパティ)

AutoFilter.ShowAllData メソッド AutoFilter.S …

次の検索(FindNext メソッド,FindPrevious メソッド)

FindNext メソッド Find メソッドで開始された検索を継続します。引数 …

罫線の設定(Borders プロパティ)

罫線の設定 罫線を一括(上下左右すべて)で設定するには、Borders プロパテ …

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

Precedents プロパティ Precedents プロパティは、対象のセル …

別シートのセルを選択(Goto メソッド / PreviousSelections プロパティ)

Goto メソッド 次の例のように、1 行で、Activate メソッド や S …

セルの値を置換(Replace メソッド)

Replace メソッド 任意のセル範囲内から特定の値を一括して置換します。Fi …

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

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

コメントの設定(Comments, Comment, AddComment, ClearComment)

コメントの設定 セルにコメントを新規に挿入するには、AddComment メソッ …