How can I edit the following macro to repeat no matter how many rows are in
my spreadsheet?

Sub EnterFix()
'
' EnterFix Macro
' Macro recorded 4/4/2008 by Auskalnis_Jeanne
'

'
Range("A3").Select
ActiveCell.FormulaR1C1 = "213681"
Range("A4").Select
ActiveCell.FormulaR1C1 = "343166"
Range("A5").Select
ActiveCell.FormulaR1C1 = "352980"
Range("A6").Select
ActiveCell.FormulaR1C1 = "355008"
Range("A7").Select
ActiveCell.FormulaR1C1 = "356666"
Range("A8").Select
ActiveCell.FormulaR1C1 = "381720"
Range("A9").Select
ActiveCell.FormulaR1C1 = "384401"
Range("A10").Select
ActiveCell.FormulaR1C1 = "711220"
Range("A11").Select
ActiveCell.FormulaR1C1 = "711320"
Range("A12").Select
ActiveCell.FormulaR1C1 = "711520"
Range("A13").Select
ActiveCell.FormulaR1C1 = "711830"
Range("A14").Select
ActiveCell.FormulaR1C1 = "712380"
Range("A15").Select
ActiveCell.FormulaR1C1 = "713080"
Range("A16").Select
ActiveCell.FormulaR1C1 = "713180"
Range("A17").Select
ActiveCell.FormulaR1C1 = "714080"
Range("A18").Select
ActiveCell.FormulaR1C1 = "714180"
Range("A19").Select
ActiveCell.FormulaR1C1 = "715130"
Range("A20").Select
ActiveCell.FormulaR1C1 = "715150"
Range("A21").Select
ActiveCell.FormulaR1C1 = "715280"
Range("A22").Select
ActiveCell.FormulaR1C1 = "715380"
Range("A23").Select
ActiveCell.FormulaR1C1 = "715480"
Range("A24").Select
ActiveCell.FormulaR1C1 = "715530"
Range("A25").Select
ActiveCell.FormulaR1C1 = "715850"
Range("A26").Select
End Sub