この関数について
扱うデータの量が増えると、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」に「斜線」を「中太線」で描画します。
関数リファレンスにはコピペで使用可能な便利関数を多数掲載！
関数リファレンスでは私が開発の中で必要になったコード部品を汎用化・関数化して公開しています。この記事で紹介した関数以外にもコピペで利用できる関数を多数用意しています。検索窓から必要な機能を検索してみましょう！解説記事も続々公開中。
当サイトで公開している関数はすべて下記ライセンスのもとで配布しています。 Copyright (c) 2024 VBA.funcref Released under the MIT license
Comment