Vídeo recomendado
https://youtu.be/diWPPPhW-9E

Impedir alteração do valor da célula

Fórum para dúvidas sobre os fundamentos da linguagem de programação Visual Basic no contexto do VBA
pvcfsjc
Colaborador
Colaborador
Mensagens: 19
Registrado em: Seg Mar 21, 2016 11:17 pm

Impedir alteração do valor da célula

Mensagem por pvcfsjc »

Pessoal,
Boa Noite

Estou fazendo um projeto no Vba excel e gostaria de proteger os valores da células de algum comando indevido do usuário, como por exemplo, se o usuário apertar alguma tecla e mudar o valor da célula, ou até mesmo apertar o delete e deletar a informação.

Tenho a opção de proteger a planilha, porém os valores da células são dinâmicos, e se eu proteger eu perco essa flexibilidade.

Pensando em uma ficha de cadastro onde tem Nome, Idade, Sexo e Cidade, queria proteger esse banco de dados contra qualquer ação indevida do usuário, porém se ele quiser fazer alguma alteração, usando um botão ("Alterar Dados") seja possível.

Estava tentando fazer um código dentro do "Private Sub Worksheet_Change(ByVal Target As Range)" porém não obtive sucesso.

Alguém poderia me ajudar ?
Anexos
Duvida.jpg
Duvida.jpg (55.34 KiB) Exibido 8537 vezes


Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Avatar do usuário
netocasaroli
Consultor
Consultor
Mensagens: 219
Registrado em: Seg Mai 11, 2015 5:24 pm
Localização: Londrina-PR

Re: Impedir alteração do valor da célula

Mensagem por netocasaroli »

São algumas células específicas que quer proteger?


pvcfsjc
Colaborador
Colaborador
Mensagens: 19
Registrado em: Seg Mar 21, 2016 11:17 pm

Re: Impedir alteração do valor da célula

Mensagem por pvcfsjc »

Olá,

Não é uma célula específica, seria todas.
A idéia é proteger contra algum comando indevido do usuário, como por exemplo se ele esbarrar o dedo em alguma tecla e alterar o valor da célula.
Porém essas células podem ter o valor alterado ao clicar do botão e nesse caso ela não deveria estar protegida e deixar alterar o valor.
É possível fazer isso ?

Desde de já agradeço.


Avatar do usuário
netocasaroli
Consultor
Consultor
Mensagens: 219
Registrado em: Seg Mai 11, 2015 5:24 pm
Localização: Londrina-PR

Re: Impedir alteração do valor da célula

Mensagem por netocasaroli »

É possível sim. Mande seu projeto aqui no fórum, pois fica mais fácil ajudá-lo.


Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


pvcfsjc
Colaborador
Colaborador
Mensagens: 19
Registrado em: Seg Mar 21, 2016 11:17 pm

Re: Impedir alteração do valor da célula

Mensagem por pvcfsjc »

Segue anexo o que eu estou desenvolvendo, ainda está bem no começo e simples.

Desde de já agradeço
Anexos
Cadastro.zip
(27.4 KiB) Baixado 293 vezes


Avatar do usuário
netocasaroli
Consultor
Consultor
Mensagens: 219
Registrado em: Seg Mai 11, 2015 5:24 pm
Localização: Londrina-PR

Re: Impedir alteração do valor da célula

Mensagem por netocasaroli »

É possível proteger a planilha de forma que apenas as alterações através de macros sejam realizadas, fazendo com que qualquer tentativa de edição diretamente na planilha seja proibida. Isso não lhe atende?


pvcfsjc
Colaborador
Colaborador
Mensagens: 19
Registrado em: Seg Mar 21, 2016 11:17 pm

Re: Impedir alteração do valor da célula

Mensagem por pvcfsjc »

Isso atenderia o que eu estou querendo, porém não sei como fazer.


Avatar do usuário
netocasaroli
Consultor
Consultor
Mensagens: 219
Registrado em: Seg Mai 11, 2015 5:24 pm
Localização: Londrina-PR

Re: Impedir alteração do valor da célula

Mensagem por netocasaroli »

Execute no evento Open do Workbokk o seguinte código:

Código: Selecionar todos

Sheets("Plan1").Protect Password:="123", UserInterfaceOnly:=True
A senha você pode mudar conforme melhor lhe atender. Ao executar esse comando, a não ser que a planilha seja desbloqueada, só ocorrerão alterações causadas por macros (VBA). Esse código é para a planilha "Plan1". Você adapte da forma que melhor lhe atender.


pvcfsjc
Colaborador
Colaborador
Mensagens: 19
Registrado em: Seg Mar 21, 2016 11:17 pm

Re: Impedir alteração do valor da célula

Mensagem por pvcfsjc »

Muito Obrigado!
Era exatamente isso que eu estava precisando, vlw !!


pvcfsjc
Colaborador
Colaborador
Mensagens: 19
Registrado em: Seg Mar 21, 2016 11:17 pm

Re: Impedir alteração do valor da célula

Mensagem por pvcfsjc »

Cara, eu tinha feito o teste hoje na empresa usando o Excel 2103 e funcionou, agora estou tentando utilizar o mesmo código no pc de casa e o mesmo não funciona, mesmo utilizando o código eu consigo editar manualmente os valores da células, o excel de casa é o 2010, será que tem alguma incompatibilidade de versões ?

O engraçado que ao tentar proteger manualmente , as células tbm não ficam protegidas.


Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Responder