|
▼やっちん さん:
書き換えていただいた内容でとてもよく理解できました。
お忙しいところ何度もすみません。
どうもありがとうございました!
>▼さちきょん さん:
>>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にする必要があります。
|
|