Pessoal, boa noite!
Eu fiz um sistema de login e senha para minha panilha...
codigo do form:
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
' Evita que o usuário feche a tela no 'x' na tela
If CloseMode = vbFormControlMenu Then
MsgBox "Você não pode fechar esta janela, por favor Cancele ou digite seu Login e Senha!!!"
Cancel = True
End If
End Sub
Private Sub CommandButton1_Click()
Configurar = vboknly + vbInformation
If Senha = "123456" Then
MsgBox "Seja Bem Vindo", vbInformation, "Tela de Boas Vindas"
Unload UserForm2
Sheets("Plan1").Activate
Else
MsgBox " Senha incorreta, tente novamente!", vbInformation, "Sistema de Login"
Usuario.Text = ""
Senha.Text = ""
End If
End Sub
Private Sub CommandButton2_Click()
Application.Quit
End Sub
Private Sub CommandButton3_Click()
Unload UserForm2
End Sub
Private Sub Image1_Click()
End Sub
codigo em Pasta de Trabalho para abrir o formuario:
Private Sub Workbook_Open()
UserForm2.Show
End Sub
mais quando abro a planilha no excel, ela abre em segundo plano..e em primeiro plano abre o form para colocar login e senha..
mais eu quero apenas que quando eu clicar para abrir a planilha, apenas abra o form e nao a planilha...e so abrir a panilha apos colocar login e senha...
e ai pessoal, estou voando nessa pois sou novo no excel...
Vídeo recomendado
https://youtu.be/diWPPPhW-9E
https://youtu.be/diWPPPhW-9E
Iniciar com Form
-
- Colaborador
- Mensagens: 12
- Registrado em: Ter Ago 23, 2011 11:07 pm
Re: Iniciar com Form
Boas! Aqui está o código
Depois só tens de pôr Application.Visible = True após reconhecer a password do login para o excel aparecer.
Código: Selecionar todos
Private Sub Workbook_Open()
Application.Visible = False
UserForm2.Show
End Sub