Удаление на листах определенного диапазона - VBA
Формулировка задачи:
Подскажите пожалуйста, как осуществить удаление на листах со 2 по 7 и только 30 столбцов(и только первые 15 сверху строк) после указанного количества столбцов которые надо сохранить (слева на право от столбца А)? - например 10 первых столбцов надо сохранить на листах со 2-7, все остальное надо удалить в диапазоне 30 столбцов и 15 строк сверху
я написал код удаления строк, но нет удобного варианта чтоб просто указываешь количество в какой-то всплывающей таблички при нажатии макроса и все удалялось
попытался так, не выходит с несколькими листами, только с одной активной
Решение задачи: «Удаление на листах определенного диапазона»
textual
Листинг программы
i = Application.InputBox("Удаление", Type:=1) For c = 2 To 7 Worksheets("Лист" & c).Cells(1, i + 1).Resize(15, 30).Delete xlToLeft Next
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д