Columns(p).Select
Selection.Delete Shift:=xlToLeft
удаление столбцов по номеру
мне надо удалить столбцы по их номерам
P - это моя переменная, которая имеет цифру - номер столбца
понятно, что это можно сделать в цикле, но когда делаешь в цикле это получается очень долго, поэтому я хочу удалять столбцы по несколько
допустим так, но здесь по именам столбцов, а мне надо по номерам
Код:
P - это моя переменная, которая имеет цифру - номер столбца
понятно, что это можно сделать в цикле, но когда делаешь в цикле это получается очень долго, поэтому я хочу удалять столбцы по несколько
Код:
Columns("F:H").Select
Selection.Delete Shift:=xlToLeft
Selection.Delete Shift:=xlToLeft
допустим так, но здесь по именам столбцов, а мне надо по номерам
Код:
Range(Columns(1), Columns(3)).Select
Selection.Delete Shift:=xlToLeft
Selection.Delete Shift:=xlToLeft
Вопрос на засыпку, а зачем вы выделяете объекты? Для замедления работы макроса ? Первое правило программиста под Excel - стараться как можно реже использовать методы Select и Activate, поэтому пишите просто
Код:
Range(Columns(1), Columns(3)).Delete