【ExcelVBA】データの最終列を取得する

◎データの最終列を取得する

前回の記事では、データの最下段を取得する方法を記載しましたが、今回はデータの最終列の取得です。右端がどこか、ってことですね。

最下段の取得方法と書き方はとても似ている、というか、こういう構文なんだな、って併せて丸暗記しておくのをお勧めします。

そしてこっちのコツもただひとつ。
「データが必ず入っているレコード（行）を指定」することです。
空白が許されているレコード（行）で指定すると正しい値が取れないので、それだけを気を付けてください。

’---

'データの最終列を格納する変数をLastClmとします
Dim LastClm As Long

’1行目のエクセルの一番右（16384列）から左に向かって検索して、最初にぶちあたる値が何列めかを取得します
LastClm = ActiveSheet.Cells(1,Columns.Count).End(xlToLeft)

’---

Excel マクロ&VBA [実践ビジネス入門講座]【完全版】 「マクロの基本」から「処理の自動化」まで使えるスキルが学べる本気の授業 【Excel 2019/2016/2013 & Office 365対応】

ではまた。