VBA Copy Paste

I lighed med regnearkets funktion i Excel kan vi også kopiere indsæt data eller sæt af værdier i VBA. I normale data bruger vi enten CTRL + C til at kopiere et udvalg af data og derefter bruge CTRL + V til at indsætte de valgte data i målcellen. Men det samme i VBA gøres ved hjælp af visse koder, som vi vil lære i denne artikel.

Hvordan bruger vi kopiere og indsætte i Excel VBA? For at gøre dette først, er vi nødt til at aktivere målarbejdsarket eller arbejdsbogen, hvorfra vi ønsker at kopiere alle dataintervaller, og at markeringen kopieres af en bestemt kode, når dette valg er kopieret, kan vi gå videre og indsætte dataene i målet celleområde.

Syntaks til kopiering af dataene i VBA er som følger:

 Range ("Original Cell") .Kopi

Nu er syntaks for at indsætte dataene i andet regneark eller et andet celleområde som følger:

 Område ("Destinationscelle"). Indsæt

Vi bruger Dot (.) -Operatøren til at bruge kopierings- og indsætningsmetoderne i VBA.

Vi kan kopiere en hel kolonne og indsætte den i en anden kolonne, og på lignende måde kan vi også kopiere en hel række og indsætte den i en anden række. Vi lærer alle disse ting i denne artikel.

Bemærk: For at bruge VBA i Excel skal du sikre dig, at Developer's Tab er aktiveret fra File's Tab og derefter til afsnittet med indstillinger for indstillinger.

Hvordan bruges Excel VBA Copy Paste?

Vi lærer, hvordan man bruger VBA Copy Paste med få eksempler i Excel.

Du kan downloade denne VBA Copy Paste Excel Template her - VBA Copy Paste Excel Template

VBA Copy Paste - Eksempel # 1

Til demonstrationsformål har jeg en tilfældig værdi i celle A1, som jeg vil kopiere og indsætte den til celle B1 vha. VBA-kode. Se nedenfor, hvad dataene er i celle A1 og celle B1 er tom.

Følg nedenstående trin for at bruge Excel VBA Copy Paste:

Trin 1: Gå til fanen til udvikleren, og klik på Visual Basic for at åbne VB Editor.

Trin 2: Når VB Editor åbnes, skal du klikke på indsæt og derefter klikke på Indsæt modul for at indsætte et kodevindue.

Trin 3: Erklær en underfunktion for at begynde at skrive koden.

Kode:

 Undereksempel () Slutundert

Trin 4: Aktivér regnearket først for at bruge egenskaberne for regnearket med følgende kode.

Kode:

 Undereksempel () Arbejdsark ("Ark1"). Aktivér slutund

Trin 5: Kopier dataene, der er i celle A1 ved hjælp af følgende kode.

Kode:

 Undereksempel () Arbejdsark ("Ark1"). Aktivér rækkevidde ("A1")

Trin 6: Indsæt nu de kopierede data i målcellen, der er celle B1, med følgende kode.

Kode:

 Underprøve () Arbejdsark ("Ark1"). Aktivér rækkevidde ("A1"). Kopieringsområde ("B1"). IndsætSpecial End Sub

Trin 7: Kør ovennævnte kode fra den medfølgende køreknap, og se resultatet i celle B1.

VBA Copy Paste - Eksempel # 2

Jeg har data i kolonne C, og jeg vil kopiere alle data eller værdier og indsætte dem i kolonne D ved hjælp af VBA-kode. Se nedenfor, hvad der er dataene i kolonne C, og at kolonne D er tom.

Følg nedenstående trin for at bruge Excel VBA Copy Paste:

Trin 1: Gå til fanen til udvikleren, og klik på Visual Basic for at åbne VB Editor.

Trin 2: Klik på det indsatte modul for at åbne kodevinduet,

Trin 3: Erklær en underfunktion for at begynde at skrive koden.

Kode:

 Underprøve1 () Slutundert

Trin 4: Aktivér regnearket først med følgende kode.

Kode:

 Undereksempel1 () Arbejdsark ("Ark1"). Aktivér slutund

Trin 5: Kopier dataene i kolonne C med følgende kode.

Kode:

 Undereksempel1 () Arbejdsark ("Ark1"). Aktivér rækkevidde ("C: C").

Trin 6: For at indsætte dataene i kolonne D skal du bruge følgende kode.

