SetFocus de vb excel no pasa el foco a donde lo necesito.
Tengo este código, pero he intentado hacerlo por mi cuenta pero no me funciona, pues cada vez que ingreso un dato en el TextBox llamado Codigo y en Titulo tengo "1T" el foco siempre regresa a Titulo, (que es el primero en el orden de tabulación) tengo que presionar nuevamente Enter hasta llegar al TextBox5, y la idea es que al salir del cajón llamado Codigo se valla directamente al TextBox5, agradeceré mucho la ayuda que puedan darme.
Private Sub Codigo_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If Titulo = "1T" Then
On Error Resume Next
Set Busco1 = Sheets("BASE").Range("A2:A12").Find(Trim(Codigo.Value), LookIn:=xlValues, LookAt:=xlWhole)
If Not Ntitulo Is Nothing Then
Ntitulo = Busco1.Offset(0, 1)
valor = "1T"
Cells(Range("B2").End(xlDown).Row + 1, 2) = valor
Cells(Range("B2").End(xlDown).Row, 3) = Ntitulo
Sheets("BASE").Range("R1") = Ntitulo
Titulo = "2R"
TextBox5.SetFocus
End If
End Sub