Fóruns
Microsoft Excel - 2...
Formulários
Abrir e fechar user...
 
Notifications
Clear all

Abrir e fechar userform automaticamente

 
Formulários
Post Recente por davisao 12 anos atrás
4 Posts
2 Usuários
0 Reactions
2,158 Visualizações
RSS
 davisao
(@davisao)
Posts: 28
Eminent Member
Topic starter
 

Criei um UserForm e quando clico no ícone ele abre automaticamente sem abrir as planilhas do excel

Esta Pasta de Trabalho

(Objeto) Workbook (Procedimento) Open
Private Sub Workbook_Open()
Application.Visible = False 'Oculta o App Excel
ufCadastro.Show
Application.Visible = True 'Exibe o App Excel
End Sub

Até ai tudo bem, mas quando clico no botão Fechar do UserForm ou no botão Sair criado por mim a planilha se abre e é justo o que não quero. Quero cadastrar sem visualizar a planilha, se precisar modificar algum ítem eu clico no botão Editar.

Como fazer isso?

Outra coisa, sendo leigo preciso de informação precisa, ou seja, passo-a-passo.

 
Postado : 05/06/2013 9:41 am
Fernando Fernandes
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa tarde davisao

Seja bem vindo ao fórum!

Estou movendo teu tópico para o sub fórum Formulários, pois este local é exclusivo para a apresentação dos novos integrantes do fórum.

Abraço.

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 05/06/2013 10:41 am
Fernando Fernandes
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa noite!!

Já tentou.........?

Private Sub UserForm_Initialize() 
    Application.Visible = False 
End Sub 

Private Sub UserForm_Terminate() 
    Application.Visible = True 
End Sub

Att

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 05/06/2013 5:34 pm
 davisao
(@davisao)
Posts: 28
Eminent Member
Topic starter
 

Agradecido, a resposta foi satisfatória e resolveu o problema, foi rápido também, muito bom. Obrigado

 
Postado : 05/06/2013 7:14 pm
Forum Jump:
  Tópico Anterior
Próximo Tópico