VBA-pasta

VBA Plakken werkt op dezelfde manier als Kopiëren / Knippen en Plakken in Excel. VBA Plak het de geautomatiseerde versie van wat we regelmatig doen in regelmatig Excel-werk. Gegevens plakken op elke gewenste locatie is de routinetaak. Om deze activiteit uit te voeren, moeten we de locatie bepalen waar we de gegevens zullen kiezen en de locatie waar we deze zullen plakken.

Hoe Excel VBA plakken te gebruiken?

We zullen leren hoe een VBA-pasta te gebruiken met enkele voorbeelden in Excel.

U kunt deze VBA-plak Excel-sjabloon hier downloaden - VBA-plak Excel-sjabloon

VBA Paste - Voorbeeld # 1

Laten we eens kijken naar elke cel in Excel die wat tekst bevat. Hier hebben we de tekst " VBA plakken " in cel B3 bewaard, zoals hieronder weergegeven.

Volg de onderstaande stappen om VBA Paste te gebruiken.

Stap 1: Ga nu naar het VBA-venster en open een nieuwe module in het menu Invoegen zoals hieronder wordt weergegeven.

Stap 2: Zodra we dat doen, krijgen we een lege module. Begin met het schrijven van Subcategorie. Het wordt aanbevolen om een ​​subcategorie te schrijven in de naam van de functie die we uitvoeren.

Code:

 Sub VBAPaste1 () Einde Sub

Stap 3: Selecteer nu eerst de cel Bereik waar we de gegevens hebben die we moeten kopiëren. Hier is onze bereikcel B3, gevolgd door de functie .Copy . Dit kopieert de gegevens in de cel Bereik die we hebben geselecteerd.

Code:

 Sub VBAPaste1 () Bereik ("B3") Kopiëren Einde Sub

Stap 4: Nu hebben we een doelcel nodig waar we deze gekopieerde waarde moeten plakken. Selecteer met behulp van de opdracht Bestemming de cel Bereik. Hier hebben we cel D1 geselecteerd, waar we de waarde zullen zien.

Code:

 Sub VBAPaste1 () Bereik ("B3"). Bestemming kopiëren: = Bereik ("D1") Einde Sub

Stap 5: compileer de code en voer deze uit als u klaar bent.

We zullen zien dat de celinhoud van cel B3 nu wordt gekopieerd en geplakt in cel D3 zoals hierboven weergegeven.

VBA plakken- voorbeeld # 2

Laten we een ander voorbeeld van VBA Paste bekijken. Ga hiervoor naar het VBA-venster en open een module en volg de onderstaande stappen.

Stap 1: Begin met het schrijven van Subcategorie in de naam van VBA Paste of in een andere naam zoals hieronder weergegeven.

Code:

 Sub VBAPaste2 () Einde Sub

Stap 2: Hier zullen we dezelfde gegevens of referentiecel B3 beschouwen die we in voorbeeld-1 hebben gezien. Selecteer de cel Bereik B3 gevolgd door de opdracht .Copy . Hiermee worden de gegevens gekopieerd.

Code:

 Sub VBAPaste2 () Bereik ("B3") Kopiëren Einde Sub

Stap 3: Selecteer nu de bereikcel waar we de gekopieerde gegevens moeten plakken. Hier selecteren we cellen D1 tot D3 in tegenstelling tot het selecteren van slechts één cel zoals getoond in voorbeeld-1.

Code:

 Sub VBAPaste2 () Bereik ("B3"). Kopieerbereik ("D1: D3"). Selecteer End Sub

Stap 4: Nadat we de gegevens hebben gekopieerd en de cellen hebben geselecteerd waar deze moeten worden geplakt. Selecteer nu de opdracht Plakken met behulp van de ActiveSheet- functie. Met dit actieve blad kan de gekopieerde cel in bereikcellen worden geplakt.

Code:

 Sub VBAPaste2 () Bereik ("B3"). Kopieerbereik ("D1: D3"). Selecteer ActiveSheet.Paste End Sub

Stap 5: compileer nu de code en voer deze uit. We zullen zien dat celwaarde uit cel B3 wordt geplakt uit cellen D1 tot D3.

VBA Paste- Voorbeeld # 3

Een andere methode van VBA Paste is het gebruik van het handmatige proces dat we doen voor kopiëren en plakken.

Volg de onderstaande stappen:

Stap 1: Schrijf een Subcategorie van VBA Plakken zoals hieronder getoond.

Code:

 Sub VBAPaste3 () Einde Sub

Stap 2: Het is beter om de reeks aan Subcategorie te geven als u meerdere sets codes in een enkel bestand schrijft. Om iets te plakken, moeten we eerst die gegevens kopiëren. Hier hebben we Kopieeropdracht geselecteerd.

Code:

 Sub VBAPaste3 () Selection.Copy End Sub

Stap 3: Selecteer nu het bereik of de referentiecel die we moeten kopiëren en plakken. Hier hebben we Cell D3 met gegevens "VBA Paste" erin.

Code:

 Sub VBAPaste3 () Selectie. Kopieerbereik ("D3"). Selecteer End Sub

