Set focus siempre en textbox vacio

H o l a:

Y cómo estás llenado los textbox.

Lo que sucede es que cuando activas el formulario, todos los textbox están en blanco, a menos que, cuando lo activas tengas una rutina que ponga algún texto en los textbox.

Te lo explico en otras palabras, cuando cierras el formulario y vuelves a entrar todos los textbox son borrados.

Pero si estás ocultando el formulario con .Hide y lo vuelves a mostrar con .Show, entonces sería así:

Private Sub UserForm_Activate()
    For Each t In Controls
        If TypeName(t) = "TextBox" Then
            If t.Value = "" Then
                t.SetFocus
                Exit For
            End If
        End If
    Next
End Sub

Los textbox serían revisados en el orden que fueron creados.

Si quieres otro orden de revisión tendrás que poner una lista en el orden que quieres la revisión, por ejemplo:

Private Sub UserForm_Activate()
    If TextBox1 = "" Then
        TextBox1.SetFocus
        Exit Sub
    End If
    If TextBox2 = "" Then
        TextBox2.SetFocus
        Exit Sub
    End If
    If TextBox3 = "" Then
        TextBox3.SetFocus
        Exit Sub
    End If
    If TextBox4 = "" Then
        TextBox4.SetFocus
        Exit Sub
    End If
    '...ect
End Sub

'

S a l u d o s

'

aaaaa!!! ya entendi

Lo que pasa es que los textbox que tengo agarran valor de celdas, es decir que si en el textbox1 agarra el valor de A5 entonces si en A5 tengo algo "FRANCES" entonces cada que inicio el formulario aparece "FRANCES" en el textbox porque tengo programado que eso suceda, entonces quería que si no hay nada en los textbox pues el set focus iría donde no haya nada... tu segundo ejemplo me ayudara GRACIAS DAN! ¿Tengo abierto otra pregunta me pudieses ayudar? Es esta: Modificacion2 de código que traspasa información de una hoja a otra