「罫線」のVBAを最速理解

こんにちは　じゅんぱ店長　(＠junpa33)　です。

セルの書式設定をエクセルVBAで操作を行う方法。今回は「セルに引く罫線」です。

帳票作成のためには、セルの罫線の設定では欠かせない設定項目です。非常に重要な項目で頻出ですので、しっかり設定できる様にしておきましょう。

セルの書式設定の記事一覧

2022年7月11日「表示形式」をVBAコード的に最速理解する 2022年7月12日「配置」を最速理解する エクセルVBA 2022年7月13日「フォント」の操作を最速理解する エクセルVBA 2022年7月16日「罫線」のVBAを最速理解 2022年7月16日「塗りつぶし」背景色をVBAで記述する 2022年7月17日「塗りつぶしの網掛け」VBAを最速理解 2022年7月18日「グラデーションの塗りつぶし」のセルを設定する 2022年7月20日「セルの保護」の設定VBAを最速理解

セル書式設定「罫線」の設定はこれです

作表時にはほぼ必須になる「罫線」の設定は、ワークシートからは、マウスクリックで簡単に行えます。

これをエクセルVBAで行うと、どんなコードを記述すればいいのかということを説明していきます。

「罫線」いろいろな種類を設定するVBAのコード

セルの書式設定の罫線タブの設定項目は、

になっています。

この罫線タブで指定する項目は、VBAコードでは「Bordersプロパティ」になります。

Bordersプロパティとは、Rangeオブジェクトの罫線要件の編集を行うために必要な「Borderオブジェクト」を、呼び出すためのプロパティです。

罫線　位置

まず罫線を引くセルの位置を指定します。セルに罫線を引く位置は全部で8か所あります。

それぞれに引いた罫線には個別にスタイルや色を設定することが出来ます。

罫線の1番目から8番目までそれぞれ独立していますが、その罫線をまとめて「コレクション」と呼んでいます。

Borderオブジェクトの8種類とは、その呼び出す記述方法とは、

線　スタイル

罫線のスタイルは線種と太さの組み合わせで決まります。

記述方法

　構文　

Rangeオブジェクト.Borders(位置の定数).LineStyle=線種の定数

Rangeオブジェクト.Borders(位置の定数).Weight=太さの定数

たとえば、セルB3に下記の罫線を設定する場合は・・・

罫線のスタイル	スタイル表示のVBA With Range(“B3”).Borders ＜この部分に記述＞ End With	組み合わせ説明 線種 太さ
なし	.LineStyle = xlLineStyleNone
	.LineStyle = xlContinuous .Weight = xlHairlin	（実線）xlContinuous （極細）xlHairline
	.LineStyle = xlDot .Weight = xlThin	（点線）xlHairline （細線）xlThin
	.LineStyle = xlDashDotDot .Weight = xlThin	（二点鎖線）xlDashDotDot （細線）xlThin
	.LineStyle = xlDashDot .Weight = xlThin	（一点鎖線）xlDashDot （細線）xlThin
	.LineStyle = xlDash .Weight = xlThin	（破線）xlDash （細線）xlThin
	.LineStyle = xlContinuous .Weight = xlThin	（実線）xlContinuous （細線）xlThin
	.LineStyle = xlDashDotDot .Weight = xlMedium	（二点鎖線）xlDashDotDot （中太）xlMedium
	.LineStyle = xlSlantDashDot .Weight = xlMedium	（斜破線）xlSlantDashDot （中太）xlMedium
	.LineStyle = xlDashDot .Weight = xlMedium	（一点鎖線）xlDashDot （中太）xlMedium
	.LineStyle = xlDash .Weight = xlMedium	（破線）xlDash （中太）xlMedium
	.LineStyle = xlContinuous .Weight = xlMedium	（実線）xlContinuous （中太）xlMedium
	.LineStyle = xlContinuous .Weight = xlThick	（実線）xlContinuous （極太）xlThick
	.LineStyle = xlDouble .Weight = xlThick	（二本線）xlDouble （極太）xlThick

線　色

色については、カラーパレットから選択するのが簡単ですが、これはVBAコード的には、56色の色番号による指定方法になります。

ほかに色の指定方法としては、「Colorプロパティ」によるカラー定数またはRGBによる指定方法になります。

記述方法

　構文　

Rangeオブジェクト.Borders(位置の定数).ColorIndex=色番号

Rangeオブジェクト.Borders(位置の定数).Color=カラー定数　または　RGB指定

ColorIndexの色番号

Colorプロパティのカラー定数とRGB指定

セルの書式設定「罫線」のVBA　まとめ

セルに罫線を引くための設定をVBAコード化すると、結構細かい設定が必要になってきます。

セル範囲の罫線全てに、同じタイプの罫線を一律に設定するのであればまだマシですが、

セルの一つの辺ごとに罫線を設定するとなれば、少なからずコード行数か膨らんでいきます。

同類のコードを簡潔に括れる「Withステートメント」や「セルの範囲」の上手い設定方法（括り方）なども併用しながら、

より簡略簡潔になるVBAコード組み立ても考えて行く必要があります。

エクセルVBAを独習するのに参考書は欠かせません。 参考書選びは自分に合った「相棒」にできるものを選んでいきたいです。

2022年1月9日エクセルVBAの独習でおすすめ参考書を7冊選ぶ。良書との出会いは大切です

　セルの操作の記事一覧

セルの背景色を2クリックで他範囲にも展開できるマクロデータの並び替え VBA新旧のSortを実データで実証「セルの保護」の設定VBAを最速理解「グラデーションの塗りつぶし」のセルを設定する「塗りつぶしの網掛け」VBAを最速理解「塗りつぶし」背景色をVBAで記述する「罫線」のVBAを最速理解「フォント」の操作を最速理解する エクセルVBA「配置」を最速理解する エクセルVBA「表示形式」をVBAコード的に最速理解するセルの範囲選択と設定は14のツールで対応するEndプロパティで上下左右の最終セルを取得EntireColumnとColumnの使い方EntireRowとRowプロパティの違いColumnsプロパティの列指定で参照するUnionとRangeの一括選択の働きを比較Resizeプロパティでセル範囲をサイズ変更Range VS Cells ！VBAで使えるのはどっちUsedRangeプロパティの使い方のコツBordersの/位置/線種/太さ/色/と<外枠だけの罫線>の設置Rowsプロパティの働きと関連のメソッドセルの編集 DeleteとClearの使い分け 削除とクリアの違いCurrentRegionは連続データをまとめて掴むSpecialCellsメソッドはセル検索し選択するCharactersで文字列中の一部の文字を加工するFontプロパティで文字装飾操作をするエクセルVBA 同じ項目をまとめる（重複データの整理）コード作成Findメソッドでの検索の方法とコード組み立てのコツデータ入力済セルの最終行番号を取得するOffsetプロパティは指定範囲を移動させる

今回の記事はここまでです。   最後までご覧いただき有難うございました。