VBAでセルアドレスに変数を使いたい

VBAでセルアドレスを変数を使って指定したいのですが、どの参考書にも載っていない。RangeやCellsでは特定の番地や相対番地しか指定できないですが。何か方法ありますか。

No.2 ベストアンサー 回答者： keithin 回答日時： 2010/04/13 09:49

sub sample1()

　dim i as long
　for i = 1 to 10
　　range("A" & i) = i
　next i
end sub

sub sample2()
　dim j as long
　for j = 1 to 10
　　cells(1, j) = j
　next j
end sub

sub sample3()
　dim k as long
　for k = 1 to 10
　　range("A1").offset(k, k) = k
　next k
end sub


といったような事でしょうか？

この回答へのお礼

大変ありがとうございました。

お礼日時：2010/04/13 09:53

No.1 回答者： KURUMITO 回答日時： 2010/04/13 09:47

次のような書き方になりますね。

例えばiを行の変数、nを列の変数とした場合にＡ列で行を変えるのでしたら

Range("A"&i) または　Cells(i,1)

行も列も変わるのでしたら

Cells(i,n)

この回答へのお礼

大変ありがとうございました。

お礼日時：2010/04/13 09:55