Fóruns
Microsoft Excel - 2...
2024 - VBA & Macros
MACROS EM PLANILHA ...
 
Notifications
Clear all

MACROS EM PLANILHA PROTEGIDA

 
2024 - VBA & Macros
Post Recente por Matheuswsa 9 anos atrás
4 Posts
2 Usuários
0 Reactions
3,007 Visualizações
RSS
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Olá pessoal,
É o seguinte, tenho uma planilha denominada "planilha1" onde existem várias fórmulas, motivo pelo qual esta está protegida por senha sendo que algumas células estão livres para edição que irão compor um banco de dados na "planilha 2" de forma automatizada através de uma macro.
A "planilha 2" que é o BANCO DE DADOS, deverá ser protegida também por senha, afim de evitar edição dos dados alí contidos.
O problema que segue é que estando a "PLANILHA 2" protegida, a macro não consegue colar os dados retirados da "planilha 1" apresentando a mensagem de "Erro em tempo de execução, o método insert da classe range falhou".
Já tentei algumas soluções no VBA sem sucesso!

Desde já agradeço pelo auxílio.

 
Postado : 09/04/2010 12:43 pm
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Luis, você tem de desproteger primeiro e depois proteger novamente.

NO inicio da rotina : ActiveSheet.Unprotect 'Desprotege a planilha
e no final apos efetuar as aoperções : ActiveSheet.Protect 'Protege a planilha novamente.

Veja que nas linhas acima são referentes a Proteção e Desproteção basica, sem senha, se a mesma estiver protegida com senha pode-se usar :
ActiveSheet.Unprotect Password:="suaSenha"
ActiveSheet.Protect Password:="suaSenha"
ou fazer referencia a planilha :
Sheets("Plan1").Unprotect Password:="suaSenha"
Sheets("Plan1").Protect Password:="suaSenha"

[]s

 
Postado : 10/04/2010 9:27 am
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Muito obrigado amigos, é muito bom poder contar com vocês!

 
Postado : 18/04/2010 7:21 pm
 Matheuswsa
(@matheuswsa)
Posts: 0
New Member
 

Luis, você tem de desproteger primeiro e depois proteger novamente.

NO inicio da rotina : ActiveSheet.Unprotect 'Desprotege a planilha
e no final apos efetuar as aoperções : ActiveSheet.Protect 'Protege a planilha novamente.

Veja que nas linhas acima são referentes a Proteção e Desproteção basica, sem senha, se a mesma estiver protegida com senha pode-se usar :
ActiveSheet.Unprotect Password:="suaSenha"
ActiveSheet.Protect Password:="suaSenha"
ou fazer referencia a planilha :
Sheets("Plan1").Unprotect Password:="suaSenha"
Sheets("Plan1").Protect Password:="suaSenha"

[]s

Cara vlw. Me registrei no fórum só pra te agradecer.

 
Postado : 21/06/2015 1:39 pm
Forum Jump:
  Tópico Anterior
Próximo Tópico