Вставка ВБА

VBA Paste працює так само, як ми Copy / Cut і Paste в Excel. VBA Вставте його в автоматизовану версію того, що ми регулярно робимо в регулярній роботі excel. Вставлення даних у будь-яке необхідне місце є рутинним завданням. Для того, щоб виконати цю діяльність, нам потрібно визначити місце, звідки ми виберемо дані та місце, де ми будемо вставляти їх.

Як використовувати Excel VBA Paste?

Ми дізнаємось, як використовувати пасту VBA з кількома прикладами в Excel.

Ви можете завантажити цей шаблон VBA Paste Excel тут - VBA Paste Excel Шаблон

Вставка VBA - приклад №1

Розглянемо будь-яку клітинку в excel, яка містить деякий текст. Тут ми зберегли текст " Вставка VBA " у комірці B3, як показано нижче.

Виконайте наведені нижче дії, щоб використовувати VBA Paste.

Крок 1: Тепер перейдіть до вікна VBA і відкрийте новий модуль у меню Вставка, як показано нижче.

Крок 2: Після цього ми отримаємо порожній модуль. У цьому почніть писати підкатегорію. Рекомендується записати підкатегорію в назві функції, яку ми виконуємо.

Код:

 Sub VBAPaste1 () Кінець Sub

Крок 3: Тепер спочатку вибираємо комірку Діапазон, куди ми маємо дані, які нам потрібно скопіювати. Тут наша клітинка діапазону - B3, а потім функція .Copy . Це копіює дані у вибрану нами клітинку Діапазон.

Код:

 Діапазон VBAPaste1 () () B3). Копіювати кінець Sub

Крок 4: Тепер нам потрібна комірка призначення, куди нам потрібно вставити це скопійоване значення. За допомогою команди Destination виберіть комірку Діапазон. Тут ми вибрали комірку D1, де ми побачимо значення.

Код:

 Підменю VBAPaste1 () Діапазон ("B3"). Копіювання призначення: = Діапазон ("D1") Кінець Sub

Крок 5: Після закінчення складіть код і запустіть його.

Ми побачимо, що вміст комірки В3 зараз копіюється та вставляється у комірку D3, як показано вище.

Вставка VBA - приклад №2

Розглянемо ще один приклад вставки VBA. Для цього перейдіть до вікна VBA і відкрийте модуль, а потім виконайте наведені нижче дії.

Крок 1: Почніть писати підкатегорію з імені VBA Paste або будь-якого іншого імені, як показано нижче.

Код:

 Sub VBAPaste2 () Кінець Sub

Крок 2: Тут ми розглянемо ті самі дані або опорну комірку B3, які ми бачили в прикладі-1. Виберіть діапазон клітинки B3, після чого команду .Copy . Це скопіює дані.

Код:

 Діапазон VBAPaste2 () () B3). Скопіюйте кінець Sub

Крок 3: Тепер виберіть комірку діапазону, куди нам потрібно вставити скопійовані дані. Тут ми вибираємо комірки D1 ​​до D3 на відміну від вибору лише однієї комірки, як показано в прикладі-1.

Код:

 Sub VBAPaste2 () Діапазон ("B3"). Діапазон копіювання ("D1: D3"). Виберіть End Sub

Крок 4: Після того, як ми скопіювали дані та відібрали комірки, куди її потрібно вставити. Тепер виберіть команду Вставити за допомогою функції ActiveSheet . Цей Activesheet дозволяє скопійовану клітинку вставити в комірки діапазону.

Код:

 Sub VBAPaste2 () Діапазон ("B3"). Діапазон копіювання ("D1: D3"). Виберіть ActiveSheet.Paste End Sub

Крок 5: Тепер складіть код і запустіть його. Ми побачимо, значення комірки з комірки B3 буде вставлено з комірок D1 до D3.

Вставка VBA - приклад №3

Інший метод вставки VBA - це використання ручного процесу, який ми виконуємо для копіювання та вставки.

Виконайте наступні кроки:

Крок 1: Напишіть підкатегорію вставки VBA, як показано нижче.

Код:

 Sub VBAPaste3 () Закінчення Sub

Крок 2: Краще надати послідовність підкатегорії, якщо ви записуєте кілька наборів кодів в один файл. Щоб вставити що-небудь, спочатку нам потрібно скопіювати ці дані. Тут ми вибрали команду Копіювати .

Код:

 Sub VBAPaste3 () Вибір. Копіювати Кінець Sub

Крок 3: Тепер виберіть діапазон або опорну комірку, яку нам потрібно скопіювати та вставити. Тут у нас є Cell D3 з даними «Вставлення VBA».

Код:

 Підбір VBAPaste3 () Вибір. Діапазон копіювання ("D3"). Виберіть Кінець суб

Крок 4: Тепер у програмі excel ми вибираємо комірки, куди нам потрібно вставити дані вручну або клавішами Shift + Ctrl + Вгору / Вниз. Тут також виберемо розташування комірок за допомогою команди End (xlUp) для вибору діапазону вихідних комірок.

