Very nice solution, thank you Doc, this isn't well documented at all, an expert technique from you there I think, for others I used below. I left the change event so the user can enter more than 4 dp's if desired but is not burdened by many dp's on selection.
Private Sub CtrlName_GotFocus()...