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

Question

В ячейках в столбце D моей таблицы есть формула, которая использует числа в ячейках столбца C для вычисления ответа.

Тем не менее, я хотел бы, чтобы опция вводила число вместо ячеек в столбце D, которые ячейки в столбце C затем использовали бы в своей формуле. Идея состоит не в том, чтобы стереть формулу в столбце D при вводе числа, а в том, чтобы восстановить формулу, например, при вводе 0 (нуля).

Я хотел бы использовать диапазоны C9:C238 и D9:D238.

Это возможно?

Answer 1

Вы можете достичь этого с помощью этого кода VBA:

Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
Active_Column = 4 'Column where this macro applies
Min_Active_Row = 9 'Min row where this macro applies
Max_Active_Row = 238 ' Max row where this macro applies
Target_Row = Target.Row
Target_Column = Target.Column
If Target_Column = Active_Column Then
    If Target_Row >= MinActive_Row And Target_Row <= Max_Active_Row Then
        If Target.Value = "0" Then
            Target.Value = ActiveSheet.Cells(Target_Row, 3) * 14 'Replace this with your formula
        End If
    End If
End If
Application.EnableEvents = True
End Sub

Перейдите к макросу /VBA, щелкните на листе, где вы хотите, чтобы он работал, и вставьте его справа.