ExcelVBA 変数を使ってセルを指定して，コピー

mySt.Range( _
mySt.Cells(LstRw, 11), _
mySt.Cells(LstRw, 11)).Value = _
_
Worksheets("Q"). _
Range(Cells(8, 6), Cells(8, 6)).Value

上のプログラムで動きますが，

mySt.Range( _
mySt.Cells(LstRw, 11)).Value = _
_
Worksheets("Q"). _
Range(Cells(8, 6)).Value

こうすると動きません．

なぜでしょうか？

No.1 ベストアンサー 回答者： arata 回答日時： 2001/02/06 08:59

Rangeのヘルプを見てください。

Range(Cell1)

の場合は、Rangeオブジェクトは、指定できません。
A1形式のアドレスや、範囲名を指定することになります。

Range(Cell1,Cell2)

の場合は、A1形式または、Rangeオブジェクトを指定できます。

前者の形で、指定がしたい場合は、

mySt.Range(mySt.Cells(LstRw, 11).Address).Value = _
Worksheets("Q").Range(Cells(8, 6).Address).Value

のように、A1形式のアドレスに変えてしまえば、通ります。

この回答へのお礼

Rangeの使い方があやしいなあと
気づいていましたが・・・

Addressの使い方も教えていただき
ありがとうございます．

お礼日時：2001/02/08 16:34

No.2 回答者： kbonb 回答日時： 2001/02/06 09:22

こんにちは

mySt.Cells(LstRw, 11).Value = Worksheets("Q").Cells(8, 6).Value

といった感じにシンプルにした方が良いんじゃないでしょうか。

参考URL：http://www2.odn.ne.jp/excel/

この回答へのお礼

そうですね．

ありがとうございます．

お礼日時：2001/02/08 16:38