Kode:

 Underprøve1 () Arbejdsark ("Ark1"). Aktivér rækkevidde ("C: C"). Kopieringsområde ("D: D"). Indsæt Speciel slutund

Trin 7: Kør følgende kode fra den medfølgende køreknap, eller tryk på F5.

Kør koden for at se følgende resultat.

VBA Copy Paste - Eksempel # 3

Nu til dette eksempel har jeg en hel bunke datainterval i celleområdet G1: H3, og jeg vil kopiere dataene i celleområdet I1: J3. Se nedenfor på de data, jeg har i celleområdet G1: H3, og celleområdet I1: J3 er tomt.

Følg nedenstående trin for at bruge Excel VBA Copy Paste:

Trin 1: Gå til fanen til udvikleren, og klik på Visual Basic for at åbne VB Editor.

Trin 2: Klik på det indsatte modul for at åbne kodevinduet,

Trin 3: Erklær en underfunktion for at begynde at skrive koden.

Kode:

 Undereksempel2 () Slutundert

Trin 4: Aktivér regnearket først for at bruge dets egenskaber ved følgende kode.

Kode:

 Undereksempel2 () Arbejdsark ("Ark1"). Aktivér slutund

Trin 5: Kopier dataene i målcelleområdet med følgende kode.

Kode:

 Undereksempel2 () Arbejdsark ("Ark1"). Aktivér rækkevidde ("G1: H3").

Trin 6: For at indsætte dataene i destinationscellen skal du bruge følgende kode.

Kode:

 Underprøve2 () Arbejdsark ("Ark1"). Aktivér rækkevidde ("G1: H3"). Kopieringsområde ("I1: J3"). Indsæt Speciel slutund

Trin 7: Kør ovennævnte kode fra den medfølgende køreknap, eller tryk på F5 for at se følgende resultat.

VBA Copy Paste - Eksempel # 4

I dette eksempel har jeg data i række 10, og jeg vil indsætte dataene i række 11. Kig nedenfor for at se, hvad dataene er i række 10, og række 11 er ledig.

Følg nedenstående trin for at bruge Excel VBA Copy Paste:

Trin 1: Gå til fanen til udvikleren, og klik på Visual Basic for at åbne VB Editor.

Trin 2: Klik på det indsatte modul for at åbne kodevinduet,

Trin 3: Erklær en underfunktion for at begynde at skrive koden.

Kode:

 Undereksempel3 () Slutundersøgelse

Trin 4: Aktivér regnearket for at bruge regnearkets egenskaber.

Kode:

 Undereksempel3 () Arbejdsark ("Ark1"). Aktivér slutund

Trin 5: Kopier række 10 med følgende kode.

Kode:

 Undereksempel3 () Arbejdsark ("Ark1"). Aktivér rækker (10) .EntireRow.Copy End Sub

Trin 6: Indsæt dataene fra række 10 i række 11 med følgende kode.

Kode:

 Undereksempel3 () Arbejdsark ("Ark1"). Aktivér rækker (10) .EntireRow.Copy Rows (11) .EntireRow.PasteSpecial End Sub

Trin 7: Kør ovenstående kode ved at trykke på F5 for at se følgende resultat.

Ting at huske

  • For at bruge data fra ethvert regneark til at kopiere dem, er vi nødt til at aktivere regnearket først.
  • Tilsvarende, når vi er nødt til at indsætte dataene i et hvilket som helst andet regneark i VBA, skal vi først aktivere destinationsarket.
  • I tilfælde af at vi kopierer hele kolonnen eller rækken og indsætter dataene i en hvilken som helst anden kolonne, bliver data overalt i rækken eller kolonnen i målcellerne kopieret og indsat til destinationsceller. Dette kan medføre nogle visse uønskede data.
  • Den bedste måde at kopiere dataene er ved at kopiere et bestemt interval og indsætte dataene i målcellerne.

Anbefalede artikler

Dette har været en guide til VBA Copy Paste. Her diskuterede vi, hvordan man bruger Excel VBA Copy-pasta sammen med nogle praktiske eksempler og downloadbar excel-skabelon. Du kan også gennemgå vores andre foreslåede artikler -

  1. Indsæt metode i VBA
  2. Valg af Excel-indsæt genvej
  3. Brug af splitfunktion i VBA
  4. Venstre TRIM i Excel

Kategori:

VBA