Wasn't this answered in another thread very recently?


'br = Cells(Rows.Count, "b").End(xlUp).Row
br=33 'or whatever number you like. See Dave's post
Cells(1, "b").autofill Destination:=Range(Cells(1, "b"), Cells(br, "b"))

--
Don Guillett
SalesAid Software

"Richard" <Richard @discussions.microsoft.com wrote in message
...
I have a macro that will take the formula that that I have in cell B2 and I
need it to be able to do an autofill for me, any suggestions on how to
accomplish this? So far I have the following code:

Selection.AutoFill Destination:=Range("G2:G50")
Range("G2:G50").Select
Range("G2").Select

I don't want it to always autofill to G50 if I can help it, any
suggestions?

Richard