Нужно автозаполнение ячейки формулами из вышестоящих ячеек, при добавлении новой строки. Есть код для макроса, который это выполняет, но там добавление новой строки задан как двойной клик по ячейке. То есть обычным способом, когда добавляешь новую строку формула автоматом не заполняется, но выполняется это действие если сделать двойной щелчок в ячейке (одновременно добавляется новая строка и заполняется формулой). Мне нужно двойной щелчок заменить на обычный способ добавление строки.
Код макроса:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)'Updateby Extendoffice 20160725 Cancel = True Target.Offset(1).EntireRow.Insert Target.EntireRow.Copy Target.Offset(1).EntireRow On Error Resume Next Target.Offset(1).EntireRow.SpecialCells(xlConstants).ClearContents End Sub