У меня есть ячейка 1 и ячейка 2. Я хочу увеличить ячейку 1 на 5 и уменьшить ячейку 2 на то же число, которое я увеличил в ячейке 1. Есть ли способ сделать это автоматически и не изменять значение ячейки 2 вручную? Я использую Microsoft Office Excel 2007.

2 ответа2

3

Можете ли вы не просто делать математику и ссылаться на ячейку?

Итак, в ячейке 3 есть номер 5.

В ячейке 1 сделать «текущее значение + Cell3» В ячейке 2 сделать «текущее значение - Cell3»

1

Добавьте этот код VBA, затем введите значение в столбец C, чтобы изменить A и 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

Всё ещё ищете ответ? Посмотрите другие вопросы с метками .