Excel VBA Вставить строку

Поскольку в этом слове есть две вещи, одна - VBA, а другая - Insert Row. В этом я объясню, как вставить строку в Excel, используя VBA (Visual Basic для приложений).

VBA - это язык программирования для тех, кто работает в Excel и других программах Office, поэтому можно автоматизировать задачи в Excel, написав так называемые макросы. Используя кодирование VBA, мы можем выполнять практически все задачи, которые мы выполняем в Excel, так как мы можем копировать, вставлять, удалять и т. Д.

Вставить строку - используется для вставки строки в Excel между другой строкой с помощью автоматизации, т.е. одним щелчком мыши.

Предположим, что мы вводим данные сотрудника в Excel, и мы пропустили некоторых сотрудников и хотим вставить данные недостающих между ними, поэтому нам нужно создать пробел и вставить строку для ввода их данных. Вместо вставки строки одна за другой мы можем автоматизировать задачу вставки строк с использованием VBA и создания макросов.

Есть много способов, с помощью которых мы можем вставить строки, используя кодирование VBA. Функция, используемая для вставки строки в VBA:

Диапазон (). Ряд (). EntireRow.Insert

Давайте рассмотрим, у нас есть набор данных, который состоит из столбцов, таких как Имя клиента , Продукт, Продажи, Количество, Стоимость доставки, Приоритет заказа.

Предположим, что нам нужно сместить столбцы вниз, чтобы вставить 3 новые строки между 3 и 4, чтобы вставить новую отсутствующую запись. Вместо того, чтобы вставлять строку один за другим, мы автоматизируем это, чтобы вставить все 3 строки одним щелчком мыши.

Как вставить строки в Excel VBA?

Ниже приведены различные примеры вставки строк в Excel с использованием кода VBA.

Вы можете скачать этот шаблон Excel для вставки строк VBA здесь - Шаблон Excel для вставки строк VBA

Пример № 1 - Использование всей строки

Выполните следующие шаги, чтобы вставить строки в Excel, используя код VBA.

Шаг 1: Для создания макроса нам нужно выбрать вкладку «Разработчик».

Шаг 2. После открытия вкладки «Разработчик» вставьте кнопку из группы «Элементы управления». Нажмите « Вставить» и выберите первый вариант из элементов управления ActiveX. Как вы можете видеть эту командную кнопку .

Шаг 3: Перетащите стрелку в любую ячейку, чтобы создать командную кнопку.

Шаг 4: Чтобы войти в функцию «Вставка», щелкните правой кнопкой мыши на кнопке «Командный», т. Е. Вставьте 3 строки и нажмите « Просмотреть код»

Шаг 5: Когда вы нажимаете на Просмотр кода, появляется следующий код.

Код:

 Частный Sub CommandButton1_Click () End Sub 

Шаг 6: Мы должны написать наш код INSERT ROW. Как упоминалось ранее, мы должны использовать функцию Rows.EntireRow с RANGE в VBA. В этом коде мы должны вставить 3 между 3- м и 4- м .

Код:

 Private Sub CommandButton1_Click () Диапазон ("A3"). Строки ("3: 5"). CompleteRow.Insert End Sub 

В приведенной выше строке кода A3 - это столбец, в который мы должны вставить строку, а строки (3: 5) - то, что мы должны вставить 3 новые строки.

Шаг 7: Запустите код, нажав на кнопку « Вставить 3 строки» .

Пример № 2 - Использование номеров строк

Точно так же мы напишем код для вставки 2 строк одним нажатием кнопки.

В этом, мы должны упомянуть строку от начального ряда до конечного номера строки, используя RANGE, за которым следует INSERT, который вставит строки.

Код:

 Частный саб Диапазон CommandButton2_Click () ("3: 4"). Вставить конечный саб 

Когда мы нажимаем кнопку «Вставить 2 строки», мы видим, что 2 строки были вставлены между 3- й и 4- й строкой.

Точно так же мы можем настроить нашу функцию, чтобы вставить столько строк, сколько сможем.

Пример № 3 - Использование активной ячейки

Активная ячейка означает ячейку, которая выбрана в данный момент. Мы будем использовать активную ячейку для вставки строк. Предположим, что мы находимся в ячейке B3 и хотим вставить ячейку над ней, поэтому мы будем использовать свойство active cell. Мы будем использовать следующий код для активной ячейки.

Код:

 Закрытая подпрограмма CommandButton3_Click () ActiveCell.EntireRow.Insert End Sub 

Когда мы нажимаем кнопку «Активное свойство ячейки», мы видим, что одна ячейка вставляется над выбранной ячейкой. Выше мы выбрали B5, а ниже мы видим, что над ним вставлена ​​одна строка.

Пример № 4 - Использование активной ячейки со смещением

Предположим, мы хотим вставить строку после 3 строк активной ячейки, для этого мы будем использовать функцию OFFSET. Предположим, мы находимся в ячейке B4 и должны вставить строку после 2 строк, мы будем использовать этот код.

Код:

 Закрытая подпрограмма CommandButton4_Click () ActiveCell.Offset (2, 0) .EntireRow.Insert End Sub 

Когда мы нажимаем кнопку «Активная ячейка с использованием смещения», в B6 вставляется одна строка .

То, что нужно запомнить

  • Он используется для вставки строк в Excel, автоматизируя его.
  • Вставка строки VBA используется с объектом RANGE в VBA.
  • Перед началом работы включите «Включить все макросы» в настройках макроса.

Рекомендуемые статьи

Это руководство по VBA Insert Row. Здесь мы обсудим, как вставить строку в Excel, используя код VBA, а также с практическими примерами и загружаемым шаблоном Excel. Вы также можете посмотреть следующие статьи, чтобы узнать больше -

  1. Примеры функции VBA GetObject
  2. Excel Вставка нескольких строк (шаблон Excel)
  3. Как использовать функцию VBA StrConv?
  4. Руководство по Excel Вставить ярлык строки

Категория: