Add Header Row To Each Printed Page

I have spent some time looking through the forum and even looked at Microsoft Excel help file and cannot seem to get exactly what I need. I have worksheets that I found the code on this site that I can put page breaks every so many rows. I have it set for 26 so it will break for every 25 counting the header. Here is the

Sub PageBreaks()
For I = 27 To 760 Step 25

ActiveSheet.HPageBreaks.Add Before:= Range("A" & I)
Next I
End Sub

The problem I am having is when I print the first page it has the headers in them, for example.

LastName, FirstName, StuID, GrdLvl

How can I get a row placed right after each page break with with the column headers so each sheet I print will have the headers with the 25 rows of informatio. But then not be there after I print so If I need to sort I won't have a problem with all the headers.