Logo Hardware.com.br
rssilva_22
rssilva_22 Membro Senior Registrado
193 Mensagens 3 Curtidas

Excel - Macro para impedir que o usuário reexiba uma planilha oculta

#1 Por rssilva_22 27/10/2007 - 00:40
Boa noite, tenho uma planilha que tem uma macro inicial que pede senha para abrir o arquivo.

Dentro desse arquivo eu tenho varias planilha que vão sendo abertas de acordo com os botões que o usuário vai navegando, e isso só fica habilitado se ele ativar as macros ao abrir o arquivo. A arquivo só mostra uma planilha por vez (por exemplo: eu clico no botão plan2, ele oculta a plan1 e abre a pla2 e assim por diante)

Se ele abre o arquivo sem ativas as macros ele consegue ver a primeira planilha, mas a navegação não funciona e os arquivos estão protegidos, no entando ele pode pedir para reexibir as planilhas ocultas.

Gostaria de um codigo de macro para VBA no excel que eu pudesse inserir, assim que a macro que pede senha é acionada, comandos para desabilitar todas as formas que o usuário tem de habilitar as planilhas ocultas, sem no entando, impedi-la definitivamente de ser aberta, pois conforme relatei o usuario utiliza os botões nas planilhas para navegar de uma plan para outra.

Quero fazer isso para progeter melhor os meus arquivos, pois sei que existem varios códigos de macro que quebram a senha que colocamos nas planilhas, mas senhas que estão nas macros ja são bem mais difíceis de quebrar.
Sabem como é, quanto mais complicar para quem for querer quebras as proteçoes do arquivo melhor.


Grato,
Responder
rssilva_22
rssilva_22 Membro Senior Registrado
193 Mensagens 3 Curtidas
#16 Por rssilva_22
29/10/2007 - 16:58
é verdade, tenho que ir no ferramentes / proteger / proteger pasta de trabalho e botar uma senha para proteger as janelas e estruturas.

É so colocar a senha v&r1620* e depois salvar que vai estar redonda.

Estava tirando um monde de coisa da planilha e removi todas as senhas para deixar o arquivo leve e postar e depois esqueci de colocar.
Falow
Rodrigo Sousaanjinho.gif
Acessem: http://www.webboxsite.com.br/Blog. http://www.comprarsite.blogspot.com.br/
Um minuto e um clique a mais na vida de vocês, mas uma visita e algo muito importante para mim...
rssilva_22
rssilva_22 Membro Senior Registrado
193 Mensagens 3 Curtidas
#18 Por rssilva_22
29/10/2007 - 17:08
Não, esta com 1.004.
Ela é usada durante um mês todos e no final chega a 1500 com todos os dados preenchidos.

é uma para cada operador sim.
se vc escolher o operador 1 ou 2 pode ir colocando um "x" em cada quezito que ele for bem.
Depois na planilha "Consolidado" é possível ver um resumo de como esta a equipe em geral.

Não sei se você reparou, mas se vc habilitar a planilha operador 2 e no campo: "Nome do funcionário" vc escrever Nome do Funcionário: Peskz seu nome ira constar automaticamente na planilha consolidado, juntamente com as suas respectivas notas.

Meu próximo passo será criar um modelo de relatório com acesso restrito (dai vou usar o modelo que o brunces postou de macro) com um relatório detalhando os motivos com mais acertos e erros da equipe como um todo.
Mas isso só mais para frente... e vou ter que ver se a planilha não vai ficar muito pesada tbm, as maquinas aqui do trampo, tirando a minha que é um dual core com 2 GB de memoria, trabalham com windows 98.
Rodrigo Sousaanjinho.gif
Acessem: http://www.webboxsite.com.br/Blog. http://www.comprarsite.blogspot.com.br/
Um minuto e um clique a mais na vida de vocês, mas uma visita e algo muito importante para mim...
Peskz
Peskz Super Participante Registrado
482 Mensagens 15 Curtidas
#19 Por Peskz
29/10/2007 - 17:29
Legal rodrigo, seu projeto vai ficar beleza! (ainda mais).

Perguntei pelo tamanho pois tenho planilhas aqui para cadastro de composições, aqui na fabrica, e ja esta com 5 megas com 180 codigos, entao acho que a tendencia eh explodir =)


Agora, vou te alertar pra questao de incompatibilidade entre versoes de excel, aqui no meu trampo, ja tive que desistir de certas planilhas automatizadas pois dava pau em excel de versoes anteriores... =/
rssilva_22
rssilva_22 Membro Senior Registrado
193 Mensagens 3 Curtidas
#20 Por rssilva_22
29/10/2007 - 17:52
Quanto a incompatibilidade eu já estou esperto, faço tudo no excel XP, mesmo tendo o 2007 no meu pc, porque é o mesmo office que as outras maquinas tem.


Quanto ao total de mega eu ja trabalhei com planilhas que tinham até 18 a 35 megas, isso quando trabalhei em uma editora, e o pior tinha uma maquina que era um lixo, deixava calculando todas as formulas e sai para almoças, às 16:00 ela terminava.


