VBA pasta

VBA-kleebi töötab samal viisil nagu Excelis Kopeerimine / Lõika ja Kleebi. VBA Kleebi see automaatne versioon sellest, mida teeme regulaarselt exceli töös. Rutiinne ülesanne on andmete kleepimine mis tahes nõutavasse kohta. Selle toimingu tegemiseks peame määratlema asukoha, kust andmed valime, ja asukoha, kuhu me selle kleepime.

Kuidas kasutada Exceli VBA pastat?

Õpime VBA-pasta kasutamist koos mõne näitega Excelis.

Selle VBA kleebi Exceli malli saate alla laadida siit - VBA kleebi Exceli mall

VBA pasta - näide nr 1

Vaatleme mis tahes lahtrit excelis, millel on mingi tekst. Oleme siin lahtris B3 hoidnud teksti “ VBA paste ”, nagu allpool näidatud.

VBA-pasta kasutamiseks toimige järgmiselt.

1. samm: minge nüüd VBA aknasse ja avage menüüst Lisamine uus moodul, nagu allpool näidatud.

2. samm: kui oleme selle teinud, saame tühja mooduli. Selles alustage alamkategooria kirjutamist. Alamkategooria on soovitatav kirjutada selle funktsiooni nimele, mida me täidame.

Kood:

 Alam VBAPaste1 () lõpp Alam

3. samm: valige kõigepealt lahter Range, kus meil on andmed, mida peame kopeerima. Siin on meie vahemiku lahter B3, millele järgneb koopiafunktsioon . See kopeerib meie valitud lahtri vahemiku andmed.

Kood:

 Sub VBAPaste1 () Range ("B3"). Kopeeri lõpp Sub

4. samm: nüüd vajame sihtkoha lahtrit, kuhu peame selle kopeeritud väärtuse kleepima. Valige käsu Sihtkoht abil lahter Range. Siin valisime lahtri D1, kus näeme väärtust.

Kood:

 Sub VBAPaste1 () Range ("B3"). Kopeerimise sihtkoht: = Range ("D1") End Sub

5. samm: kui see on valmis, kompileerige kood ja käivitage see.

Näeme, et raku B3 rakusisu on nüüd kopeeritud ja kleebitud lahtrisse D3, nagu ülal näidatud.

VBA pasta - näide nr 2

Vaatleme veel ühte näidet VBA pastast. Selleks minge VBA aknasse ja avage moodul ning järgige siis järgmisi samme.

1. samm: alustage alamkategooria kirjutamist VBA Paste või mõne muu nime all, nagu allpool näidatud.

Kood:

 Alam VBAPaste2 () lõpp Alam

2. samm: siin käsitleme samu andmeid või võrdluslahtrit B3, mida nägime näites 1. Valige vahemiku lahter B3, millele järgneb käsk .Koopia . See kopeerib andmed.

Kood:

 Sub VBAPaste2 () Range ("B3"). Kopeerimise lõpp Sub

3. samm: valige nüüd vahemiku lahter, kuhu peame kopeeritud andmed kleepima. Siin valime lahtrid D1 kuni D3 erinevalt ainult ühe lahtri valimisest, nagu on näidatud näites-1.

Kood:

 Sub VBAPaste2 () Range ("B3"). Copy Range ("D1: D3"). Valige End Sub

4. samm: kui oleme andmed kopeerinud ja valinud lahtrid, kuhu see kleepimiseks on vajalik. Valige nüüd käsk Kleebi funktsiooni ActiveSheet abil. See aktiivne leht lubab kopeeritud lahtri kleepimist vahemiku lahtritesse.

Kood:

 Sub VBAPaste2 () Range ("B3"). Copy Range ("D1: D3"). Valige ActiveSheet.Paste End Sub

5. samm: nüüd kompileerige kood ja käivitage see. Näeme, et lahtri B3 raku väärtus kleebitakse lahtritest D1 kuni D3.

VBA pasta - näide nr 3

Teine VBA-kleepimise meetod on käsitsiprotseduuri kasutamine, mida me kopeerime ja kleepime.

Järgige järgmisi samme:

1. samm: kirjutage VBA kleepimise alamkategooria, nagu allpool näidatud.

Kood:

 Alam VBAPaste3 () lõpp Alam

2. samm: Kui kirjutate ühte faili mitu koodikomplekti, on parem anda jaotis alamkategooriale. Midagi kleepimiseks peame esiteks need andmed kopeerima. Siin valisime käsu Kopeeri .

Kood:

 Alam VBAPaste3 () valik.Kopeerimise lõpp Alam

3. samm: valige nüüd vahemik või viide lahter, mida peame kopeerima ja kleepima. Siin on meil lahter D3, millel on andmed “VBA pasta”.

Kood:

 Alam VBAPaste3 () valik.Koopia ulatus ("D3") Valige End Sub

