【Excel2002VBA】Destinationを変数に

Range("A1").Select
Selection.AutoFill Destination:=Range("A1:A10"), Type:=xlFillSeries
Range("A1:A10").Select

の2行目のDestinationの次のセル範囲(Range("A1:A10")の部分)
を変数で表現したいのですが
書き方が分かりません…
ご存知の方、どうか教えてくださいm(_ _)m

No.2 ベストアンサー 回答者： tsukasa-12r 回答日時： 2009/11/10 01:07

Cells(x,y)のxが行だったか列だったか、今ちょっと確認できないのですが、

Range(Cells(x1,y1),Cells(x2,y2))
のような感じで指定してやればよいのではないでしょいか。
列がAで固定なのであれば
Range("A1:A" & CStr(x))
のようなやり方もできます。

この回答へのお礼

Range(Cells(x1,y1),Cells(x2,y2))を参考にしてできました！
回答ありがとうございました。

お礼日時：2009/11/10 06:29

No.1 回答者： hige_082 回答日時： 2009/11/09 23:21

＞Range("A1").Select

＞Selection.AutoFill Destination:=Range("A1:A10"), Type:=xlFillSeries
＞Range("A1:A10").Select

dim Rng as range
set Rng = range("a1:a10")
range("a1").select
selection.autofill destination:= Rng
Rng.select

こんな感じでしょうか

この回答へのお礼

回答ありがとうございます。
ごめんなさい、私の説明不足でした…
行番号の中には配列と、さらにその中に
カウンタの中で値が変わる変数が入ります…

お礼日時：2009/11/10 06:32