View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Tom Ogilvy Tom Ogilvy is offline
external usenet poster
 
Posts: 27,285
Default Help With Autofill

Sub BBCCDD()
Dim rng As Range
Set rng = Cells(Rows.Count, 1).End(xlUp)

Range("B3:C3").AutoFill Destination:= _
Range(Range("B3"), rng.Offset(0, 2))

End Sub

--
Regards,
Tom Ogilvy



"Jason" wrote in message
...
I need help with the autofill file. I am using some code to autofill to

copy
down formulas to the last empty row. The problem I have is that the last

row
is dynamic and may change, which I do not know how to account for. My

code
is as follows:

Range("B3:C3").Select
Selection.AutoFill Destination:=Range("B3:C12")

C12 will not always be the last row. I want the code to look to column A

to
where the last cell with data is, and filldown B3:C3 down to this point.

How
can I adjust the "Destination" part of the code to allow this. Thanks.