Prilepiť VBA

VBA Paste funguje rovnakým spôsobom ako kopírovanie / vystrihnutie a vloženie v Exceli. VBA Vložte automatizovanú verziu toho, čo pravidelne robíme pri pravidelných excelentných prácach. Rutinná úloha je vkladanie údajov na požadované miesto. Aby sme mohli vykonať túto aktivitu, musíme definovať miesto, z ktorého vyberieme údaje, a miesto, kam ich vložíme.

Ako používať Excel VBA Paste?

Naučíme sa, ako používať VBA Paste s niekoľkými príkladmi v Exceli.

Túto šablónu aplikácie VBA Paste Excel si môžete stiahnuť tu - VBA Paste Excel Template

VBA pasta - príklad č. 1

Uvažujme o akejkoľvek vynikajúcej bunke, ktorá má nejaký text. Tu sme ponechali text „ VBA Paste “ v bunke B3, ako je to znázornené nižšie.

Postupujte podľa nižšie uvedených krokov a použite VBA Paste.

Krok 1: Teraz prejdite do okna VBA a otvorte nový modul z ponuky Vložiť, ako je uvedené nižšie.

Krok 2: Keď to urobíme, dostaneme prázdny modul. V tom začnite písať podkategóriu. Odporúča sa napísať podkategóriu do názvu funkcie, ktorú vykonávame.

kód:

 Sub VBAPaste1 () End Sub

Krok 3: Teraz najskôr vyberte bunku Range, kde máme údaje, ktoré musíme skopírovať. Tu je našou Range bunkou B3, nasledovaná funkciou .Copy . Takto sa skopírujú údaje do bunky Range, ktorú sme vybrali.

kód:

 Rozsah sub VBAPaste1 () ("B3")

Krok 4: Teraz potrebujeme cieľovú bunku, do ktorej musíme vložiť túto skopírovanú hodnotu. Pomocou príkazu Cieľ vyberte bunku Rozsah. Tu sme vybrali bunku D1, kde uvidíme hodnotu.

kód:

 Rozsah sub VBAPaste1 () ("B3"). Cieľ kópie: = rozsah ("D1") End Sub

Krok 5: Po dokončení zostavte kód a spustite ho.

Uvidíme, že bunkový obsah bunky B3 je teraz skopírovaný a vložený do bunky D3, ako je uvedené vyššie.

VBA pasta - príklad č. 2

Zoberme si ďalší príklad VBA Paste. Za týmto účelom prejdite do okna VBA a otvorte modul a potom postupujte podľa krokov uvedených nižšie.

Krok 1: Začnite písať podkategóriu v mene VBA Paste alebo v akomkoľvek inom názve, ako je uvedené nižšie.

kód:

 Sub VBAPaste2 () End Sub

Krok 2: Tu zvážime rovnaké dáta alebo referenčnú bunku B3, aké sme videli v príklade 1. Vyberte bunku Range B3 a potom príkaz .Copy . Údaje sa skopírujú.

kód:

 Rozsah sub VBAPaste2 () ("B3")

Krok 3: Teraz vyberte bunku rozsahu, do ktorej musíme vložiť skopírované údaje. Tu vyberáme bunky Dl až D3, na rozdiel od výberu iba jednej bunky, ako je znázornené v príklade 1.

kód:

 Rozsah sub VBAPaste2 () ("B3"). Rozsah kópií ("D1: D3"). Vyberte End Sub

Krok 4: Akonáhle sme skopírovali údaje a vybrali bunky, kde je potrebné ich vložiť. Teraz vyberte príkaz Prilepiť pomocou funkcie ActiveSheet . Tento aktívny list umožňuje kopírovanie buniek vložených do buniek rozsahu.

kód:

 Rozsah sub VBAPaste2 () ("B3"). Rozsah kopírovania ("D1: D3"). Vyberte položku ActiveSheet.Paste End Sub

Krok 5: Teraz zostavte kód a spustite ho. Uvidíme, že hodnota buniek z bunky B3 sa prilepí z buniek D1 do D3.

VBA pasta - príklad č. 3

Ďalšou metódou VBA Paste je použitie manuálneho procesu, ktorý robíme pre kopírovanie a vkladanie.

Postupujte podľa nasledujúcich krokov:

Krok 1: Napíšte podkategóriu pasty VBA, ako je to znázornené nižšie.

kód:

 Sub VBAPaste3 () End Sub

Krok 2: Je lepšie dať sekvenciu podkategórii, ak píšete viac sád kódov do jedného súboru. Ak chcete vložiť čokoľvek, musíme najprv skopírovať tieto údaje. Tu sme vybrali príkaz Kopírovať .

kód:

 Sub VBAPaste3 () Selection.Copy End Sub

Krok 3: Teraz vyberte oblasť alebo referenčnú bunku, ktorú musíme skopírovať a vložiť. Tu máme bunku D3 s údajmi „VBA Paste“.

kód:

 Sub VBAPaste3 () Selection.Copy Range ("D3"). Vyberte End Sub

Krok 4: Teraz v Exceli vyberáme bunky, do ktorých musíme vložiť údaje ručne alebo pomocou klávesov Shift + Ctrl + nahor / nadol. Tu tiež vyberieme umiestnenie buniek podľa konca (xlUp) príkaz pre výber rozsahu výstupných buniek.

