ВБА Цопи Пасте | Најбољи начини копирања и лепљења у ВБА (са примерима)

Копирање лепљења у ВБА слично је ономе што радимо у радном листу Екцел, као што можемо копирати вредност и залепити је у другу ћелију, такође можемо користити специјално лепљење за лепљење само вредности, слично као у ВБА користимо методу копирања са својством опсега за копирајте вредност из једне ћелије у другу и за лепљење вредности користимо функцију радног листа пасте специал или пасте.

Како копирати лепљење у ВБА?

Испод су неки примери како копирати пасте у екцелу помоћу ВБА.

Основна ствар коју радимо у Екцелу је копирање, резање и лепљење података из једне ћелије у другу ћелију. Такође не захтева посебно представљање. Међутим, док је учење ВБА кодирања важно је разумети исти концепт у језику кодирања. Цопи Пасте у ВБА је рутински задатак који свакодневно радимо у Екцелу. Да бисмо прво копирали, морамо да одлучимо коју ћелију да копирамо.

Пример # 1 - Копирање и лепљење вредности помоћу објекта домета

Овде можете преузети овај ВБА Цопи Пасте Екцел предложак - ВБА Цопи Пасте Екцел Темплате

Претпоставимо да имате реч „Екцел ВБА“ у ћелији А1.

Рецимо, на пример, ако желите да копирате ћелију А1, можемо да користимо објекат ВБА РАНГЕ.

Шифра:

 Подкопија_Пример () Опсег ("А1"). Енд Суб 

Оног тренутка када референцирате ћелију, видећемо сва својства и методе са њом. Дакле, одаберите методу „Копирај”.

Шифра:

 Суб Цопи_Екампле () Распон ("А1"). Копирај Крај Суб 

Након одабира методе притисните размакницу да бисте видели аргумент методе Цопи.

Пише Одредиште.

Ово није ништа друго, осим где желите да копирате-налепите вредности у ВБА без одабира методе ПАСТЕ.

Ако лепимо у исти лист, можемо одабрати ћелију помоћу објекта Ранге. Рецимо ако желимо да вредност залепимо у ћелију Б3 можемо одредишно место поставити као „Опсег („ Б3 “)“.

Шифра:

 Суб Цопи_Екампле () Ранге ("А1"). Дестинатион Цопи: = Ранге ("Б3") Енд Суб 

Овим ћете копирати податке из ћелије А1 и залепити их у ћелију Б3.

Доле наведени метод такође можемо користити за лепљење података.

Шифра:

 Суб Цопи_Екампле () Ранге ("А1"). Цопи Ранге ("Б3"). Изаберите АцтивеСхеет.Пасте Енд Суб 

Прво ћемо копирати и одабрати податке из ћелије А1 и залепити у ћелију Б3.

Пример # 2 - Копирајте на други радни лист у истој радној свесци

Сада, ако желимо да копирамо-налепимо вредност из различитих радних листова помоћу ВБА макронаредбе, онда у одредишном аргументу морамо да наведемо име листа помоћу објекта ВОРКСХЕЕТС, а затим споменимо опсег ћелија у том радном листу. Код у наставку ће обавити посао.

Шифра:

 Суб Цопи_Екампле () Распон ("А1"). Копирање одредишта: = Радни листови ("Лист2"). Опсег ("Б3") Крај Суб 

Ако желимо да копирамо податке са одређеног листа и желимо да их налепимо на други одређени лист, морамо да поменемо оба имена листова.

Прво морамо поменути лист за копирање.

Радни листови („Лист1“). Опсег („А1“). Копија

Затим у аргументу Одредиште морамо споменути циљано име радног листа и опсег ћелије.

Одредиште: = Радни листови („Лист2“). Домет („Б3“)

Дакле, код би ово требало да се свиђа.

Шифра:

 Подкопирај_Пример () Радни листови ("Лист1"). Опсег ("А1"). Копирање одредишта: = Радни листови ("Лист2"). Опсег ("Б3") Крај Суб 

Пример # 3 - Копирајте из једне радне свеске у другу радну свеску

Видели смо како да копирамо са радног листа на други радни лист у истој радној свесци. Али то можемо да радимо и из једне у другу радну свеску.

Погледајте доњи код.

Шифра:

 Подкопирај_Пример () Радне свеске ("Књига 1.клск"). Радни листови ("Лист1"). Распон ("А1"). Копирајте радне свеске ("Књига 2.клск"). Активирајте АцтивеВоркбоок.Ворксхеетс ("Схеет 2"). Изаберите АцтивеСхеет.Пасте Енд Суб 

Прво ће копирати податке из радног листа „Лист1“ у радној свесци „Боок1.клск“ из ћелије А1.

Радне свеске („Књига 1.клск"). Радни листови („Лист1"). Опсег („А1"). Копија “

Тада ће активирати радну свеску „Књига 2.клск“.

Радне свеске („Књига 2.клск“). Активирајте

У активној радној свесци ће одабрати радни лист „Лист 2“

АцтивеВоркбоок.Ворксхеетс ("Схеет 2"). Изаберите

Сада ће се у активном листу налепити

АцтивеСхеет.Пасте

Алтернативни начин за коришћење Цопи Пасте-а у ВБА

Имамо још један алтернативни начин преноса података из једне ћелије у другу ћелију. Претпоставимо да имате реч „Екцел ВБА“ у ћелији А1 и да вам треба иста да дође у ћелију Б3.

Један од начина који смо видели је коришћење ВБА методе копирања и лепљења, сада ћу вам показати један од алтернативних начина. Погледајте доњи део кода да бисте га разумели.

Шифра:

 Суб Цопи_Екампле1 () опсег ("А1"). Вредност = опсег ("Б3"). Вредност Крај Суб 

Горе наведено каже да би било која вредност која постоји у ћелији А1 требало да буде једнака вредности у ћелији Б3.

Опсег ("А1"). Вредност = Опсег ("Б3"). Вредност

Иако ово није метода копирања и лепљења, још увек додаје већу вредност нашем знању о кодирању.

Врхунски начини копирања и лепљења ВБА као вредности

Сада ћемо видети различите начине ВБА вредности за копирање и лепљење. Претпоставимо да сте у ћелији А1 као што је приказано на доњој слици.

  • Ако желимо да копирамо и налепимо, овде морамо да упутимо ћелију, него можемо само да користимо својство Селецтион. Начин копирања.

Шифра:

 Суб Цопи_Екампле1 () Селецтион.Цопи Дестинатион: = Ранге ("Б3") Енд Суб 

ИЛИ

 Суб Цопи_Екампле1 () АцтивеЦелл.Цопи Дестинатион: = Ранге ("Б3") Енд Суб 
  • Ако желите да копирате читав коришћени опсег радног листа, можете користити доњи код.

Шифра:

 Суб Цопи_Екампле2 () Ворксхеетс ("Схеет1"). УсеРанге.Цопи Дестинатион: = Ворксхеетс ("Схеет2"). Ранге ("А1") Енд Суб 

Ово ће копирати читав коришћени опсег у радни лист „Схеет1“ и залепити га у радни лист „Схеет2“