Deshabilitar Botones mediante un login en VBA

Tengo un formulario done ingreso usuario y password, si es correcto me muestra el formulario2 que contiene un menu con tres botones, cada uno ingresa a un formulario x. Lo que necesito es que cuando

Ingrese usuario 1 me habilite en el formulario2 solo 2 botones y el 3 no.

2 Respuestas

Respuesta
2

[Hola 

Te paso la macro para el botón del formulario login

Private Sub CommandButton1_Click()
'Por Adriel
'
'login
    Select Case TextBox1
    Case "clave1"
        With UserForm2
            .CommandButton1.Enabled = True
            .CommandButton2.Enabled = True
            .CommandButton3.Enabled = False ' comando3 desactivado
            .Show
        End With
    Case "clave2"
        With UserForm2
            .CommandButton1.Enabled = True
            .CommandButton2.Enabled = False ' comando2 desactivado
            .CommandButton3.Enabled = True
            .Show
        End With
        '
    Case "clave3"
        With UserForm2
            .CommandButton1.Enabled = False ' comando1 desactivado
            .CommandButton2.Enabled = True
            .CommandButton3.Enabled = True
            .Show
        End With
    End Select
Unload Me
End Sub

No me ayudo mucho tu código. Pero me dio una idea y me salio. Pero gracias por la molestia de responder mi pregunta

bien saludos!

Respuesta

Reconozco que de Excel sé poco, más bien nada, pero has probado, en el evento Al abrir del formulario2 poner( suponiendo que el cuadro de texto del formulario1 donde vas a escribir o elegir el usuario se llame así Usuario)

If currentproject.allforms("formulario1").isloaded then

if forms!formulario1!usuario="usuario1" then

commandbutton1.visible=false

commandbutton2.vissible=false

end if

end if

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas