Este fórum está sendo desativado

[Renato1968]

Boa tarde à Todos,

Gostaria de esclarecer uma situação que encontrei num trabalho que realizei em VBA.

Criei uma tela de login que é apresentada na abertura da planilha. Porém, antes de apresentar a tela de login, está sendo executada uma rotina que oculta todas as barras e menus e torna a tela expandida.

Seria possível essa etapa de ocultar barras e menus e expandir tela só processar após a confirmação do login ?

Desde já agradeço.

[mprudencio]

É so vc tirar o codigo de dentro do evento Workbook Open e colocar no botão que vc clica apos digitar a senha correta.

[Renato1968]

Boa tarde @mprudencio,

Obrigado por me responder. Me desculpe, mas sou novo no VBA.

Acessei o código do formulário que criei e acrescentei o código (lsLigarTelaCheia) para acionar a tela cheia, conforme demonstrado abaixo, porém, o problema continua.

Será que fiz certo ? Poderia analisar e me esclarecer ?

Desde já agradeço.



Private Sub CommandButton1_Click()
If TextBox1 = "adm" And TextBox2 = "123" Then
Application.Visible = True
Unload Me
Else
MsgBox "Usuário ou Senha Incorretos !", vbInformation, "ERRO"

End If

End Sub

Private Sub Workbook_Open()
lsLigarTelaCheia
End Sub

Private Sub CommandButton2_Click()
Unload Me
ThisWorkbook.Close

End Sub
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)

If CloseMode = vbFormControlMenu Then
Cancel = True

End If

End Sub