Добрый день!
Помогите, пожалуйста, с написанием макроса, выполняющего следующую функции:
- макрос фильтрует умную таблицу по первому столбцу, искомое значение задается в ячейке I9
- макрос копирует найденные по фильтру строки и вставляет их в конец таблицы (сразу после последнего заполненного значения) как значения.
Вот тут у меня было несколько вариантов и все не дают нужного результата..
Как только не пробовал - все время получается ерунда.
Заранее спасибо.
Помогите, пожалуйста, с написанием макроса, выполняющего следующую функции:
- макрос фильтрует умную таблицу по первому столбцу, искомое значение задается в ячейке I9
Код |
---|
ActiveSheet.ListObjects("Таблица1").Range.AutoFilter Field:=1, Criteria1:=Cells(1, 9) |
- макрос копирует найденные по фильтру строки и вставляет их в конец таблицы (сразу после последнего заполненного значения) как значения.
Вот тут у меня было несколько вариантов и все не дают нужного результата..
Как только не пробовал - все время получается ерунда.
Заранее спасибо.