VBA zalijepi za kopiranje

Slično kao u funkciji radnog lista u excelu, možemo kopirati i podatke zalijepiti ili skup vrijednosti u VBA. U normalnim podacima koristimo ili CTRL + C za kopiranje odabira podataka, a zatim CTRL + V zalijepljenje odabranih podataka u ciljanu ćeliju. Ali isto to i u VBA rade određeni kodovi koje ćemo naučiti u ovom članku.

Kako koristimo kopiranje i lijepljenje u Excel VBA? Da bismo to prvo učinili, potrebno je aktivirati ciljni radni list ili radnu knjižicu iz koje želimo kopirati bilo koji raspon podataka, a taj je odabir kopiran određenim kodom, kad je taj izbor uspješno kopiran, možemo ići naprijed i zalijepiti podatke u cilj raspon stanica.

Sintaksa za kopiranje podataka u VBA je sljedeća:

 Raspon ("Izvorna ćelija"). Kopiraj

Sada je sintaksa zalijepiti podatke u drugi radni list ili bilo koji drugi raspon ćelija kako slijedi:

 Raspon ("odredišna ćelija") .Pasta

Mi koristimo Dot (.) Operator za upotrebu metoda kopiranja i lijepljenja u VBA.

Možemo kopirati cijeli stupac i zalijepiti ga u drugi stupac, a slično možemo i kopirati cijeli redak i zalijepiti ga u drugi redak. Sve ćemo ove stvari naučiti u ovom članku.

Napomena: Da biste upotrebljavali VBA u excelu, osigurajte da je kartica razvojnog programera omogućena s kartice File, a zatim u odjeljku s opcijama postavki.

Kako se koristi Excel VBA paste za kopiranje?

Naučit ćemo kako koristiti VBA Copy paste s nekoliko primjera u Excelu.

Ovaj VBA predložak za kopiranje zalijepi u Excelu možete preuzeti ovdje - VBA Kopiraj zalijepi Excel predložak

Zalijepi za kopiranje VBA - Primjer # 1

U demonstrativne svrhe imam slučajnu vrijednost u ćeliji A1 koju želim kopirati i zalijepiti u ćeliju B1 pomoću VBA koda. U nastavku pogledajte koji su podaci u ćeliji A1, a ćelija B1 je prazna.

Slijedite dolje navedene korake za upotrebu Excel VBA paste za kopiranje:

Korak 1: Otvorite karticu programera i kliknite Visual Basic da biste otvorili VB uređivač.

Korak 2: Jednom kada se otvori VB uređivač, kliknite na umetanje, a zatim kliknite na Umetni modul za unos prozora koda.

Korak 3: Proglasite potfunkciju za početak pisanja koda.

Kodirati:

 Pod uzorak () Kraj Sub

4. korak: Prvo aktivirajte radni list da biste pomoću sljedećeg koda koristili svojstva radnog lista.

Kodirati:

 Pod uzorci () radni listovi ("Sheet1"). Aktivirajte krajnji sub

Korak 5: Kopirajte podatke koji se nalaze u ćeliji A1 sljedećim kodom.

Kodirati:

 Pod uzorci () radni listovi ("Sheet1"). Aktivirajte raspon ("A1"). Kopirajte kraj Sub

Korak 6: Sada zalijepite kopirane podatke u ciljanu ćeliju koja je ćelija B1 sljedećim kodom.

Kodirati:

 Pod uzorci () radni listovi ("Sheet1"). Aktivirajte raspon ("A1"). Kopirajte raspon ("B1"). PasteSpecial End Sub

Korak 7: Pokrenite gornji kôd s gumba za pokretanje i pogledajte rezultat u ćeliji B1.

VBA zalijepi za kopiranje - primjer br. 2

Imam podatke u stupcu C i želim kopirati čitave podatke ili vrijednosti i zalijepiti ih u stupac D pomoću VBA koda. U nastavku pogledajte koji su podaci u stupcu C i je li stupac D prazan.

Slijedite dolje navedene korake za upotrebu Excel VBA paste za kopiranje:

Korak 1: Otvorite karticu programera i kliknite Visual Basic da biste otvorili VB uređivač.

2. korak: Kliknite umetnuti modul da otvorite prozor koda,

Korak 3: Proglasite potfunkciju za početak pisanja koda.

Kodirati:

 Sub Sample1 () Kraj Sub

Korak 4: Najprije aktivirajte radni list sljedećim kodom.

Kodirati:

 Radni listovi Sub Sample1 () ("Sheet1"). Aktivirajte Kraj Sub

Korak 5: Kopirajte podatke u stupac C sljedećim kodom.

Kodirati:

 Sub Sample1 () Radni listovi () Sheet1 ". Aktivirajte raspon (" C: C "). Kopirajte kraj Sub

