Vídeo recomendado
https://youtu.be/diWPPPhW-9E
https://youtu.be/diWPPPhW-9E
ROTINA AO ABRIR PLANILHA
ROTINA AO ABRIR PLANILHA
Bom dia,
Tenho uma planilha que utilizo muitas Macros com o objetivo de limitar o acesso de acordo com o usuário.
A intenção é a seguinte: Toda vez que o usuário entra na Planilha ela deve abrir na tela "INICIO" que é onde ele vai clicar no botão para logar com sua senha e ter acesso ao restante da Planilha...
Entretanto existe um falha. Em alguns computadores no qual a configuração de macro do Excel está diferente ele não abre na planilha "INICIO" ele abre em uma planilha que o usuário pode não ter acesso... Ele vai para planilha inicio apenas depois de clicar no botão "Habilitar Macros"
Alguém tem alguma sugestão de como burlar isso, para que sempre abra a Planilha na aba "INICIO" independentemente da configuração da macro?
Tenho uma planilha que utilizo muitas Macros com o objetivo de limitar o acesso de acordo com o usuário.
A intenção é a seguinte: Toda vez que o usuário entra na Planilha ela deve abrir na tela "INICIO" que é onde ele vai clicar no botão para logar com sua senha e ter acesso ao restante da Planilha...
Entretanto existe um falha. Em alguns computadores no qual a configuração de macro do Excel está diferente ele não abre na planilha "INICIO" ele abre em uma planilha que o usuário pode não ter acesso... Ele vai para planilha inicio apenas depois de clicar no botão "Habilitar Macros"
Alguém tem alguma sugestão de como burlar isso, para que sempre abra a Planilha na aba "INICIO" independentemente da configuração da macro?
Re: ROTINA AO ABRIR PLANILHA
ortegaf,
Não sei se entendi o problema todo, mas no seu caso, eu faria toda a configuração no fechamento da planilha. Obviamente você vai precisar executar a planilha uma vez para que elea seja corretamente configurada. A partir deste ponto, você pode trabalhar melhor o fato da planilha início sempre ser a primeira a ser apresentada.
O que recomendo é, sempre que a planilha fechar, oculte todas as planilhas, menos a início. Quando abrir, mostre apenas as que o usuário tiver acesso. Assim, mesmo que o usuário abrir a planilha sem as macros ativadas, ele verá somente a planilha início.
Boa sorte
Não sei se entendi o problema todo, mas no seu caso, eu faria toda a configuração no fechamento da planilha. Obviamente você vai precisar executar a planilha uma vez para que elea seja corretamente configurada. A partir deste ponto, você pode trabalhar melhor o fato da planilha início sempre ser a primeira a ser apresentada.
O que recomendo é, sempre que a planilha fechar, oculte todas as planilhas, menos a início. Quando abrir, mostre apenas as que o usuário tiver acesso. Assim, mesmo que o usuário abrir a planilha sem as macros ativadas, ele verá somente a planilha início.
Boa sorte
-
- Manda bem
- Mensagens: 173
- Registrado em: Qua Mai 17, 2017 2:27 pm
Re: ROTINA AO ABRIR PLANILHA
Primeiro
Faça o que o Tomás disse. Crie uma macro para que antes que a planilha seja fechada ele vá para a planilha Ínicio, e oculte as outras planilhas, assim, quando o Excel for abrir novamente ele vai abrir nesta planilha.
Segundo Habilite as macros do Excel no computador que está tendo esse problema, isso ocorre porque todas as vezes o PC está solicitando a habilitação manual das macros.
Olhe como se faz para habilitar as macros na internet ou siga os passos.
Abra o Excel, vai em;
Arquivo\Opções\Central de Confiabilidade\Configurações de Central de Confiabilidade
Configurações do ActiveX
Habilite – Habilitar todos os controles sem restrições (...)
Desabilite – Modo de Segurança (Ajuda a limitar o acesso do controle...)
Configurações de Macro
Habilite – Habilitar todas as macros (...)
Habilite – Confiar no acesso ao modelo de objetos de projetos do VBA
Modo de Exibição Protegido
Desabilite – As três opções
O Passo primeiro é apenas uma garantia de que as planilhas já estejam ocultas de acordo como o último usuário deixou.
Atenciosamente
Tov Elen Shau
Faça o que o Tomás disse. Crie uma macro para que antes que a planilha seja fechada ele vá para a planilha Ínicio, e oculte as outras planilhas, assim, quando o Excel for abrir novamente ele vai abrir nesta planilha.
Segundo Habilite as macros do Excel no computador que está tendo esse problema, isso ocorre porque todas as vezes o PC está solicitando a habilitação manual das macros.
Olhe como se faz para habilitar as macros na internet ou siga os passos.
Abra o Excel, vai em;
Arquivo\Opções\Central de Confiabilidade\Configurações de Central de Confiabilidade
Configurações do ActiveX
Habilite – Habilitar todos os controles sem restrições (...)
Desabilite – Modo de Segurança (Ajuda a limitar o acesso do controle...)
Configurações de Macro
Habilite – Habilitar todas as macros (...)
Habilite – Confiar no acesso ao modelo de objetos de projetos do VBA
Modo de Exibição Protegido
Desabilite – As três opções
O Passo primeiro é apenas uma garantia de que as planilhas já estejam ocultas de acordo como o último usuário deixou.
Atenciosamente
Tov Elen Shau
-
- Manda bem
- Mensagens: 173
- Registrado em: Qua Mai 17, 2017 2:27 pm
Re: ROTINA AO ABRIR PLANILHA
Private Sub Workbook_BeforeClose(Cancel As Boolean)
'============================================================================================================
' OCULTAR TODAS AS PLANILHAS ANTES DE FECHAR
'============================================================================================================
Dim wb As Worksheet
Dim ws As String
ws = "Início" '===================================Nome da planilha Início/Menu Principal que ficará visível.
For Each wb In Application.ActiveWorkbook.Worksheets
If wb.Name <> ws Then
wb.Visible = xlSheetHidden
End If
Next
'ThisWorkbook.Save 'Se quiser que salve automaticamente antes de fechar, retire a primeira aspa.
End Sub
'============================================================================================================
' OCULTAR TODAS AS PLANILHAS ANTES DE FECHAR
'============================================================================================================
Dim wb As Worksheet
Dim ws As String
ws = "Início" '===================================Nome da planilha Início/Menu Principal que ficará visível.
For Each wb In Application.ActiveWorkbook.Worksheets
If wb.Name <> ws Then
wb.Visible = xlSheetHidden
End If
Next
'ThisWorkbook.Save 'Se quiser que salve automaticamente antes de fechar, retire a primeira aspa.
End Sub