Hi

Try
Sub Test()
'
' Test Macro
' Macro recorded 05/02/2008 by gaffneyr
'
Dim lastrow as long
lastrow = ws.Cells(Rows.Count, "J").End(xlUp).Row
Range("J2:V2").Select
Selection.AutoFill Destination:=Range("J2:V" & lastrow)
End Sub

I don't think you needed that last Select line.
If you do, then amend it to
Range("J2:V" & lastrow).Select
--
Regards
Roger Govier

"Gaffnr" wrote in message
...
Hi, Very Simple. I dont know macro programming and use the record
functionality.

I used the record facility to create the following.
I copied formulas in cells j2 - V2 down to row 14.
This created the macro below i see when i do the 'step into' button.

Sub Test()
'
' Test Macro
' Macro recorded 05/02/2008 by gaffneyr
'

'
Range("J2:V2").Select
Selection.AutoFill Destination:=Range("J2:V14")
Range("J2:V14").Select
End Sub

Every time I run it, it goes to row 14 only. I want it to run to the last
row of data whatever row the data goes down to, be it 14 or 33,213 etc.
Can anybody edit the above to help me?
Thanks so much
rob



--
Rob Gaffney