この関数について
扱うデータの量が増えると、ExcelVBA（マクロ）でも配列を扱うことが多くなります。データは配列で扱いつつ、結果はシートに配列のデータを貼り付けるということも多いです。その際、大きさが事前に決まっていない配列をシートに貼り付け、同じサイズで罫線を描画したいときがあります。見栄えだけの問題なので、事前に最大取りうる範囲まで罫線を引いておく手もあるものの、こだわりたいときもあります。この関数は指定したRangeに罫線を描画します。
関数コピペ ～コードをクリックするだけでコピー完了！～
使い方 ①引数
引数
| 引数名 | 型 | 参照 | 省略 | 内容 |
|---|---|---|---|---|
| range_obj | Range | ByVal | 不可 | 罫線を描画したい範囲のRangeオブジェクト |
| line_style | XlLineStyle | ByVal | 可 | 罫線の種類を指定するVBA備え付けの定数を指定する。省略した場合は、実線（xlContinuous）とみなす |
| line_weight | XlBorderWeight | ByVal | 可 | 罫線の太さを指定するVBA備え付けの定数を指定する。省略した場合は、中太線（xlMedium）とみなす |
罫線の種類（Sytle）
| 名称 | 定数 |
|---|---|
| なし | xlLineStyleNone |
| 実線 | xlContinuous |
| 点線 | xlDot |
| 2点鎖線 | xlDashDotDot |
| 1点鎖線 | xlDashDot |
| 破線 | xlDash |
| 斜線 | xlSlantDashDot |
| 二重線 | xlDouble |
罫線の太さ（Weight）
| 名称 | 定数 |
|---|---|
| 極細線 | xlHairline |
| 細線 | xlThin |
| 中太線 | xlMedium |
| 太線 | xlThick |
使い方 ②戻り値
この関数に戻り値はありません。罫線を描画して終了します。
サンプルコード（クリックでコピー）
【結果】セルの範囲に罫線を描画することができました
サンプルコードを実行すると、セル範囲「B2:E10」に「斜線」を「中太線」で描画します。
Comment