I am using this macro:
Dim RowNbr As Long, ws As Worksheet
Set ws = ActiveSheet
For RowNbr = 1 To ws.UsedRange.Rows.Count
If Left(ws.Cells(RowNbr, 1), 5) = "Race:" Then
ws.Rows(RowNbr).PageBreak = xlPageBreakManual
It works 90% of the way. Say I have racers for race 1 on rows 2-5. On row 6, i have the next race # title. Then on row 7-10 in have racers for race 2. If I add racers to race 1, the page break stays above row 6, it does't move down to row 7. So that means all but one racer will be on one page, the last racer is going onto the top of the page with race 2, then below are the racers for race 2. How do i make it so the page brake follows right above the race #, as i add/delete racers?