Range("F2:J2").copy destination:=Range("F2:J"& LastUsedRow)

should do it.

Pete

-----Original Message-----

Columns F to J Row 2 have formulaes that I want to copy
down to the last row
that was used.
I have found the last row used by:
LastUsedRow = ActiveSheet.UsedRange.Row +
ActiveSheet.UsedRange.Rows.Count -1

How can I copy the formulas in col F to J into all rows
down to the LastUsedRow