vba-help Админ. спросил 5 лет назад
Нужно сделать макрос, чтобы выгружаемый из систем набор данных приводить в требуемый вид (убрать лишние столбцы, добавить новые, отсортировать и подчистить).
Одним из первых шагов добавляю таблицу через Insert -> Table.
ActiveSheet.ListObjects.Add(xlSrcRange, Range(«$A$1:$BV$55»), , xlYes).Name = _
«Table1»
Но количество рядов в таблице непостоянно: сейчас их 48, завтра будет, скажем, 33, а послезавтра 80. Возможно ли задать автоматическое определение диапазона (или хотя бы количества рядов)?
Как вариант, пробовал убрать «нижнюю планку»:
ActiveSheet.ListObjects.Add(xlSrcRange, Range(«$A:$BV»), , xlYes).Name = _
«Table1»
Результат, конечно, есть, но время выполнения макроса увеличивается многократно и получается избыточное количество пустых данных.