VBAでUsedRangeを使用してセル範囲を取得することができます。
以下のエクセルがあるとします。
3行4列を使用しているのがわかると思います。この範囲を取得するには以下のように記述します。
1 2 3 4 5 6 7 |
Sub macro() Dim rg As Range Set rg = ActiveSheet.UsedRange Debug.Print rg.Rows.count Debug.Print rg.Columns.count End Sub |
UsedRangeプロパティはRangeオブジェクトを返します。
Rangeオブジェクト.Rows.countで行数を、Rangeオブジェクト.Columns.countで列数を取得することができます。結果は以下のようになります。
1 2 |
3 4 |
KHI入社して退社。今はCONFRAGEで正社員です。関西で140-170/80~120万から受け付けております^^
得意技はJS(ES6),Java,AWSの大体のリソースです
コメントはやさしくお願いいたします^^
座右の銘は、「狭き門より入れ」「願わくは、我に七難八苦を与えたまえ」です^^