Sub fillemfast()
Range("c2:c35000").Formula = "=a2"
End Sub

--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"Dennis H" <Dennis wrote in message
...
I have a spreadsheet with 35000 rows. Is there an easy way to autofill a
formula for all of the rows instead of dragging down all 35000 rows?