- 29 Set 2015 às 12:33
#3767
Boa tarde,
Encontrei essa macro para alterar os números positivos em negativos de uma determinada coluna.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 2 And IsNumeric(Target.Value) Then
If Target.Value > 0 Then
Cells(Target.Row, Target.Column) = Target.Value * -1
End If
End If
End Sub
Porém preciso que apenas determinadas células fossem alteradas (B2:E9) sempre que fosse inserido um valor positivo.
Alguém poderia me ajudar?
Encontrei essa macro para alterar os números positivos em negativos de uma determinada coluna.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 2 And IsNumeric(Target.Value) Then
If Target.Value > 0 Then
Cells(Target.Row, Target.Column) = Target.Value * -1
End If
End If
End Sub
Porém preciso que apenas determinadas células fossem alteradas (B2:E9) sempre que fosse inserido um valor positivo.
Alguém poderia me ajudar?