VBA koopiate kleepimine | VBA kopeerimise ja kleepimise parimad viisid (koos näidetega)
VBA-sse Kopeeri kleepimine sarnaneb see, mida teeme Exceli töölehel, näiteks võime kopeerida väärtuse ja kleepida selle teise lahtrisse, samuti saame kasutada väärtuste kleepimiseks spetsiaalset kleepimist, samamoodi VBA-s kasutame vahemiku omadusega kopeerimismeetodit kopeerige väärtus ühest lahtrist teise ja väärtuse kleepimiseks kasutame töölehe funktsiooni paste special või paste meetodit.
Kuidas kleepida VBA-sse?
Allpool on toodud mõned näited selle kohta, kuidas kopeerida Excelisse VBA abil.
Põhiline, mida excelis teeme, on see, et kopeerime, lõikame ja kleepime andmed ühest lahtrist teise lahtrisse. See ei vaja ka erilist tutvustamist. Kuigi VBA kodeerimise õppimine on oluline, et mõista sama mõistet kodeerimiskeeles. Copy Paste in VBA on rutiinne ülesanne, mida teeme Excelis igapäevaselt. Esmalt kopeerimiseks peame otsustama, millise lahtri kopeerida.
Näide # 1 - väärtuste kopeerimine ja kleepimine vahemiku objekti abil
Selle VBA Copy Paste Exceli malli saate alla laadida siit - VBA Copy Paste Exceli mallOletame, et lahtris A1 on sõna „Excel VBA”.
Oletame näiteks, et kui soovite kopeerida lahtrit A1, saame kasutada objekti VBA RANGE.
Kood:
Alamkoopia_näide () vahemik ("A1"). Lõpeta alam
Kui viidate lahtrile, näeme koos sellega kõiki omadusi ja meetodeid. Seega valige meetod “ Kopeeri ”.
Kood:
Alamkoopia_näide () vahemik ("A1"). Kopeeri lõigu alamkopeerimine
Pärast meetodi valimist vajutage tühikuklahvi, et näha meetodi Kopeerimine argumenti.
Seal on kirjas Sihtkoht.
See pole midagi muud, kui kuhu soovite VBA-s väärtused kopeerida ja kleepida, ilma et valiksite meetodi PASTE.
Kui kleepime samale lehele, saame lahtri valida objekti Range abil. Oletame, et kui tahame väärtuse lahtrisse B3 kleepida, võime sihtkoha panna vahemikuks „Range („ B3 ”)” .
Kood:
Alamkoopia_näide () vahemik ("A1"). Kopeerimise sihtkoht: = vahemik ("B3") Lõpp alam
See kopeerib lahtrist A1 andmed ja kleebib lahtrisse B3.
Andmete kleepimiseks võime kasutada ka allpool toodud meetodit.
Kood:
Alamkopeeri_näide () vahemik ("A1"). Kopeerimisvahemik ("B3"). Valige ActiveSheet.Paste End Sub
Esiteks kopeerime ja valime lahtrist A1 andmed ning kleepime lahtrisse B3.
Näide # 2 - kopeerimine teisele töölehele samas töövihikus
Kui nüüd soovime VBA makro abil erinevatelt töölehtedelt väärtuse kopeerida, siis tuleb argumendis Sihtkoht viidata lehe nimele objekti TÖÖLEHTEDE abil, seejärel mainida selle TÖÖLEHT lahtrite vahemikku. Allpool olev kood täidab selle töö.
Kood:
Alamkopeeri_näide () vahemik ("A1"). Kopeerimise sihtkoht: = töölehed ("leht2"). Vahemik ("B3") lõpp-alam
Kui tahame andmed kopeerida konkreetselt lehelt ja tahame kleepida teise kindla lehe juurde, peame mainima mõlemad lehtede nimed.
Esiteks peame mainima kopeerimislehte.
Töölehed ("Sheet1"). Vahemik ("A1"). Kopeeri
Seejärel peame argumendis Sihtkoht mainima lahtri sihitud töölehe nime ja vahemikku.
Sihtkoht: = töölehed ("Sheet2"). Vahemik ("B3")
Nii et kood peaks see meeldima.
Kood:
Alamkoopia_näide () töölehed ("leht1"). Vahemik ("A1"). Koopia sihtkoht: = töölehed ("leht2"). Vahemik ("B3") lõpp-alam
Näide # 3 - kopeerimine ühest töövihikust teise töövihikusse
Oleme näinud, kuidas samas töövihikus töölehelt teisele töölehele kopeerida. Kuid saame seda teha ka ühest töövihikust teise.
Heitke pilk allpool olevale koodile.
Kood:
Alamkoopia_näide () töövihikud ("Book 1.xlsx"). Töölehed ("Sheet1"). Vahemik ("A1"). Töövihikute kopeerimine ("Book 2.xlsx"). Aktiveerige ActiveWorkbook.Worksheets ("Sheet 2"). Valige ActiveSheet.Paste End Sub
Esiteks kopeerib see lahtrist A1 töövihiku „Book1.xlsx” töölehe „Sheet1” andmed.
" Töövihikud (" Book 1.xlsx "). Töölehed (" Sheet1 "). Range (" A1 "). Copy"
Seejärel aktiveerib see töövihiku “Book 2.xlsx”.
Töövihikud ("Book 2.xlsx"). Aktiveerige
Aktiivses töövihikus valib see töölehe “Leht 2”
ActiveWorkbook.Worksheets ("Sheet 2"). Valige
Nüüd aktiivses lehes see kleebitakse
ActiveSheet. Kleebi
Alternatiivne viis kopeerimispaste kasutamiseks VBA-s
Meil on veel üks alternatiivne viis andmete saamiseks ühest lahtrist teise. Oletame, et teil on lahtris A1 sõna „Excel VBA” ja vajate sama ka lahtrisse B3 tulekuks.
Üks meetod, mida oleme näinud, on VBA kopeerimise ja kleepimise meetodi kasutamine, nüüd näitan teile ühte alternatiivsetest viisidest. Selle mõistmiseks vaadake allolevat koodijuppi.
Kood:
Alamkoopia_näide1 () Vahemik ("A1"). Väärtus = Vahemik ("B3"). Väärtus Lõpp Alam
Ülaltoodu ütleb, et ükskõik milline väärtus lahtris A1 peaks olema võrdne lahtris B3 olevaga.
Vahemik ("A1"). Väärtus = Vahemik ("B3"). Väärtus
Ehkki see pole kopeerimise ja kleepimise meetod, lisab meie kodeerimisteadmistele siiski rohkem väärtust.
VBA väärtuste kopeerimise ja kleepimise peamised viisid
Nüüd näeme VBA väärtuste kopeerimise ja kleepimise erinevaid viise. Oletame, et olete lahtris A1, nagu on näidatud alloleval pildil.
- Kui me tahame kopeerida ja kleepida, peame siin lahtrile viitama, pigem võime kasutada lihtsalt valiku omadust. Kopeerimismeetod.
Kood:
Alamkoopia_näide1 () valik. Kopeeri sihtkoht: = Vahemik ("B3") Lõpp alam
VÕI
Alamkoopia_näide1 () ActiveCell.Copy sihtkoht: = Vahemik ("B3") Lõpp alam
- Kui soovite kopeerida kogu töölehe kasutatud vahemiku, võite kasutada allolevat koodi.
Kood:
Alamkoopia_näide2 () töölehed ("leht1"). UsedRange.Copy sihtkoht: = töölehed ("leht2"). Vahemik ("A1") lõpp-alam
See kopeerib töölehel “Sheet1” kogu kasutatud vahemiku ja kleepib sama töölehele “Sheet2”