Copiere VBA Copiere

Similar funcției foii de lucru în excel, putem copia de asemenea datele de lipit sau setul de valori în VBA. În datele normale, folosim fie CTRL + C pentru a copia o selecție de date și apoi folosim CTRL + V pentru a insera datele selectate în celula țintă. Dar la fel și în VBA se realizează prin anumite coduri pe care le vom învăța în acest articol.

Cum folosim copierea și lipirea în Excel VBA? Pentru a face acest lucru mai întâi, trebuie să activăm foaia de lucru sau cartea de lucru de unde dorim să copiem orice gamă de date, iar selecția este copiată de un anumit cod, atunci când selecția respectivă este copiată cu succes, putem merge înainte și lipiți datele în țintă intervalul celular.

Sintaxa pentru a copia datele în VBA este următoarea:

 Interval („celulă originală”) .copie

Acum, sintaxa de a lipi datele în altă foaie de lucru sau orice alt interval de celule este următoarea:

 Interval („Celula de destinație”) .Paste

Folosim operatorul Dot (.) Pentru a utiliza metodele de copiere și lipire în VBA.

Putem copia o coloană întreagă și lipiți-o într-o altă coloană și, de asemenea, putem copia un rând întreg și lipiți-o în alt rând. Vom învăța toate aceste lucruri în acest articol.

Notă: Pentru a utiliza VBA în excel, asigurați-vă că fila pentru dezvoltatori este activată din fila fișierului, apoi la secțiunea de setări de opțiuni.

Cum se folosește copiere Excel VBA?

Vom învăța cum să folosiți VBA Copy Paste cu câteva exemple în Excel.

Puteți descărca acest șablon VBA Copy Paste Excel aici - șablonul VBA Copy Paste Excel

Copiere VBA - Exemplu # 1

În scop demonstrativ, am o valoare aleatorie în celula A1 pe care vreau să o copiez și să o lipesc în celula B1 folosind codul VBA. Aruncați o privire mai jos care sunt datele din celula A1 și celula B1 este goală.

Urmați pașii de mai jos pentru a utiliza Paste de copiere Excel VBA:

Pasul 1: Accesați fila dezvoltatorului și faceți clic pe Visual Basic pentru a deschide VB Editor.

Pasul 2: Odată ce editorul VB se deschide, faceți clic pe insert și apoi faceți clic pe modulul Insert pentru a introduce o fereastră de cod.

Pasul 3: Declarați o sub-funcție pentru a începe să scrieți codul.

Cod:

 Sub eșantion () End Sub

Pasul 4: Activați mai întâi foaia de lucru pentru a utiliza proprietățile foii de lucru de următorul cod.

Cod:

 Sub Eșantion () Fișe de lucru („Foaie1”)

Pasul 5: Copiați datele care se află în celula A1 cu următorul cod.

Cod:

 Sub Eșantion () Fișe de lucru („Foaie1”). Activare interval („A1”).

Pasul 6: Acum lipiți datele copiate în celula țintă care este celula B1 cu următorul cod.

Cod:

 Sub Eșantion () Fișe de lucru („Foaie1”). Activare interval („A1”). Copiere Interval („B1”).

Pasul 7: Rulați codul de mai sus din butonul de rulare furnizat și vedeți rezultatul în celula B1.

Copiere VBA Copiere - Exemplul # 2

Am date în coloana C și vreau să copiez toate datele sau valorile și să le lipesc în coloana D folosind codul VBA. Aruncați o privire mai jos care sunt datele din coloana C și că coloana D este goală.

Urmați pașii de mai jos pentru a utiliza Paste de copiere Excel VBA:

Pasul 1: Accesați fila dezvoltatorului și faceți clic pe Visual Basic pentru a deschide VB Editor.

Pasul 2: Faceți clic pe modulul introdus pentru a deschide fereastra de cod,

Pasul 3: Declarați o sub-funcție pentru a începe să scrieți codul.

Cod:

 Sub Eșantion1 () Final Sub

Pasul 4: Activați mai întâi foaia de lucru cu următorul cod.

Cod:

 Sub Eșantion1 () Fișe de lucru („Foaie1”)

Pasul 5: Copiați datele din coloana C după următorul cod.

Cod:

 Sub Eșantion1 () Fișe de lucru („Foaie1”). Activare interval („C: C”).

Pasul 6: Acum pentru a lipi datele din coloana D folosiți următorul cod.

Cod:

 Sub Eșantion1 () Fișe de lucru ("Foaie1"). Activare interval ("C: C"). Copiere Interval ("D: D"). PasteSpecial End Sub

