この記事では、VBAを使ってExcelのセルの上辺・下辺・右辺・左辺に線を引く方法を実際のVBAコードも含めて紹介します。
前回の記事では、格子罫線や外枠罫線の引き方を説明しましたが、今回紹介する方法では、セルの1辺のみに罫線を引くことができます。見かけ上、線のみになりますので、多様な使い道があるでしょう。
あわせて読みたい
![](data:image/gif;base64,R0lGODlhAQABAAAAACH5BAEKAAEALAAAAAABAAEAAAICTAEAOw==)
![](https://webs-studio.jp/program/wp-content/uploads/2021/11/Pro_VBA罫線_Eye60-300x158.jpg)
VBAで格子・外枠に罫線を引く│罫線の範囲や種類、太さ、色の指定
この記事では、VBAを使ってExcelのシートに罫線を引く方法を実際のVBAコードも含めて説明します。 VBAで罫線を引く場合には、格子罫線や外枠のみの罫線、また、罫線を引…
![](https://webs-studio.jp/program/wp-content/uploads/2021/11/Pro_VBA四辺罫線①.jpg)
![](https://webs-studio.jp/program/wp-content/uploads/2021/11/Pro_VBA四辺罫線②.jpg)
それぞれのVBAコードを紹介しますので、ご参考になれば幸いです。
目次
VBA│セルの四辺に線を引く
この章では、ExcelのセルC3の四辺に線を引くVBAコードを紹介します。
![](https://webs-studio.jp/program/wp-content/uploads/2021/11/Pro_VBA四辺罫線①.jpg)
![](https://webs-studio.jp/program/wp-content/uploads/2021/11/Pro_VBA四辺罫線③.jpg)
![](https://webs-studio.jp/program/wp-content/uploads/2021/11/Pro_VBA四辺罫線②.jpg)
基本構文
object . Borders(index).LineStyle = xlContinuous
- object = 罫線を引くセル(範囲)
この例では、C3です - Borders = 罫線を引くプロパティ
- (index) = 線を引くセルの位置
- LineStyle = 罫線のスタイル
この例では実線(xlContinuous)を使います
線を引く位置を設定するindex
線を引く位置 | インデックス |
---|---|
セルの上辺 | xlEdgeTop |
セルの下辺 | xlEdgeBottom |
セルの左辺 | xlEdgeLeft |
セルの右辺 | xlEdgeRight |
範囲の内側のみの横線 | xlInsideHorizontal |
範囲の外側のみの縦線 | xlInsideVertical |
右下がりの斜線 | xlDiagonalDown |
右上がりの斜線 | xlDiagonalUp |
実例を図解で紹介
上辺_xlEdgeTop
![](https://webs-studio.jp/program/wp-content/uploads/2021/11/Pro_VBA線①.jpg)
下辺_xlEdgeBottom
![](https://webs-studio.jp/program/wp-content/uploads/2021/11/Pro_VBA線②.jpg)
左辺_xlEdgeLeft
![](https://webs-studio.jp/program/wp-content/uploads/2021/11/Pro_VBA線③.jpg)
右辺_xlEdgeRight
![](https://webs-studio.jp/program/wp-content/uploads/2021/11/Pro_VBA線④.jpg)
内側横_xlInsideHorizontal
![](https://webs-studio.jp/program/wp-content/uploads/2021/11/Pro_VBA線⑦.jpg)
内側縦_xlInsideVertical
![](https://webs-studio.jp/program/wp-content/uploads/2021/11/Pro_VBA線⑧.jpg)
右下がり斜線_xlDiagonalDown
![](https://webs-studio.jp/program/wp-content/uploads/2021/11/Pro_VBA線⑥.jpg)
右上がり斜線_xlDiagonalUp
![](https://webs-studio.jp/program/wp-content/uploads/2021/11/Pro_VBA線⑤.jpg)