В этом руководстве будет показано, как использовать VBA для вставки строк и столбцов в Excel.
Чтобы вставить строки или столбцы, мы будем использовать Вставить метод.
Вставить одну строку или столбец
Вставить новую строку
Чтобы вставить одну строку, вы можете использовать объект Rows:
| 1 | Рядов (4). |
Или вы можете использовать Range Object вместе с CompleteRow:
| 1 | Диапазон ("b4"). Целый ряд. Вставить |
Вставить новый столбец
Подобно вставке строк, мы можем использовать объект Columns для вставки столбца:
| 1 | Колонны (4) .Вставка |
Или объект Range вместе с CompleteColumn:
| 1 | Диапазон ("b4"). Весь столбец. Вставить |
Вставить несколько строк или столбцов
Вставить несколько строк
При вставке нескольких строк с помощью объекта Rows необходимо вводить строки в кавычках:
| 1 | Ряды ("4: 6"). Вставить |
Вставка нескольких строк с помощью объекта Range работает так же, как и с одной строкой:
| 1 | Диапазон ("b4: b6"). Целый ряд. Вставить |
Вставить несколько столбцов
При вставке нескольких столбцов с помощью объекта Columns введите столбец письма в цитатах:
| 1 | Столбцы ("B: D"). Вставить |
Вставка нескольких столбцов с помощью объекта диапазона работает так же, как и с одним столбцом:
| 1 | Диапазон ("b4: d4"). Весь столбец. Вставить |
Вставить - Shift и CopyOrigin
В Вставить метод имеет два необязательных аргумента:
- Сдвиг - В каком направлении сместить клетки
- CopyOrigin - Какое форматирование ячеек копировать (вверху, внизу, слева или справа)
Аргумент Shift не имеет значения при вставке целых строк или столбцов.. Это только позволяет указать, что нужно сдвигать вниз или вправо:
- xlShiftDown - Сдвинуть ячейки вниз
- xlShiftToRight - Сдвинуть ячейки вправо
Как видите, вы не можете сдвинуть вверх или вправо.
В CopyOrigin аргумент имеет два потенциальных входа:
- xlFormatFromLeftorAbove - (0) Новые вставленные ячейки принимают форматирование от ячеек выше или слева
- xlFormatFromRightorBelow (1) Новые вставленные ячейки принимают форматирование от ячеек ниже или справа.
Давайте посмотрим на несколько примеров CopyOrigin аргумент. Вот наши исходные данные:
В этом примере будет вставлена строка с форматированием из указанной выше строки.
| 1 | Строки (5) .Insert, xlFormatFromLeftOrAbove |
В этом примере будет вставлена строка с форматированием из следующей строки.
| 1 | Строки (5) .Insert, xlFormatFromRightOrBelow |
Другие примеры вставок
Вставить скопированные строки или столбцы
Если вы хотите вставить скопированную строку, используйте следующий код:
| 12 | Диапазон ("1: 1"). КопироватьДиапазон ("5: 5"). Вставить |
Здесь мы копируем строку 1 и вставляем ее в строку 5.
Вставить строки на основе значения ячейки
Это будет проходить через диапазон, вставляя строки на основе значений ячеек:
| 1234567891011 | Sub InsertRowswithSpecificValue ()Тусклая ячейка как диапазонДля каждой ячейки в диапазоне ("b2: b20")Если cell.Value = "insert" Тогдаcell.EntireRow.InsertКонец, еслиСледующая ячейкаКонец подписки |
Удалить строки или столбцы
Чтобы удалить строки или столбцы, просто используйте Удалить метод.
| 1234567 | Ряды (1) .Удалить.Диапазон ("a1"). Целая строка.УдалитьСтолбцы (1) .УдалитьДиапазон ("a1"). ВесьСтолбец.Удалить |
