Rudimentary. But adding this code seems to be working

Code:
Private Sub TextBox1_GotFocus()


    ActiveCell.Select
    
End Sub