Página 1 de 1

Bloquear uma célula à partir de uma condição?

Enviado: 21 Abr 2020 às 19:54
por thiagocardia
Olá Osvaldo!

Desculpe a insistência. Sei que você me ajudou
bastante mas conforme vou fazendo a planilha
vai aparecendo outras dúvidas.

Sabe como é... todo início é mais difícil.... :D :D :D

Então; ainda sobre aquela planilha tenho a seguinte
dúvida:

A minha planilha deve ter 101 linhas, como usar o
mesmo código pra linha C7, C8, C9.....Até C101?

Pensei em copiar o código que você me passou e
substituir o nome das células (range). Mas achei
que daria muito trabalho copiar 101 vezes aquele
código. Sem contar o risco de errar.

Será que tem uma opção mais fácil?

A planilha está em anexo pra voce dar uma
olhada

Re: Bloquear uma célula à partir de uma condição?

Enviado: 21 Abr 2020 às 20:20
por osvaldomp
Olá, Thiago.
thiagocardia escreveu: Mas achei que daria muito trabalho copiar 101 vezes aquele
código. Sem contar o risco de errar.
Eu acho que ainda haveria mais dois riscos: primeiro de você contrair tendinite, segundo, ser zuado pelo resto da sua vida se alguma criança do ensino fundamental descobrisse o que você fez ... :D :D :D :D :D :D
Utilize uma cópia deste no lugar do anterior.
Código: Selecionar todos
Private Sub Worksheet_Change(ByVal Target As Range)
 If Intersect(Target, [C6:C101]) Is Nothing Then Exit Sub
 Me.Protect userinterfaceonly:=True
 Select Case Target.Value
  Case "NÃO", "POR IDADE", "CONTRIBUIÇÃO", " ": Cells(Target.Row, 4).Resize(, 6).Locked = False
 Case Else:  Cells(Target.Row, 4).Resize(, 6).Locked = True
 End Select
End Sub

Re: Bloquear uma célula à partir de uma condição?

Enviado: 21 Abr 2020 às 21:11
por thiagocardia
kkkkkk :D :D :D :D :D :D

Com certeza Osvaldo! Seria a maior gafe
feita no excel....kkkkkk :D :D :D :D

Mas ainda bem que deu tudo certo!!!!!!!
Coloquei o código que você forneceu e
funcionou certinho!!!!!

Mais uma vez quero agradecer grandemente
por ter resolvido!!!

Muito obrigado mesmo!!

Abraços!!!!