Создать новую строку и скопировать ячейки, удовлетворяющие условию.

[druzimm3]

Здравствуйте Уважаемые участники Клуба!

Как всегда вопрос жизни или смерти, получил задание на работе, обязан показать результат.
Имеется таблица, необходимо создать макрос добавляющий новую строку в том месте, где стоит курсор. Притом скопировать некоторые вышестоящие ячейки, если они удовлетворяют условию. Задача казалось бы простая, но я не силен в макросах.
Вложил таблицу с примером, там я добавляю строку 8.

ЗЫ Хотелось бы также узнать как сделать чтобы при каждом добавлении новой ячейки в определенной ячейке считался номер, т.е. типа счетчика кликов.

[EducatedFool]

Вложил таблицу с примером

Может, вы вкладывали и таблицу, но вложилась почему-то картинка...
А с картинками следует обращаться на форум по Фотошопу.

Нужен пример в виде книги XLS с примерами "до" и "после" нажатия волшебной кнопки, добавляющей строку.

[druzimm3]

Думал с картинкой будет проще... Вот Excel файл, надеюсь понятно, там наверху что было, внизу как таблица должна выглядеть после форматирования.
Спасибо

[EducatedFool]

Макрос:

Sub Insert_Row()
    On Error Resume Next
    ActiveCell.EntireRow.Insert
    With ActiveCell.EntireRow
        .Cells(1) = .Cells(1).Offset(-1)
        .Cells(4) = Intersect(Columns(3), Range("1:" & .Row)).Find("_", , , , , xlPrevious)
    End With
End Sub

Пример файла с макросом: http://excelvba.ru/XL_Files/Sample__...__18-51-09.zip

[druzimm3]

Спасибо, это то что надо! Как же вы мне помогли!

[druzimm3]

К стати, можно ли как-то сделать чтобы в определенной ячейке считался порядковый номер и при каждом запуске макроса по добавлению строки номер увеличивался на 1?

[druzimm3]

EducatedFool, скажите пожалуйста, а как быть на таком примере если все остается как прежде, только в колонку D программа выводит значение колонки В, если нашла совпадение в С.