どこまでデーターが入っているか捜すには?

Question 10.3 Previous Next
ワークシートをデーターベースとみなし、新しいデータを入力する際、現在どこまで(どの番号まで)データーが入っているか捜すマクロプログラムを教えてください。

氏名フォーム 左図の氏名フォームは、別の場所(入力フォーム)で記入したデータを、このフォームのNO.の次項目を検索して、書き込むようにしたいのです。

たとえば新しい人間のデータを入れたいとき、自動的にNo.5の行を検索し、そこに書き込む、という具合にしたいのです。
Answer   Copyright (C) 1998.9.14 永井善王
MACROの「範囲選択」のページ に 「2)範囲を検出して選択」 があります。
その中の 「Sub データの入ってない行を調べて選択する_罫線ある表()」 として掲載しておきましたので、見てください。
新しい人間のデータは、 Range(Cells(下, 1), Cells(下, 1)).Select して貼り付けます。

【参考】 罫線のないシートの場合は、
MACROの「範囲選択」のページ に「2)範囲を検出して選択」があります。
その中の 「Sub シートの下端と右端を調べて範囲選択する()」 で、「下」 に検出された値がデーターが入っている番号、つまり行番号になります。

 

Excel VBA Macro