Boa Tarde.
Estou usando o código abaixo em plans distintas, então declarei o range diferente, como ela esta declarada pra change sempre que altero algo na plan ela roda, mas ela executa a macro na outra plan que também apresenta o mesmo código.
O que eu gostaria de fazer era vincular esse código para que faça a rotina apenas na plan em que estou fazendo alteração e não em qualquer outra que tenha a mesma rotina.
Obs: Cada plan tem o seu código, mas eles entram em conflito.
Private Sub Worksheet_Change(ByVal Target As Range)
Application.ScreenUpdating = False
With ActiveSheet
For Each cell In Range("AB70:AB382")
If cell.Value = "ocultar" Then
cell.EntireRow.Hidden = True
End If
Next
For Each cell In Range("AB3:AB150")
If cell.Value = "reexibir" And (cell.EntireRow.Hidden = True) Then
cell.EntireRow.Hidden = False
cell.EntireRow.Hidden = False
End If
Next
End With
Application.ScreenUpdating = True
End Sub
Postado : 18/02/2013 1:47 pm