hola 
tengo este codigo 
Private Sub TextBox2_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean)
    If IsNumeric(TextBox2) = False Then
        MsgBox ("Debe ingresar un númnero")
        TextBox2 = 1
        'Pasar el enfoque al textbox
        TextBox2.SetFocus 
        'Seleccionar el texto del textbox
        SendKeys "{Home}+{End}"
    End If
End Sub 
quiero que luego de mostrar el msgbox regrese al mismo textbox2 y seleccione su contenido, sin embargo al momento de ejecutarlo el foco pasa al siguiente textbox y no al textbox2, sabe alguien cual es el problema????