Proteção de planilh...
 
Notifications
Clear all

Proteção de planilhas após um tempo determinado

8 Posts
3 Usuários
0 Reactions
1,504 Visualizações
(@mardr)
Posts: 19
Active Member
Topic starter
 

Olá Caros e ilustres Colegas do Planilhando...
Há possibilidade de criar um código em VBA, para que a planilha, com dados relevantes que inicialmente esteja seja sendo ajustadas e portanto totalmente desprotegida (por necessidade atual) e aberta no meu pc, e imaginando o meu "esquecimento" e na minha ausência temporária do ambiente de trabalho - e que mesmo assim - a mesma possa ser totalmente protegida nos campos devidos de forma automática ao se passar um tempo determinado, por exemplo uns 3 a 5 minutos por ai?

Tomara que fiz entender na minha dúvida que se traduz em um verdadeiro desavio - que tentei a sua solução,mais em vão, por isso posto a dúvida neste fórum!

Grato,
Marcelo Adriano
Belo Horizonte/MG

 
Postado : 23/03/2017 9:29 am
(@mprudencio)
Posts: 2749
Famed Member
 

Que tipo de proteção vc pensa?

Proteger com Senha?

Fechar o arquivo?

Enfim!

Qual a sua ideia?

Marcelo Prudencio
Microsoft Excel Brasil no Facebook

"Começar já é a metade do caminho."
Autor Desconhecido

Simplifica que simples fica.
Nicole Tomazella.

"O Simples é Sempre Melhor Que o Complicado"
Jorge Paulo Lemann.

 
Postado : 23/03/2017 11:17 am
(@mardr)
Posts: 19
Active Member
Topic starter
 

Olá MPrudencio
Inicialmente, seria a proteção para que não ocorra alteração nos dados da planilha.
O ideal seria fazer a proteção Sheets.protect com a senha, pois assim protegeria os campos mais importante, evitando adulteração dos dados.

Obrigado pela ajuda inicial

Grato,
Marcelo Adriano
Belo Horizonte/ MG

 
Postado : 23/03/2017 2:35 pm
(@mprudencio)
Posts: 2749
Famed Member
 

Se vc ja usa macros é so manter a planilha protegida.

Da pra usar o evento ontime mas ele vai rodar durante toda a execução da planilha e isso pode se tornar chato.

Não sei se da pra fazer algo para que o evento dispare caso a planilha nao seja alterada a cada x minutos por exemplo.

Marcelo Prudencio
Microsoft Excel Brasil no Facebook

"Começar já é a metade do caminho."
Autor Desconhecido

Simplifica que simples fica.
Nicole Tomazella.

"O Simples é Sempre Melhor Que o Complicado"
Jorge Paulo Lemann.

 
Postado : 24/03/2017 8:11 am
nagibsalha
(@nagibsalha)
Posts: 44
Eminent Member
 

Não sei se da pra fazer algo para que o evento dispare caso a planilha nao seja alterada a cada x minutos por exemplo.

Isso seria ótimo!

Vi algo parecido neste link:
http://www.clubedohardware.com.br/forum ... sem-macro/

"Se você for... você vai."

 
Postado : 24/03/2017 8:37 am
(@mardr)
Posts: 19
Active Member
Topic starter
 

Olás MPrudencio e nagibsalha
Por isso mesmo que descrevi: essa dúvida se torna um verdadeiro desafio!
Acho que poderia fazer o teste conforme mencionado pelo nagibsalha sempre executar a x tempo a verificação de proteção, desde que não traga danos e não afete o desempenho da planilha salvo isso tudo bem.... e talvez podemos usar um condição if de liga e desliga o ontime seria possivel? e como faço para estipular esse x tempo e agregá-lo no meu código?

A rotina que uso no evento Private Sub WorkbookOpen é a seguinte:
rivate Sub Workbook_Open()
For I = 1 To Sheets.Count

With Sheets(I)

If .CodeName <> "Plan4" Then

Sheets(I).Protect 'ação a ser executada em caso de positivo

Else

Sheets(I).UnProtect 'ação a ser executada em caso de negativo

End If
End With
Next
no caso esse código teria que ser modificada e declarado na própria plan sem módulos ficando assim na plan1.Protect, como faço para inclusão do ontime pois nunca trabalhei com esse recurso.
Obrigado a vocês;;;
Grato
Marcelo Adriano

 
Postado : 24/03/2017 2:04 pm
(@mardr)
Posts: 19
Active Member
Topic starter
 

Ainda em aberto...

 
Postado : 27/03/2017 3:15 pm
(@mardr)
Posts: 19
Active Member
Topic starter
 

Olá Planilhandos...
Para quem tiver interessem, segue:
Resposta para a duvida posta, esta no link da vídeo aula realizado e pelo canal do YOUTUBE CANAL SGP - Publicado em 02/04/2017. Excelenteaula diga-se de passagem.
https://www.youtube.com/watch?v=C5RzvEdnoqs

Grato,
Marcelo Adriano
Belo Horizonte/ MG

 
Postado : 02/04/2017 8:02 pm