Error 13

[JoaoM]

Total lo pude construir así

Código:

Private Sub ComboBox2_Change()
'CONTROLAMOS QUE PARA, NIF, NIE y CIF SE HABILITE EL TEXTBOX5 Y MAX DE CARACTERES SEAN 9
cmb = ComboBox2
    With TextBox5
        If cmb = "PASAPORTE" Or cmb = "DE ORIGEN" Or cmb = "RESIDENTE" Then
            .Enabled = False
            .Text = "NO"
        Else
            .Enabled = True
            .Text = ""
            .MaxLength = 9
        End If
    End With
End Sub

Hola PerrO
podrias darme una manita en este enlace?
http://www.forosdelweb.com/f90/unir-...todos-1135534/

Se puede cerrar el tema

Solucionado