kód:

 Sub VBAPaste3 () Selection.Copy Range ("D3"). Vyberte Range (Selection, Selection.End (xlUp)). Vyberte End Sub

Krok 5: Teraz vyberte rozsah výstupných buniek, tu sme vybrali bunky D1 až D3, kde uvidíme vložené údaje.

kód:

 Sub VBAPaste3 () Selection.Copy Range ("D3"). Vyberte Range (Selection, Selection.End (xlUp)). Vyberte Range ("D1: D3"). Vyberte End Sub

Krok 6: Ako funkcia, ktorú musíme vykonať, je funkcia vloženia, takže musíme aktivovať príkaz vložiť vo VBA príkazom ActiveSheet nasledovaný bodkou (.) Vložiť.

kód:

 Sub VBAPaste3 () Selection.Copy Range ("D3"). Vyberte Range (Selection, Selection.End (xlUp)). Vyberte Range ("D1: D3"). Vyberte ActiveSheet.Paste End Sub Sub

Krok 7: Teraz konečne povoľte aplikáciu CutCopyMode ako FALSE, čo znamená, že iba kopírujú údaje namiesto ich vystrihnutia z referenčnej bunky.

kód:

 Sub VBAPaste3 () Selection.Copy Range ("D3"). Vyberte Range (Selection, Selection.End (xlUp)). Vyberte Range ("D1: D3"). Vyberte ActiveSheet.Paste Application.CutCopyMode = False End Sub

Krok 8: Pred spustením kódu najskôr umiestnite kurzor na bunku B3. Potom zostavte kód a spustite ho. Uvidíme, že sa naše údaje skopírujú do buniek D1 až D3.

VBA pasta - príklad č. 4

Existuje ďalší spôsob, ako používať VBA Paste v jednom riadku kódu.

Postupujte podľa nasledujúcich krokov:

Krok 1: Napíšte podkategóriu do sekvencie a názvu vykonanej funkcie.

kód:

 Sub VBAPaste4 () End Sub

Krok 2: Použite príkaz Pracovné hárky a vyberte hárok, kde budeme pracovať. Tu je náš názov listu „Sheet1“. Namiesto toho môžeme použiť Workbook.Sheet (1) aj na výber „Sheet1“.

kód:

 Pracovné hárky pod VBAPaste4 () („hárok1“). End Sub

Krok 3: Vyberte bunku, z ktorej sa skopírujú údaje. Tu je našou bunkou Range B3, ktorá má rovnaké údaje, aké sme videli vo vyššie uvedených príkladoch.

kód:

 Pracovné hárky pod VBAPaste4 () ("List1"). Rozsah ("B3"). End Sub

Krok 4: Teraz vložte bodku za bodkou (.) Pre kopírovanie údajov z vybranej bunky Range.

kód:

 Pracovné hárky pod VBAPaste4 () ("List1"). Rozsah ("B3").

Krok 5: Teraz pomocou príkazu Cieľ vyberte miesto, kam prilepíme skopírované údaje. Pre tento list vyberte Pracovný list ako „List1“, ktorý sme urobili na začiatku tohto príkladu, a vyberte bunky rozsahu kdekoľvek na tom istom liste. Tu sme vybrali Range výstupné bunky od D1 do D3.

kód:

 Sub VBAPaste4 () Pracovné listy („List1“). Rozsah („B3“). Cieľ kopírovania: = Pracovné listy („List1“). Rozsah („D1: D3“) Koniec Sub

Krok 6: Teraz skompilujte a spustite. Text „VBA Paste“ z bunky B3 sa skopíruje a vloží do buniek D1 až D3, ako je to znázornené nižšie.

Výhody programu Excel VBA Paste

  • Aplikácia prvých 2 príkladov predstavuje najjednoduchší a najrýchlejší spôsob aplikácie VBA Paste.
  • V prípade obrovských údajov, pri ktorých je ťažké vykonávať viacero činností, by sme automatizovali túto malú funkciu, ak by sme automatizovali takú malú funkciu, čo by ušetrilo obrovské množstvo času na vykonávanie manuálnych vecí.
  • Neexistuje žiadny limit na kopírovanie a vkladanie údajov.

Čo je potrebné pamätať

  • Použite podkategóriu takým spôsobom, že ak používate viac modulov, potom vložte sekvenciu, ktorá uľahčí sledovanie a výber správneho makra.
  • Uložte súbor Excel do formátu Enable Macro Enable, aby sa napísaný kód zachoval pre ďalšie použitie.
  • Ak píšete viac riadkov kódu, odporúča sa zostaviť kód riadok po riadku, aby ste zistili, či sa v ňom vyskytla chyba.
  • Ak používate príklad 3, odporúča sa umiestniť kurzor na bunku B3.

Odporúčané články

Toto bol sprievodca VBA Paste. Tu sme diskutovali o VBA Paste a ako používať Excel VBA Paste spolu s praktickými príkladmi a stiahnuteľnou šablónou Excel. Môžete si tiež prečítať naše ďalšie navrhované články -

  1. VBA zápas | Ako použiť?
  2. Excel TRANSPOSE vzorec
  3. Rozsah VBA | Jednoduché makrá Excel
  4. Vnorený IF vzorec v Exceli

Kategórie:

VBA