Página 1 de 1
Limpar celulas a partir da seleção de outra
Enviado: 19 Nov 2019 às 15:48
por mynssen
Olá caros colegas! Quero limpar uma celula da coluna A quando uma celula da mesma linha da coluna Q for alterada. Consegui fazer somente para um caso, mas gostaria de aplicar com o Rage 3 a 1003, ai que nao consegui evoluir.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$3" Then
Range("Q3").ClearContents
End If
End Sub
Re: Limpar celulas a partir da seleção de outra
Enviado: 19 Nov 2019 às 16:34
por osvaldomp
Experimente:
Código: Selecionar todosPrivate Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [Q3:Q1003]) Is Nothing Then Exit Sub
Cells(Target.Row, 1).ClearContents
End Sub
Limpar celulas a partir da seleção de outra
Enviado: 20 Nov 2019 às 10:11
por mynssen
Ola! a sua logica fez o contrario do que pedi kkkkk era pra apagar os dados da coluna Q quando alterasse a coluna A, mas so inverti e deu certo, obrigado!!!
Re: Limpar celulas a partir da seleção de outra
Enviado: 20 Nov 2019 às 10:36
por osvaldomp
mynssen escreveu:Quero limpar uma celula da coluna A quando uma celula da mesma linha da coluna Q for alterada.
mynssen escreveu:Ola! a sua logica fez o contrario do que pedi kkkkk era pra apagar os dados da coluna Q quando alterasse a coluna A, mas so inverti e deu certo, obrigado!!!
Eu fiz o código com base no que você pediu no primeiro post. Veja aí acima. Lembra disso ?
Se você escreveu errado ... então a trapalhada foi sua
Limpar celulas a partir da seleção de outra
Enviado: 20 Nov 2019 às 12:02
por mynssen
Tens razão meu caro colega! Muito obrigado
