Crie um botão no seu formulário .
dentro dele cole o seguinte código.
caso tenha alterado o nome da planilha onde esta (planilha1)coloque o nome da sua planilha
Botão para exibir planilhas
Private Sub CommandButton1_Click()
Unload Me
Application.Visible = True
Sheets("planilha1").Select
End Sub
Botão para esconder planilhas atras do formulário (userform)
Dentro do seu editor VBA excel abra (esta pasta de trabalho) ative o evento Workbook
e cole o código salve e inicialize sua planilha para testar.
Lembrando crie primeiro seu botão para exibir as planilhas caso contrario não tera mais acesso as planilhas e não conseguira continuar editando seu projeto.
Código esconder planilhas
Private Sub Workbook_Open()
Application.Visible = falso
UserForm1.Show
End Sub
Nenhum comentário:
Postar um comentário