ExcelVBA,指定したセル範囲の列数を取得して変数に格納する

スポンサーリンク

鍛錬 612

ExcelVBA,指定したセル範囲の列数を取得して変数に格納する

指定したセル範囲の列数を取得して変数に格納するには、Columns プロパティを使用します。
 
使用方法は、以下に示す通りです。

変数 = Selection.Columns.Count
スポンサーリンク

マクロ

以下は、指定したセル範囲の列数を取得するマクロ、GetCountColumns() です。

今回は、セル範囲 B3:F5 の列数を取得して変数に格納し、MsgBox で変数の値を表示しています。

選択するセル範囲
B3:F5
Sub GetCountColumns()
    Dim num As Long
    
    ' 列数を取得するセル範囲を選択
    Range("B3:F5").Select
    
    ' 指定した範囲の列数を取得
    num = Selection.Columns.Count
    
    MsgBox num
End Sub
スポンサーリンク

実行結果

以下は、マクロ GetCountColumns() の実行結果です。

セル範囲 B3:F5 の列数は、5 であることが分かりました。

列数を取得した様子

タイトルとURLをコピーしました