Добрый день.
На данном форуме находил много макросов на втавку/удаление строк. Всё работает отлично. Но если перед Sab добавить Private (что бы название макроса не отображалось в списке макросов) то макрос перестаёт вставлять строчку, хотя с ячейками что-то делает. Например (извиняюсь перед автором не смог найти тему, хотя она была недавно):
Так вот: хоть макрос находится в модуле, хоть в модуле листа при добавлении Private перестаёт работать.
Как обойти данную проблему?
На данном форуме находил много макросов на втавку/удаление строк. Всё работает отлично. Но если перед Sab добавить Private (что бы название макроса не отображалось в списке макросов) то макрос перестаёт вставлять строчку, хотя с ячейками что-то делает. Например (извиняюсь перед автором не смог найти тему, хотя она была недавно):
Код |
---|
Sub Li() ActiveCell.EntireRow.Copy Rows(ActiveCell.Row + 1).Insert With Rows(ActiveCell.Row + 1) Intersect(.Cells, range("AD:AF,AJ:AJ,AH:AH,AL:AQ,AS:AS")).ClearContents .Interior.ColorIndex = xlColorIndexNone End With Application.CutCopyMode = False End Sub |
Как обойти данную проблему?