終わりは、どこに？？？

すべてのものには、終わりがある。

それは人類が逆らえない事実。

データにだって終わりがある。

その終わりは、どこにあるのだろう．．．

*----------------------------------------

Range("A1").Select

Selection.End(xlDown).Select

Owari = Selection.Row

*----------------------------------------

カーソルを、セル「A1」に移動する

「A列」で、データが入っている最後のセルまで、カーソルを移動する

カーソルの「行」の値、つまり、Ａ列の最後の「行」の値が変数「Owari」に入ります。

．．．つまり、

登録されているデータ件数が、「Owari」に登録されるということです。