Saltar al contenido

Como ingresar usuario y clave

publicado

amigo gracias ayudaexcel por dejarme forma parte de su equipo

amigos quería q me colaboren como introducir una clave tengo el usuario al ejecutar la macro pero quiero añadir una clave a cada usuario

la siguiente sentencia la tengo especificada de la siguiente manera

Private Sub CommandButton1_Click()

If Usuario = "" Then MsgBox "Seleccione un usuario": Exit Sub

MsgBox "Bienvenido " & Usuario

Sheets(2).[b49].Value = Usuario

Unload Me

End Sub

Private Sub UserForm_Activate()

Usuario.AddItem "pedro"

Usuario.AddItem "mario"

End Sub

Featured Replies

publicado

adjunta file

Archivado

Este tema está ahora archivado y está cerrado a más respuestas.