Uma dica! que não sei se você sabe, mas quando eu copiava coisas de outras planilhas o arquivo ficavam mais pesado, nao sabia e até hoje não sei porque...então faça um teste.
Ao inves de copiar uma coisa de um modelo de planilha faça na mão, as vezes comigo funciona e o arquivo fica mais leve.
Rodrigo Sousaanjinho.gif
Acessem: http://www.webboxsite.com.br/Blog. http://www.comprarsite.blogspot.com.br/
Um minuto e um clique a mais na vida de vocês, mas uma visita e algo muito importante para mim...
brunces
brunces Tô em todas Registrado
986 Mensagens 76 Curtidas
#22 Por brunces
29/10/2007 - 22:55
rssilva, muito legal o que você tem feito até agora. Bacana! smile.png

Quando criei a planilha para o Peskz, esbarramos em dois "problemas" cruciais:
1) abrir o arquivo sem ativar macros;
2) ter que fechar o arquivo sem salvar.

O número 1 foi solucionado, usando uma macro que salva o arquivo automaticamente antes de ser fechado. No entanto, o número 2 fica inviável com a solução do número 1. Esse é que é o dilema da coisa!!!

No seu caso, se você puder permitir que o arquivo seja salvo toda vez que for fechado, o exemplo que postei aqui para o Peskz poderá ajudá-lo bem. Mas se você tiver o mesmo problema que o Peskz - a possibilidade de usar o arquivo e sair sem salvá-lo - pode ser que ele deixe a desejar em termos de segurança.

Abraço,

Brunces
- Bruno Magalhães - Eu uso Linux (Meu blog, com dicas, sugestões e soluções de problemas relacionados ao Linux)
- Bruno Magalhães - O Blog
- Minimize o Windows Media Player para a bandeja (tray)
rssilva_22
rssilva_22 Membro Senior Registrado
193 Mensagens 3 Curtidas
#23 Por rssilva_22
30/10/2007 - 00:08
é, no meu caso eu não preciso que seja obrigatorio salvar a planilha ao fechar.

Mas na planilha que fiz coloquei um codigo de macro com open_close para proteger a planilha assim que o arquivo fosse fechando, não sei, mas acho que talvez se inserir:
ActiveWorkbook.Save
...

Amanha vou fazer alguns testes para ver se funciona e onde irei esbarrar e vamos conversando a respeito.
Rodrigo Sousaanjinho.gif
Acessem: http://www.webboxsite.com.br/Blog. http://www.comprarsite.blogspot.com.br/
Um minuto e um clique a mais na vida de vocês, mas uma visita e algo muito importante para mim...
rssilva_22
rssilva_22 Membro Senior Registrado
193 Mensagens 3 Curtidas
#25 Por rssilva_22
30/10/2007 - 11:51
Não entendi!
Da forma que esta a planilha é automaticamente protegida quando o arquivo é fechado, independente se é ou não salvo.
No arquivo que eu anexei o processo não esta funcionando pq eu retirei a proteção da janela e estrutura do arquivo (estava pesado e mesmo zipando não dava para postar), se vc for ao menu ferramentas / proteger / proteger pasta de trabalho e marcar a opção janela e estrutura e utilizar a senha: "v&r1620*" e salvar e fechar o arquivo você vai poder ver a diferença.

Da próxima vez que abrir sem ativar macro vc não vai conseguir reexibir as planilhas ocultas.

Se abrir e ativar a macro a proteção de janela e estrutura é automaticamente desativada, e depois, ao fechar é automaticamente ativada, independente se o usuário salvou ou não o arquivo.

Agora no meu caso não é necessário forçar que o usuário salve a planilha, mas se você quiser que o arquivo seja salvo (sem o usuário perceber) abra o editor VBA, vá no modulo 1 e mude a Sub auto_close() e deixe da seguinte forma:

Sub auto_close()
ActiveWorkbook.Protect "v&r1620*", Structure:=True, Windows:=True
ActiveWorkbook.Save
End Sub

Para funcionar o arquivo tem que ser salvo da forma convencional na primeira vez, para que o Excel saiba onde salvar o arquivo.
Rodrigo Sousaanjinho.gif
Acessem: http://www.webboxsite.com.br/Blog. http://www.comprarsite.blogspot.com.br/
Um minuto e um clique a mais na vida de vocês, mas uma visita e algo muito importante para mim...
Peskz
Peskz Super Participante Registrado
482 Mensagens 15 Curtidas
#26 Por Peskz
30/10/2007 - 13:39
Rodrigo, a sua planilha esta assim:

Sub auto_close()
ActiveWorkbook.Protect "v&r1620*", Structure:=True, Windows:=True
End Sub

isto nao vai funcionar...

para funcionar:
Sub auto_close()
ActiveWorkbook.Protect "v&r1620*", Structure:=True, Windows:=True
ActiveWorkbook.Save
End Sub

pois vc precisa proteger e salvar esta configuração.

Faça um teste. Abra seu arquivo original, entre com a senha, salve, feche.
agora abra sem senha, ele estará desprotegido ...
Responder Tópico
© 1999-2024 Hardware.com.br. Todos os direitos reservados.
Imagem do Modal