Você não pode simplesmente fazer as contas e referenciar uma célula?
Portanto, na célula 3 temos o número 5.
Na célula 1, "valor atual + Cell3" Na célula 2, "valor atual - Cell3"
Eu tenho uma célula 1 e uma célula 2. Eu quero aumentar a célula 1 em 5 e diminuir a célula 2 o mesmo número que eu tenho aumentado na célula 1. Existe uma maneira de fazer isso automaticamente e não alterar o valor de Cela 2 manualmente? Estou usando o Microsoft Office Excel 2007.
Você não pode simplesmente fazer as contas e referenciar uma célula?
Portanto, na célula 3 temos o número 5.
Na célula 1, "valor atual + Cell3" Na célula 2, "valor atual - Cell3"
Adicione este código VBA e insira um valor na coluna C para alterar A e B.
Private Sub Worksheet_Change(ByVal Target As Range)
If (Target.Cells.Count <> 1) Then Exit Sub ' one cell only
If (Target = "") Then Exit Sub ' if we pressed delete, do nothing more
If (Target.Column = 3) Then ' we entered value in column C
With Range(Target.Address).Offset(0, -2) ' add it to A
.Value = .Value + Target
End With
With Range(Target.Address).Offset(0, -1) ' subtract it from B
.Value = .Value - Target
End With
Target.ClearContents
Exit Sub
End If
End Sub
Tags microsoft-excel