Код:

 Sub VBAPaste3 () Вибір. Діапазон копіювання ("D3"). Виберіть Діапазон (Вибір, Вибір.Закінчити (xlUp)).

Крок 5: Тепер виберіть діапазон вихідних комірок, тут ми вибрали комірки D1 ​​до D3, де ми побачимо вставлені дані.

Код:

 Sub VBAPaste3 () Selection.Copy Range ("D3"). Виберіть діапазон (Selection, Selection.End (xlUp)). Select the range ("D1: D3"). Select the End Sub

Крок 6: Як функцію нам потрібно виконати функцію вставки, тому нам потрібно активувати команду вставки в VBA командою ActiveSheet, а потім вставкою крапки (.).

Код:

 Sub VBAPaste3 () Selection.Copy Range ("D3"). Виберіть діапазон (Selection, Selection.End (xlUp)). Select the range ("D1: D3"). Select the ActiveSheet.Paste End Sub

Крок 7: Нарешті, дозвольте програмі CutCopyMode як FALSE, тобто коштує лише Копіювання даних, а не їх вирізання з опорної комірки.

Код:

 Sub VBAPaste3 () Selection.Copy Range ("D3"). Виберіть діапазон (Selection, Selection.End (xlUp)). Виберіть діапазон ("D1: D3").

Крок 8: Перш ніж запустити код, спочатку поставте курсор на комір B3. Потім складіть код і запустіть його. Ми побачимо, як наші дані будуть скопійовані в комірки D1 ​​до D3.

Вставка VBA - приклад №4

Є ще один спосіб використання VBA Paste в одному рядку коду.

Виконайте наступні кроки:

Крок 1: Напишіть підкатегорію в послідовності та назві виконуваної функції.

Код:

 Sub VBAPaste4 () Кінець Sub

Крок 2: Використовуйте команду «Листи» та виберіть Аркуш, де ми будемо працювати. Тут наша назва аркуша - «Лист1». Ми можемо використовувати Workbook.Sheet (1) також для вибору "Sheet1" замість цього.

Код:

 Під VBAPaste4 () Робочі таблиці ("Аркуш1"). Кінець Під

Крок 3: Виберіть клітинку, з якої ми будемо копіювати дані. Тут наша комірка діапазону - B3, яка має ті самі дані, що ми бачили у вищенаведених прикладах.

Код:

 Під VBAPaste4 () Робочі листи ("Лист1"). Діапазон ("B3"). Кінець Під

Крок 4: Тепер вставіть команду Copy після крапки (.) Для копіювання даних із вибраної комірки діапазону.

Код:

 Sub VBAPaste4 () Робочі листи ("Sheet1"). Діапазон ("B3"). Скопіюйте кінець Sub

Крок 5: Тепер за допомогою команди призначення виберіть місце, куди ми вставимо скопійовані дані. Для цього виберіть робочий аркуш як "Sheet1", який ми зробили на початку цього прикладу, і виберіть осередки діапазону в будь-якому місці того ж аркуша. Тут ми вибрали вихідні комірки діапазону від D1 до D3.

Код:

 Sub VBAPaste4 () Робочі листи ("Sheet1"). Діапазон ("B3"). Призначення копіювання: = Листи ("Sheet1"). Діапазон ("D1: D3") Кінець Sub

Крок 6: Тепер компілюйте та запустіть. Ми будемо скопіювати текст "Вставлення VBA" з комірки B3 і вставити в комірки D1 ​​до D3, як показано нижче.

Плюси вставки Excel VBA

  • Застосування перших 2-х прикладів - це найпростіший і швидкий спосіб застосувати VBA-пасту.
  • Для величезних даних, де важко виконувати кілька дій, там, якщо ми автоматизуємо цю маленьку функцію, це дозволить заощадити величезний час на виконання ручних речей.
  • Немає обмежень для копіювання та вставки даних.

Що потрібно пам’ятати

  • Використовуйте підкатегорію таким чином, що якщо ви використовуєте кілька модулів, то введення послідовності в них полегшить відстеження та вибір правильного макросу.
  • Збережіть файл excel у форматі Macro Enable, щоб письмовий код був збережений для наступного використання.
  • Якщо ви пишете кілька рядків коду, рекомендується складати код за рядком, щоб виявити, чи є в ньому помилка.
  • Рекомендується поставити курсор у комірку B3, якщо ви використовуєте приклад-3.

Рекомендовані статті

Це було керівництвом до пасти VBA. Тут ми обговорили Вставку VBA та як використовувати вставку Excel VBA разом із практичними прикладами та шаблоном Excel, який можна завантажити. Ви також можете ознайомитися з іншими запропонованими нами статтями -

  1. Матч VBA | Як користуватись?
  2. Формула Excel TRANSPOSE
  3. Діапазон VBA | Легкі макроси Excel
  4. Вкладена формула IF в Excel

Категорія:

VBA