★Home ★　≪第二章 VBAからみたセル操作≫

9. セル位置や選択したセルの行列数の取得

現在のActiveCellが何行目の何列目にあるのか？
選択した範囲の行は何行なのか列は何列あるのか？
選択したセルの情報を取得できると、応用範囲が広がります。

1. これも、サンプルファイルで確認してもらうのが一目瞭然です。

2. セル範囲.Rows.Count と セル範囲.Columns.Count は、
   選択範囲の行数・列数を取得します。

3. セル.Row と セル.Column は 単体のセルの行番号 列番号 を取得します。
   
   
   ★サンプルファイル 2_009.xls
   
   One Point アドバイス
   とりあえず、
   セル情報が数値で取得できるところに利点がある
   ということを覚えておいて下さい。
   

   記述例

   '----------------------------------------------------------------

   Sub A_01()
       MsgBox "選択した行は " & Selection.Rows.Count & " 行です"
   End Sub

   '----------------------------------------------------------------

   Sub A_02()
       MsgBox "選択した列は " & Selection.Columns.Count & " 列です"
   End Sub

   '----------------------------------------------------------------

   Sub A_03() 
       MsgBox "シートの行は全部で " & ActiveSheet.Rows.Count & " 行です"
   End Sub

   '----------------------------------------------------------------

   Sub A_04() 
       MsgBox "シートの列は全部で " & ActiveSheet.Columns.Count & " 列です"
   End Sub

   '----------------------------------------------------------------

   Sub A_05() 
       MsgBox "Activecellの行番号は " & ActiveCell.Row & " です"
   End Sub

   '----------------------------------------------------------------

   Sub A_06() 
       MsgBox "Activecellの列番号は " & ActiveCell.Column & " です"
   End Sub

   '----------------------------------------------------------------

   Top