Korak 6: Sada zalijepite podatke u stupac D upotrijebite sljedeći kôd.

Kodirati:

 Sub Sample1 () Radni listovi ("Sheet1"). Aktivirajte raspon ("C: C"). Raspon kopiranja ("D: D"). PasteSpecial End Sub

Korak 7: Pokrenite sljedeći kod s gumba za pokretanje ili pritisnite F5.

Pokrenite kôd da biste vidjeli sljedeći rezultat.

VBA zalijepi za kopiranje - primjer # 3

Sada za ovaj primjer, imam čitav niz raspona podataka u rasponu ćelija G1: H3 i želim kopirati podatke u raspon ćelija I1: J3. U nastavku pogledajte podatke koje imam u rasponu ćelija G1: H3, a raspon ćelija I1: J3 je prazan.

Slijedite dolje navedene korake za upotrebu Excel VBA paste za kopiranje:

Korak 1: Otvorite karticu programera i kliknite Visual Basic da biste otvorili VB uređivač.

2. korak: Kliknite umetnuti modul da otvorite prozor koda,

Korak 3: Proglasite potfunkciju za početak pisanja koda.

Kodirati:

 Sub Sample2 () Kraj Sub

Korak 4: Najprije aktivirajte radni list da biste upotrebljavali njegova svojstva pomoću sljedećeg koda.

Kodirati:

 Radni listovi Sub Sample2 () ("Sheet1"). Aktivirajte Kraj Sub

Korak 5: Kopirajte podatke u rasponu ciljne stanice sa sljedećim kodom.

Kodirati:

 Sub Sample2 () Radni listovi ("Sheet1"). Aktivirajte raspon ("G1: H3").

Korak 6: Sada zalijepite podatke u odredišnu ćeliju koristite sljedeći kôd.

Kodirati:

 Sub Sample2 () Radni listovi ("Sheet1"). Aktivirajte raspon ("G1: H3"). Raspon kopiranja ("I1: J3"). PasteSpecial End Sub

Korak 7: Pokrenite gornji kôd s priloženog gumba za pokretanje ili pritisnite F5 da biste vidjeli sljedeći rezultat.

VBA zalijepi za kopiranje - primjer br. 4

Za ovaj primjer, imam podatke u retku 10 i želim ih zalijepiti u red 11. Pogledajte dolje da vidite koji su podaci u retku 10, a red 11 je prazan.

Slijedite dolje navedene korake za upotrebu Excel VBA paste za kopiranje:

Korak 1: Otvorite karticu programera i kliknite Visual Basic da biste otvorili VB uređivač.

2. korak: Kliknite umetnuti modul da otvorite prozor koda,

Korak 3: Proglasite potfunkciju za početak pisanja koda.

Kodirati:

 Sub Sample3 () Kraj Sub

Korak 4: Aktivirajte radni list da biste koristili svojstva radnog lista.

Kodirati:

 Radni listovi Sub Sample3 () ("Sheet1"). Aktivirajte Kraj Sub

Korak 5: Kopirajte redak 10 sa sljedećim kodom.

Kodirati:

 Sub Sample3 () Radni listovi () Sheet1 ". Aktiviranje redaka (10) .EntireRow.Copy End Sub

Korak 6: Zalijepite podatke iz retka 10 u retku 11 sa sljedećim kodom.

Kodirati:

 Sub Sample3 () Radni listovi () Sheet1 ". Aktiviranje redaka (10) .EntireRow.Kopiranje redaka (11).

Korak 7: Pokrenite gornji kôd pritiskom na F5 da biste vidjeli sljedeći rezultat.

Stvari koje treba zapamtiti

  • Da bismo koristili podatke s bilo kojeg radnog lista da bismo ih kopirali, prvo moramo aktivirati radni list.
  • Slično tome, kada trebamo zalijepiti podatke na bilo koji drugi radni list u VBA, prvo moramo aktivirati odredišni radni list.
  • U slučaju da kopiramo cijeli stupac ili redak i zalijepimo podatke u bilo koji drugi stupac, tada se podaci bilo gdje u retku ili stupcu u ciljane ćelije kopiraju i zalijepe u odredišne ​​ćelije. To može uzrokovati da postoje neki određeni neželjeni podaci.
  • Najbolji način kopiranja podataka je kopiranjem određenog raspona i lijepljenjem podataka u ciljne ćelije.

Preporučeni članci

Ovo je Vodič za VBA paste za kopiranje. Ovdje smo raspravljali o tome kako koristiti Excel VBA Copy paste zajedno s nekoliko praktičnih primjera i preuzeti Excel predložak. Možete i pregledati naše druge predložene članke -

  1. Metoda lijepljenja u VBA
  2. Opcija prečaca Excel Paste
  3. Upotreba podijeljene funkcije u VBA
  4. Lijevo TRIM u Excelu

Kategorija:

VBA