Pasul 7: Rulați următorul cod din butonul de rulare furnizat sau apăsați F5.

Rulați codul pentru a vedea următorul rezultat.

Copiere VBA Copiere - Exemplul # 3

Acum pentru acest exemplu, am o mulțime de game de date în intervalul de celule G1: H3 și vreau să copiez datele din intervalul de celule I1: J3. Aruncați o privire mai jos asupra datelor pe care le am în intervalul de celule G1: H3 și intervalul de celule I1: J3 este necompletat.

Urmați pașii de mai jos pentru a utiliza Paste de copiere Excel VBA:

Pasul 1: Accesați fila dezvoltatorului și faceți clic pe Visual Basic pentru a deschide VB Editor.

Pasul 2: Faceți clic pe modulul introdus pentru a deschide fereastra de cod,

Pasul 3: Declarați o sub-funcție pentru a începe să scrieți codul.

Cod:

 Sub Eșantion2 () Final Sub

Pasul 4: Activați mai întâi foaia de lucru pentru a-și folosi proprietățile după următorul cod.

Cod:

 Sub Eșantion2 () Fișe de lucru („Foaie1”)

Pasul 5: Copiați datele din intervalul de celule țintă cu următorul cod.

Cod:

 Sub Eșantion2 () Fișe de lucru ("Foaie1"). Activare interval ("G1: H3").

Pasul 6: Acum pentru a lipi datele în celula de destinație, folosiți următorul cod.

Cod:

 Sub Eșantion2 () Fișe de lucru ("Foaie1"). Activare interval ("G1: H3"). Interval de copiere ("I1: J3"). PasteSpecial End Sub

Pasul 7: Rulați codul de mai sus din butonul de rulare furnizat sau apăsați F5 pentru a vedea rezultatul următor.

Copiere VBA Copiere - Exemplul # 4

Pentru acest exemplu, am date în rândul 10 și vreau să lipesc datele din rândul 11. Aruncați o privire de mai jos pentru a vedea care sunt datele din rândul 10 și rândul 11 ​​este vacant.

Urmați pașii de mai jos pentru a utiliza Paste de copiere Excel VBA:

Pasul 1: Accesați fila dezvoltatorului și faceți clic pe Visual Basic pentru a deschide VB Editor.

Pasul 2: Faceți clic pe modulul introdus pentru a deschide fereastra de cod,

Pasul 3: Declarați o sub-funcție pentru a începe să scrieți codul.

Cod:

 Sub Eșantion3 () Final Sub

Pasul 4: Activați foaia de lucru pentru a utiliza proprietățile foii de lucru.

Cod:

 Sub Eșantion 3 () Fișe de lucru („Foaie1”)

Pasul 5: Copiați rândul 10 cu următorul cod.

Cod:

 Sub Eșantion 3 () Fișe de lucru ("Foaie1"). Activare rânduri (10) .EntireRow.Copy Sub End

Pasul 6: Lipiți datele din rândul 10 din rândul 11 ​​cu următorul cod.

Cod:

 Sub Eșantion3 () Fișe de lucru („Foaie1”). Activare rânduri (10) .EntireRow.Copie rânduri (11) .EntireRow.PasteSpecial End Sub

Pasul 7: Rulați codul de mai sus apăsând F5 pentru a vedea următorul rezultat.

Lucruri de amintit

  • Pentru a utiliza datele de pe orice foaie de lucru pentru a le copia, trebuie să activăm mai întâi foaia de lucru.
  • În mod similar, atunci când trebuie să lipim datele în orice altă foaie de lucru din VBA, trebuie să activăm mai întâi foaia de lucru de destinație.
  • În cazul în care copiem întreaga coloană sau rând și lipim datele în orice altă coloană, atunci datele oriunde în rândul sau coloana din celulele țintă sunt copiate și lipite în celulele destinație. Acest lucru poate provoca anumite date nedorite.
  • Cel mai bun mod de a copia datele este copierea unui anumit interval și lipirea datelor în celulele țintă.

Articole recomandate

Acesta a fost un ghid pentru VBA Copy Paste. Aici am discutat despre cum să utilizăm pasta de copiere Excel VBA împreună cu câteva exemple practice și șablonul excel descărcabil. De asemenea, puteți parcurge și alte articole sugerate -

  1. Metoda de lipire în VBA
  2. Opțiunea de introducere rapidă a lipirii Excel
  3. Utilizarea funcției Split în VBA
  4. Stânga TRIM în Excel

Categorie:

VBA