🚀 go-pugleaf

In the example that I had done, I added the page outside of the SetupPage function then passed the page object to the SetupPage function. 

Of course there are many ways you could do this. Probably as you are adding a page already in the SetupPage function, just add the page in that function, don't pass any arguments to it at all. So change it to just: 
Public Function SetupPage() 

and call it like 
SetupPage 

You want to call it whenever you have output 16 records. You could count records and test for iRecCount Mod 16 = 0 or you could do something like what you're doing, just make sure that it happens after the 16th, 32nd, etc. records. 

I am confused at the way you're iterating through records. I would tend to have rs.movenext right before the Loop, and really just the single Do While Loop rather than loops within loops. It can get you in trouble to put rs.movenext anywhere but within a loop that starts: 
Do While Not.Rs.Eof because you could otherwise hit the end of the recordset.