AutoFill Formulas Easy one

[brettvba]

In my code I have
Selection.AutoFill Destination:=Range("E2:G1029")
can I change that so it fills down to however many rows I have whether it be 1029 or 65000,
because my data changes all the time?
I can't think today.

 

[Jay Petrulis]

On 2002-04-08 14:08, brettvba wrote:
In my code I have
Selection.AutoFill Destination:=Range("E2:G1029")
can I change that so it fills down to however many rows I have whether it be 1029 or 65000,
because my data changes all the time?
I can't think today.

Hi,

Try,

lastrow = Cells(Rows.Count, "D").End(xlUp).Row

Selection.AutoFill Destination:=Range("E2:G" & lastrow)

Untested, but should work.

Bye,
Jay

 

[brettvba]

Yeah that works great thanks

 

[First Wob]

Thanks Jay. I had a similar question but all the answers I found seemed too complicated for this rookie. Spent 1 1/2 hours trying to apply them. Took 5 minutes on this and it works great!
This message was edited by First Wob on 2002-04-09 18:16