excel： マクロ表記について

質問

マクロ表記について

Range("E2").Select
Selection.AutoFill Destination:=Range("E2:E2153"), Type:=xlFillDefault
上記はＥＸＣＥＬのマクロの式なのですが、この2153という数字が
d = Range("A65536").End(xlUp).Rowのdという値と同じ場合、2153という数字をださないでｄを使った表現ができますか。

回答No.2

taocat · ベストアンサー

こんにちは。

質問のようにセルE2の式をコピーするだけなら、Selectは不要です。
---------------------------------------------------

Sub Test()
　Dim d As Long
　d = Range("A65536").End(xlUp).Row
　Range("E2").AutoFill Destination:=Range("E2:E" & d), Type:=xlFillDefault
End Sub
-----------------------------------------------------

以上です。

お礼

おかげで解決.どうもありがとうございました。

回答No.1

driverII

Selection.AutoFill Destination:=Range(Cells(2,5),Cells(d,5)), Type:=xlFillDefault

では・・・

お礼

おかげで解決.どうもありがとうございました。