The multiple IFs in code posted could be changed to nested Select Case!
I don't see any point in using a Do Loop in the posted code!