El cursor (set focus) se pasa al final del textbox al escribir datos en el

Este problema se me presento hace un momento

Estando tecleando datos en el textbox2 de mi formulario el cursor se paso al final del textbox ejemplo

Debí escribir:

Hola como estas amigo│

Pero de repente hizo esto

Hola c│estas amigo │omo es

¿Aque se debe este problema y como puedo solucionarlo? Ayuda por favor

Esto tiene mi textbox

Private Sub TextBox2_Enter()
'TextBox2.BackColor = RGB(153, 204, 255) 'azul BAJO
TextBox2.ForeColor = RGB(255, 255, 255)
TextBox2.BackColor = RGB(0, 0, 255) 'azul FUERTE
TextBox2.Value = UCase(TextBox2.Value)
Label13.Caption = "1 NOMBRE Y 1 APELLIDO O 2 NOMBRES"
End Sub
Private Sub TextBox2_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox2.BackColor = RGB(255, 255, 255) 'blanco
TextBox2.ForeColor = RGB(0, 0, 0)
If TextBox2.Value = Empty Then
Image1.Visible = False
Else
Image1.Visible = True
End If
TextBox2.Value = UCase(TextBox2.Value)
Label13.Caption = Empty
End Sub
Private Sub TextBox2_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
KeyAscii = Asc(UCase(Chr(KeyAscii)))
End Sub