罫線を簡単に引く(Borders,BorderAround)
エクセルでは、罫線を引く事が多いです。
この罫線は、以外に処理時間もかかりますし、やり方によっては、VBAの行数も多くなります。
とにかく、簡単に罫線を引く方法です。
以下の表を作成する場合です。

罫線を引く順番等、いろいろありますが、とにかく短いコードにしてみます。
Sub sample1()
Range("B2:F11").Borders().Weight = xlHairline
Range("B2:F11").BorderAround Weight:=xlMedium
Range("B3:F3").Borders(xlEdgeTop).Weight =
xlThin
Range("C2:C11").Borders(xlEdgeLeft).Weight = xlThin
End
Sub
Range("B2:F11").Borders().Weight =
xlHairline
極細線で、格子を作成
Range("B2:F11").BorderAround
Weight:=xlMedium
外枠を、中太線にします。
このBorderAround は、メソッドですので、他とは記述方法が違いますので、注意して下さい。
Range("B3:F3").Borders(xlEdgeTop).Weight =
xlThin
上だけ、細線にします。
Range("C2:C11").Borders(xlEdgeLeft).Weight =
xlThin
左だけ、細線にします。
罫線を引く順序は、どの順番でも問題はありません。
なるべく、セル範囲を、まとめて指定するように心がけて下さい。
同じテーマ「マクロVBAサンプル集」の記事
マクロVBAの開始時と終了時に指定しておくべきApplicationのプロパティ
新着記事NEW ・・・新着記事一覧を見る
Excelの新機能「リストとセル内配列」:1つのセルに複数の値|エクセル入門(2026-09-28)
Excel関数クロスワード(2026-09-26)
Excelショートカットキークイズ(2026-09-23)
Excel関数名クイズ(2026-09-21)
気ままに一手|リレー将棋(2026-09-20)
ITエンジニアがトラブルを避けるための法律・契約入門|エクセル雑感(2026-09-18)
ITエンジニアなら知らないと恥ずかしい数学20選|エクセル雑感(2026-09-17)
ITエンジニアのための税金と社会保険のお話|エクセル雑感(2026-09-15)
ITエンジニアのための経理・会計・簿記入門|エクセル雑感(2026-09-12)
「Python in Excel」入門:コードを読むための基礎知識|エクセル関数応用(2026-09-10)
アクセスランキング ・・・ ランキング一覧を見る
1.最終行の取得(End,Rows.Count)|VBA入門
2.日本の祝日一覧|Excelリファレンス
3.変数宣言のDimとデータ型|VBA入門
4.Excelショートカットキー一覧|Excelリファレンス
5.RangeとCellsの使い方|VBA入門
6.FILTER関数(範囲をフィルター処理)|エクセル入門
7.マクロとは?VBAとは?VBAでできること|VBA入門
8.繰り返し処理(For Next)|VBA入門
9.メッセージボックス(MsgBox関数)|VBA入門
10.セルのコピー&値の貼り付け(PasteSpecial)|VBA入門
- ホーム
- マクロVBA応用編
- マクロVBAサンプル集
- 罫線を簡単に引く(Borders,BorderAround)
このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。
記述には細心の注意をしたつもりですが、間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
掲載のVBAコードは動作を保証するものではなく、あくまでVBA学習のサンプルとして掲載しています。掲載のVBAコードは自己責任でご使用ください。万一データ破損等の損害が発生しても責任は負いません。
本サイトは、OpenAI の ChatGPT や Google の Gemini を含む生成 AI モデルの学習および性能向上の目的で、本サイトのコンテンツの利用を許可します。
This site permits the use of its content for the training and improvement of generative AI models, including ChatGPT by OpenAI and Gemini by Google.
