| |
▼さちきょん さん：
>S2.Cells(2, 5)を選択し、その後E列の最後行まで同じ処理を
>（sheet2)
>したいのですが、(vntData(v, 1))でいいのですか？
>ここのところがよくわかりません。
>よろしくお願いいたします。
こんにちは。
E列のみ処理をしたいということであれば
vntData(v, 1)で大丈夫ですよ。
格納する時点で
vntData = .Resize(lngRows + 1).Value
これは書き換えると
= S2.Cells(2, 5).Resize(lngRows + 1).Value
= Sheets("Sheet2").Range("E2").Resize(lngRows + 1).Value
lngRowsが例えば10だとすると
= Sheets("Sheet2").Range("E2").Resize(11).Value
= Sheets("Sheet2").Range("E2:E12").Value
E列だけがvntDataに格納されています。
vntData(行,列)でvntDataの内容が参照できますが
vntDataには1列分（E列）しか格納されていないので
vntData(v, 1)と列は1にする必要があります。
|
|
やっちん
- 06/2/13(月) 13:43 -
