Counting loop for printing a number of tables needed

I need a loop that will only print a certain number of items to a table. I currently have too many items printing to a table and only want 10 items per table. If I have 30 items I need a loop that will create a table until all items in the collection are gone but only giving me 10 to a table. If I need a table, the code will create another. If I do not need a table the loop will end.

This part of the code that tells me how many servers I have:
Set sctLoop = cmc1.Execute
3564 numofserv = CInt(sctLoop("SRVCOUNT"))

At the point the numofserv can be any number. (if I have 30 servers, I only want 10 servers per table) This means the code generates 3 table. If I only have 15, the code will only make 2 tables.
I was thinking of a do until loop

Dim x As integer
x = 0

Condition

Do until numofserv =>0

I have the logic but I don't know where to start or what loop would best fit the out come. HELP!!