Hoe maak je een opdrachtknop om gegevens in Excel te kopiëren en te plakken?
Stel dat u regelmatig een reeks cellen naar een andere plaats moet kopiëren nadat u de gegevens hebt gewijzigd, dan zal de handmatige kopieer- en plakmethode lastig en tijdrovend zijn. Hoe zorg je ervoor dat deze kopieer- en plak-affaire automatisch wordt uitgevoerd? In dit artikel wordt uitgelegd hoe u een opdrachtknop gebruikt om gegevens met slechts één klik te kopiëren en te plakken.
Maak een opdrachtknop om gegevens met VBA-code te kopiëren en te plakken
Maak een opdrachtknop om gegevens met VBA-code te kopiëren en te plakken
Ga als volgt te werk om gegevens automatisch te kopiëren en te plakken wanneer u op een opdrachtknop klikt.
1. Voeg een Command-knop in door te klikken Ontwikkelaar > Invoegen > Commandoknop (ActiveX-besturingselement). Zie screenshot:
2. Teken een opdrachtknop in uw werkblad en klik er met de rechtermuisknop op. Selecteer Bekijk code vanuit het contextmenu.
3. In het opduiken Microsoft Visual Basic voor toepassingen venster, vervang dan de originele code in het codevenster door onderstaande VBA-code.
VBA-code: gebruik de Command-knop om gegevens in Excel te kopiëren en te plakken
Private Sub CommandButton1_Click()
Application.ScreenUpdating = False
Dim xSheet As Worksheet
Set xSheet = ActiveSheet
If xSheet.Name <> "Definitions" And xSheet.Name <> "fx" And xSheet.Name <> "Needs" Then
xSheet.Range("A1:C17 ").Copy
xSheet.Range("J1:L17").PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
End If
Application.ScreenUpdating = True
End Sub
Note: In de code is CommandButton1 de naam van uw ingevoegde Command-knop. A1: C17 is het bereik dat u moet kopiëren en J1: L17 is het doelbereik om gegevens te plakken. Wijzig ze indien nodig.
4. druk op anders + Q toetsen om de Microsoft Visual Basic voor toepassingen venster. En schakel de ontwerpmodus uit onder het tabblad Ontwikkelaar.
5. Klik nu op de Command-knop, alle gegevens in bereik A1: C17 worden gekopieerd en geplakt in bereik J1: L17 zonder de celopmaak.
Gerelateerde artikelen:
- Hoe een actieve werkmap opslaan en sluiten zonder prompt door een opdrachtknop in Excel?
- Hoe kan ik altijd een opdrachtknop op een werkblad in Excel laten zweven?
- Hoe (huidige) datum en tijd bijwerken of invoegen met een opdrachtknop in Excel?
- Hoe gebruik je een opdrachtknop om een opgegeven celwaarde in Excel te wijzigen?
- Hoe de Command-knop te gebruiken om een actief werkblad op te slaan als PDF-bestand in Excel?
- Hoe automatisch een lege nieuwe rij invoegen met de Command-knop in Excel?
Beste Office-productiviteitstools
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen. Klik hier om de functie te krijgen die u het meest nodig heeft...
Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker
- Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
- Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!