Как да вмъкнете реда след всеки 5 -ти ред през VBA

Anonim

В тази статия ще научим как да вмъкваме реда след всеки 5th ред чрез VBA в Microsoft Excel.

Да вземем пример и да разберем:

Имаме данни в диапазон A1: F31, в който колона A съдържа Име, колона B съдържа Уличен адрес, колона C Град, колона D съдържа регион, колона E съдържа име на държава, а колона F съдържа телефонен номер.

Искаме да вмъкнем реда след всеки пети ред в данните, следвайте дадените по -долу стъпки и код:

  • Отворете страницата VBE, за да натиснете клавиша Alt+F11
  • Поставете модула, за да напишете кода
  • Напишете кода по -долу:
Sub InsertIT () x = 2 'Обхват на стартовия ред ("A" & x, "F" & x). Вмъкване на x = x + 5 цикъл, докато x <50 End Sub 

Код Обяснение:

Първо, ние сме дефинирали номера на реда, откъдето искаме да вмъкнем реда. След това определихме диапазона за вмъкване на данните. След това сме дефинирали номера, който да вмъкне реда след колко реда. И след това до кой ред ще бъдат вмъкнати редове.

За да стартирате кода, натиснете клавиша F5 на клавиатурата си.

  • Редовете ще се вмъкват до 50th ред в данните

По този начин можем да вмъкнем ред след определен номер, който можем да дефинираме в макрос.

Ако ви харесаха нашите блогове, споделете го с приятелите си във Facebook. Можете също така да ни следвате в Twitter и Facebook.

Ще се радваме да чуем от вас, уведомете ни как можем да подобрим, допълним или обновим работата си и да я подобрим. Пишете ни на имейл сайта