Stap 4: Nu in Excel, selecteren we de cellen waar we de gegevens handmatig moeten plakken of met de Shift + Ctrl + Omhoog / Omlaag-toetsen. Ook hier selecteren we de locatie van cellen op End (xlUp) -opdracht voor het selecteren van het bereik van uitvoercellen.

Code:

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

Stap 5: Selecteer nu het uitvoercelbereik, hier hebben we cellen D1 tot D3 geselecteerd, waar we de geplakte gegevens zullen zien.

Code:

 Sub VBAPaste3 () Selectie. Kopieerbereik ("D3"). Selecteer Bereik (Selectie, Selectie. Einde (xlUp)). Selecteer Bereik ("D1: D3"). Selecteer Einde Sub

Stap 6: Als functie moeten we de plakfunctie uitvoeren, dus moeten we de opdracht plakken in VBA activeren door de opdracht ActiveSheet gevolgd door punt (.) Plakken.

Code:

 Sub VBAPaste3 () Selectie. Kopieerbereik ("D3"). Selecteer Bereik (Selectie, Selectie. Einde (xlUp)). Selecteer Bereik ("D1: D3"). Selecteer ActiveSheet. Plakken Einde Sub

Stap 7: Sta nu eindelijk CutCopyMode-toepassing toe als ONWAAR, wat betekent dat alleen de gegevens worden gekopieerd in plaats van deze ook uit de referentiecel te knippen.

Code:

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

Stap 8: Voordat u de code uitvoert, plaatst u eerst de cursor op cel B3. Compileer vervolgens de code en voer deze uit. We zullen zien dat onze gegevens worden gekopieerd naar cellen D1 tot D3.

VBA Paste- Voorbeeld # 4

Er is een andere manier om VBA Paste in een enkele regel code te gebruiken.

Volg de onderstaande stappen:

Stap 1: Schrijf de subcategorie in de volgorde en naam van een uitgevoerde functie.

Code:

 Sub VBAPaste4 () Einde Sub

Stap 2: Gebruik de opdracht Werkbladen en selecteer het werkblad waar we zullen werken. Hier is onze bladnaam "Blad1". We kunnen Workbook.Sheet (1) ook gebruiken voor het selecteren van "Sheet1" in plaats van dit.

Code:

 Sub VBAPaste4 () werkbladen ("Sheet1"). Einde Sub

Stap 3: Selecteer de cel van waaruit we de gegevens zullen kopiëren. Hier is onze bereikcel B3 die dezelfde gegevens heeft als we in de bovenstaande voorbeelden hebben gezien.

Code:

 Sub VBAPaste4 () Werkbladen ("Sheet1"). Bereik ("B3"). Einde Sub

Stap 4: Voer nu de opdracht Kopiëren in na een punt (.) Voor het kopiëren van de gegevens uit de geselecteerde bereikcel.

Code:

 Sub VBAPaste4 () Werkbladen ("Sheet1"). Bereik ("B3"). Copy End Sub

Stap 5: Gebruik nu de opdracht Bestemming om de locatie te selecteren waar we de gekopieerde gegevens zullen plakken. Selecteer hiervoor Werkblad als "Blad1", wat we aan het begin van dit voorbeeld deden en selecteer de cellen Bereik ergens in hetzelfde blad. Hier hebben we Bereik-uitvoercellen geselecteerd van D1 tot D3.

Code:

 Sub VBAPaste4 () Werkbladen ("Sheet1"). Bereik ("B3"). Kopieerbestemming: = Werkbladen ("Sheet1"). Bereik ("D1: D3") End Sub

Stap 6: Nu compileren en uitvoeren. We zullen de tekst “VBA plakken” uit cel B3 kopiëren en plakken in cellen D1 tot D3 zoals hieronder getoond.

Voordelen van Excel VBA Paste

  • Het toepassen van de eerste 2 voorbeelden is de eenvoudige en snelste manier om VBA Paste toe te passen.
  • Voor enorme gegevens waarbij het moeilijk is om meerdere activiteiten uit te voeren, zou het enorm veel tijd besparen bij het doen van handmatige dingen als we dit soort kleine functies automatiseren.
  • Er is geen limiet voor het kopiëren en plakken van de gegevens.

Dingen om te onthouden

  • Gebruik de subcategorie op een zodanige manier dat als u meerdere modules gebruikt, u de volgorde erin kunt zetten die het volgen en kiezen van de juiste macro eenvoudig maakt.
  • Excel-bestand opslaan in Macro Enable Format zodat geschreven code wordt bewaard voor de volgende keer van gebruik.
  • Als u meerdere coderegels schrijft, is het raadzaam om de code regel voor regel te compileren om te controleren of er een fout in zit.
  • Het wordt aanbevolen om de cursor op cel B3 te plaatsen als u voorbeeld-3 gebruikt.

Aanbevolen artikelen

Dit is een handleiding voor VBA Paste geweest. Hier hebben we VBA Paste besproken en het gebruik van Excel VBA Paste samen met praktische voorbeelden en een downloadbare Excel-sjabloon. U kunt ook onze andere voorgestelde artikelen doornemen -

  1. VBA-wedstrijd | Hoe te gebruiken?
  2. Excel TRANSPOSE-formule
  3. VBA-bereik | Eenvoudige Excel-macro's
  4. Geneste IF-formule in Excel

Categorie:

VBA