Hmmm, how'd you like to replace 99% of that code with just one line?

Code:
If Ctrl2 Is Me Then ' Ctrl2 and ThisControl are the same
' or another way to skin that cat: If ObjPtr(Me) = ObjPtr(Ctrl2) Then ' the same
Try it.