Evento en VBA Excel con Array para determinados controles

3 envíos / 0 nuevos
Último envío
JoaoM
Imagen de JoaoM
Offline
última acción: Hace 1 año 3 meses
Nivel 1 - 200 puntosNivel 2 - 500 puntosNivel 3 - 1000 puntosNivel 4 - 2000 puntos
alta: 15/12/2011 - 23:46
Puntos: 3040
Evento en VBA Excel con Array para determinados controles

Esta la macro

Private Sub ComboBox2_Change()
Dim i As Double
cbb = ComboBox2

    If cbb = "PERSONA JURIDICA" Then
    caj = Array("Textbox2", "Textbox3", "Textbox4") 'AL ARRAY QUIERO AGREGARLE UN FRAME2 para solo ENABLED true o false TAMBIEN

    For i = LBound(caj) To UBound(caj)
'        If Me.Controls(caj(i)) = Enabled = False Then
        Controls(caj(i)).Text = "NO"
        Controls(caj(i)).Enabled = False
''ADEMAS QUIERO COLOCAR QUE SI NO ES "PERSONA JURIDICA" QUE LOS COLOQUE TRUE Y VACIOS
'        Controls(caj(i)).Text = ""
'        Controls(caj(i)).Enabled = True
'            MsgBox "False: " & (caj(i)), vbExclamation, "ALTA CLIENTES"
'            Exit Sub
'        End If
    Next
    End If
End Sub

Pretendo que la 2ª parte me funcione ademas de quere agregar al Array un Frame2 tambien.

Dejo ejemplo donde en el mismo formulario un label donde explico lo que pretendo

 

pacomegia
Imagen de pacomegia
Offline
última acción: Hace 1 semana 2 días
Nivel 1 - 200 puntosNivel 2 - 500 puntosNivel 3 - 1000 puntosNivel 4 - 2000 puntosNivel 5 - 4000 puntosadministrador
alta: 27/12/2006 - 23:26
Puntos: 11175
hola Joao, hablas de un

hola Joao, hablas de un ejemplo, pero no hay ningún adjunto a tu mensaje

 

------
Ya sé Excel, pero necesito más.

JoaoM
Imagen de JoaoM
Offline
última acción: Hace 1 año 3 meses
Nivel 1 - 200 puntosNivel 2 - 500 puntosNivel 3 - 1000 puntosNivel 4 - 2000 puntos
alta: 15/12/2011 - 23:46
Puntos: 3040
Hola pacomegia. Sal u 2Lo

Hola pacomegia. Sal u 2

Lo resolvi pero la realidad no reuerdo como. si al buscar el detalle lo encuentro, lo dejare para si alguien busca el mismo problema y, si, tienes razon, fue falta mia mencionar el ejemplo y me paso subirlo,

Gracias

 

RESUELTO