4. samm: nüüd valime excelis lahtrid, kuhu peame andmed käsitsi kleepima või klahvide Shift + Ctrl + üles / alla abil. Siin valime lahtrite asukoha ka käsu End (xlUp) abil väljundi lahtrite vahemiku valimiseks.

Kood:

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

5. samm: valige nüüd väljundi lahtrite vahemik, siin valisime lahtrid D1 kuni D3, kus näeme kleebitud andmeid.

Kood:

 Alam VBAPaste3 () valik.Koopia ulatus ("D3"). Valige vahemik (valik, valik.End (xlUp)). Valige vahemik ("D1: D3"). Valige Lõp. Alam

6. samm: kuna see funktsioon, mida peame täitma, on kleepimisfunktsioon, peame aktiveerima VBA-s käsu Pasteerimine käsklusega ActiveSheet, millele järgneb punkti (.) Kleepimine.

Kood:

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

7. samm: lubage lõpuks kasutada rakendust CutCopyMode valena, mis tähendab, et andmed kopeeritakse, selle asemel et neid ka viitelahtrist lõigata.

Kood:

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

8. samm: enne koodi käivitamist pange kursor kõigepealt lahtrisse B3. Seejärel kompileerige kood ja käivitage see. Näeme, et meie andmed kopeeritakse lahtritesse D1 kuni D3.

VBA pasta - näide nr 4

On veel üks viis, kuidas kasutada VBA kleepimist ühe koodireana.

Järgige järgmisi samme:

1. samm: kirjutage alamkategooria teostatud funktsiooni järjekorras ja nimetuses.

Kood:

 Alam VBAPaste4 () lõpp Alam

2. samm: kasutage käsku Töölehed ja valige leht, kus töötame. Meie lehe nimi on “Sheet1”. Selle asemel saame Workbook.Sheet (1) kasutada ka lehe “Sheet1” valimiseks.

Kood:

 Alam VBAPaste4 () töölehed ("leht1"). Lõpu alam

3. samm: valige lahter, kust andmed kopeerime. Meie vahemiku lahter on B3, millel on samad andmed, mida me nägime ülaltoodud näidetes.

Kood:

 Alam VBAPaste4 () töölehed ("Leht1"). Vahemik ("B3"). Lõpu alam

4. samm: sisestage valitud vahemikust lahtrist andmete kopeerimiseks nüüd käsk Kopeeri pärast punkti (.).

Kood:

 Sub VBAPaste4 () töölehed ("Sheet1"). Range ("B3"). Copy End Sub

5. samm: kasutage käsku Sihtkoht, et valida asukoht, kuhu kopeeritud andmed kleepida. Selle jaoks valige tööleht nimega Sheet1, mida me tegime selle näite alguses, ja valige vahemikulahtrid kõikjal samal lehel. Siin oleme valinud vahemiku D1 kuni D3 väljundi lahtrid.

Kood:

 Alam VBAPaste4 () töölehed ("Leht1"). Vahemik ("B3"). Kopeerimise sihtkoht: = Töölehed ("Leht1"). Vahemik ("D1: D3") Lõpp Alam

6. samm: kompileerige ja käivitage. Kopeeritakse ja kleebitakse lahtritesse D1 kuni D3 tekst „VBA Paste” lahtrist B3, nagu allpool näidatud.

Excel VBA-kleepimise plussid

  • Esimese 2 näite rakendamine on lihtne ja kiireim viis VBA Paste'i rakendamiseks.
  • Tohutute andmete korral, kus on keeruline teha mitut toimingut, säästaksime sellist väikest funktsiooni, mis säästaks tohutult aega käsitsi tehtavate toimingute tegemiseks.
  • Andmete kopeerimine ja kleepimine pole piiratud.

Asjad, mida meeles pidada

  • Kasutage alamkategooriat nii, et kui kasutate mitut moodulit, siis sellesse järjestusesse panemine hõlbustab jälgimist ja õige makro valimist.
  • Salvestage Exceli fail makrofunktsioonide lubamise vormingus, nii et kirjutatud kood säiliks järgmisel kasutamisel.
  • Kui kirjutate mitu koodirida, on soovitatav kood ridade kaupa kokku panna, et leida, kas selles on viga.
  • Kui kasutate näidet 3, on soovitatav viia kursor lahtrisse B3.

Soovitatavad artiklid

See on olnud VBA Paste'i juhend. Siin arutasime VBA Paste'i ja seda, kuidas kasutada Excel VBA Paste, koos praktiliste näidete ja allalaaditava Exceli malliga. Võite vaadata ka meie teisi soovitatud artikleid -

  1. VBA matš | Kuidas kasutada?
  2. Exceli TRANSPOSE valem
  3. VBA vahemik | Lihtsad Exceli makrod
  4. Pesastatud IF-valem Excelis

Kategooria:

VBA