Всем доброго дня!
На форуме встретил макрос для создания копии строки. Макрос срабатывает по событию двойного клика по ячейке. Для очистки отдельных ячеек в макросе указывается их расположение по названиям колонок.
Мне нужно создать таблицу, состоящую из большого количества колонок, в которых будут как данные для расчетов, так и формулы.
На форуме встретил макрос для создания копии строки. Макрос срабатывает по событию двойного клика по ячейке. Для очистки отдельных ячеек в макросе указывается их расположение по названиям колонок.
Код |
---|
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Target.Count > 1 Then Exit Sub If Target.Column > 1 Then Exit Sub Application.ScreenUpdating = False Rows(Target.Row).Copy: Rows(Target.Row).Insert Cells(Target.Row, "I").Select: ActiveCell.ClearContents End Sub |
Можно-ли внести изменения в данный макрос, чтобы в созданной копии строки происходила очистка данных всех ячеек, не содержащих формулы, не зависимо от их расположения?