Эд написал и спросил о простом макросе:
У вас есть макрос, который может добавлять строки в электронную таблицу (внизу или по указателю ячейки), а затем копировать из предыдущей строки и вставлять данные в новую строку? И, наконец, удалите данные в определенных ячейках.
Вот макрос, который вставит строку над указателем ячейки и скопирует содержимое предыдущей строки. Предположим, ваши данные простираются от A до T, и вы хотите удалить содержимое ячеек новой строки H, K и M.
Я буду использовать ключевое слово ActiveCell, чтобы макрос работал по отношению к указателю ячейки.
Sub AddRowForEd() ActiveCell.EntireRow.Insert Cells(ActiveCell.Row - 1, 1).Resize(1, 20).Copy _ Destination:=Cells(ActiveCell.Row, 1) Cells(ActiveCell.Row, 8).Clear ' Column H Cells(ActiveCell.Row, 11).Clear ' Column K Cells(ActiveCell.Row, 13).Clear ' Column M End Sub
