データベースシートの最下端行を取得するには?

Question 52.1 Previous Next
詳細は こちら 500連発・第2弾を購入しました。
毎日の営業実績を行に商品、列に担当者にして入力した後、別のシートにデータベースの形で1年間保存したいと作ってます。最初に入力した表をコピーしてデータベースの最後列に貼り付ける時に、最後列のAのセルポイントを示すマクロの書き方が分かりません。
自動記録のマクロを作った後、編集したいと思いますのでよろしくお願いします。
Answer   Copyright (C) 2002.3.10 永井善王
入力シートA ご購入ありがとうございます。
入力用のシートを再現してみました。(右図)
質問の文章からは、このシートのA2:E5セル範囲の値を、データベースシートの最後列つまりF列に貼り付けると読み取れるのですが、それでよいでしょうか? つまり、毎日、右方向へ右方向へと貼り付けします。

あるいは、「最後列のAのセルポイント」とありますので、入力用シートは下図のようで、データベースシートにはデータが上から下方向に入っていて A列のデータの最下行を知りたいという意味かなとも思います。この場合は毎日、下方向へ下方向へと貼り付けします。 入力シートB

いずれにしても、データベースシートに入っているデータの最下行か、最右端列を取得する方法がわかれば問題解決するように思います。

このような場合は、この「すぐに役立つエクセルVBAマクロ集」の「
すぐマク検索」のページを活用して検索してみてください。
手っ取り早く検索するには、テキストボックスに「下」とでも入力して[Enter]キーを押すか、[検索]ボタンをクリックすれば該当のマクロが表示されるはずです。
また、「アクティブセル」で検索すれば、あなたのニーズにぴったりのマクロ、つまり、「アクティブセル(アドレス、値、フォント変更、他)」のマクロが表示されるはずで、その中の「アクティブセル領域の行列数を調べる」でよろしいかと思います。

お願い
あなたが質問を送信するのに使われたフォームは、500連発に掲載されたマクロに直接関係するご質問をお受けするために設けているものです。
500連発と無関係の一般のご質問は、掲示板「
Excel VBA Board」か、受付期間限定ですが「期間限定質問」のページをご利用くださるように、ご協力お願いします。

 

Excel VBA Macro