I just put a 2nd ResetCounter function in the module he originally posted and refreshing it 100 times keeps it starting at 1. So, resets counter, populates row numbers, resets again. Hope this helps!
Module:
Option Explicit
Dim mlngCounter As Long
Function ResetCounter()
mlngCounter = 0
End...