エクセルのマクロで指定したところまでのみ入力したい。（行数は不定です）

EXCEL2002 SP3です。
A列のデータが空白になるまでB列に指定したデータを
入力するという作業をしたいと思っています。
A列のデータ数が不定の場合の方法がわからず
range(A1:A20)のように具体的に指定して作業を進めて
います。変数を使えばいいのかspecialcellを使えばでき
るのか自分なりに調べてみたのですがどうにも方法がわか
りません。どうかわかる方教えてください。

No.2 回答者： imogasi 回答日時： 2004/07/15 11:27

（１）With Sheet1

'A列の最終セルを取得
Set endRow = .Range("a65536").End(xlUp)が多いですね。
既回答のRange("A1").End(xlUp).Selectは？
（２）endRow=Range("A1").CurrentRegion.Rows.Count
などもあります。
（３）If Cells(i,"A")="" then
（処理を止める）
のもありうるかも知れない。
また本質問を逸脱しますが、空白があっても３０行までは、処理をするパターンもありうる。
（４）UsedRange、CurrentRegion,xlUpそれぞれクセ（特徴）があるので，注意が必要のようです。

この回答へのお礼

お礼が遅くなりすみません。
ありがとうございます。今週からマクロを業務に活かし
はじめたので分からないことだらけです。
教えていただいたことやってみます。

お礼日時：2004/07/16 15:58

No.1 回答者： oraho 回答日時： 2004/07/15 11:01

A列の最終行までなら

Range("A1").End(xlUp).Selectで最終行を選択できます。
他にもxlup/xldwn/xlWhole/xlPart等指定の方法があります。

マクロの自動生成でVBAを組むなら、範囲指定の際に
全ての範囲なら Ctrl Shift *の３つのキーを押せば全範囲指定になります。
Ctrl ↓なら最終行選択になります。

この回答へのお礼

お礼が遅くなりすみません。
ありがとうございます。今週からマクロを業務に活かし
はじめたので分からないことだらけです。
教えていただいたことやってみます。

お礼日時：2004/07/16 15:58