Automatycznie zmniejsz komórkę „b1” o tej samej wartości, którą zwiększyłem za pomocą komórki „a1”

0

Mam komórkę 1 i komórkę 2. Chcę zwiększyć komórkę 1 o 5 i zmniejszyć komórkę 2 o tę samą liczbę co komórka 1. Czy istnieje sposób na automatyczne wykonanie tego i nie zmienianie ręcznie wartości komórki 2 ? Używam Microsoft Office Excel 2007.

microsoft-excel

— Xhin0210
źródło

3

Czy nie możesz po prostu zrobić matematyki i odnieść się do komórki?

Tak więc w komórce 3 ma liczbę 5.

W komórce 1 do „aktualna wartość + komórka 3” W komórce 2 do „aktualna wartość - komórka 3”

— Dave
źródło

Przykład: pierwotnie umieszczam 6 w komórce 1 i 8 w komórce 2. Następnie zmniejszam komórkę 1 i robię ją 4, chcę, aby komórka 2 automatycznie stała się 10. Czy to możliwe? Dzięki

— Xhin0210,

Czy nie możesz wstawić liczby do komórki 3 za pomocą - lub +? Komórka 1 ma wartość 6, a komórka 2 ma wartość 8, a 3 jest pusta. Wpisanie -3 w komórce 3 spowoduje odjęcie 3 od obu komórek i podobne sposoby dodawania.

— Dave

1

Dodaj ten kod VBA, a następnie wprowadź wartość w kolumnie C, aby zmienić A i 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

— Alan
źródło