Comment créer un bouton de commande pour copier et coller des données dans Excel?
Supposons que vous deviez copier fréquemment une plage de cellules à un autre endroit après avoir modifié les données, la méthode de copier-coller manuellement sera difficile et prend du temps. Comment faire en sorte que cette affaire de copier-coller s'exécute automatiquement? Cet article vous montrera comment utiliser un bouton de commande pour copier et coller des données en un seul clic.
Créez un bouton de commande pour copier et coller des données avec du code VBA
Créez un bouton de commande pour copier et coller des données avec du code VBA
Veuillez procéder comme suit pour copier et coller des données automatiquement lorsque vous cliquez sur un bouton de commande.
1. Insérez un bouton de commande en cliquant sur Développeur > insérer > Bouton de commande (contrôle ActiveX). Voir la capture d'écran:
2. Dessinez un bouton de commande dans votre feuille de calcul et cliquez dessus avec le bouton droit. Sélectionner Voir le code dans le menu contextuel.
3. Dans le pop-up Microsoft Visual Basic pour applications fenêtre, veuillez remplacer le code d'origine dans la fenêtre Code par le code VBA ci-dessous.
Code VBA: utilisez le bouton de commande pour copier et coller des données dans Excel
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
Notes: Dans le code, CommandButton1 est le nom de votre bouton de commande inséré. A1: C17 est la plage que vous devez copier et J1: L17 est la plage de destination pour coller les données. Veuillez les changer selon vos besoins.
4. presse autre + Q touches pour fermer le Microsoft Visual Basic pour applications la fenêtre. Et désactivez le mode de conception sous l'onglet Développeur.
5. Cliquez maintenant sur le bouton de commande, toutes les données de la plage A1: C17 seront copiées et collées dans la plage J1: L17 sans le formatage de cellule.
Débloquez Excel Magic avec Kutools AI
- Exécution intelligente: effectuez des opérations sur les cellules, analysez les données et créez des graphiques, le tout piloté par des commandes simples.
- Formules personnalisées: Générez des formules sur mesure pour rationaliser vos flux de travail.
- Codage VBA: Écrivez et implémentez du code VBA sans effort.
- Interprétation de la formule: Comprendre facilement des formules complexes.
- Traduction de texte: Brisez les barrières linguistiques dans vos feuilles de calcul.
Articles connexes:
- Comment enregistrer et fermer le classeur actif sans invite par un bouton de commande dans Excel?
- Comment toujours faire flotter un bouton de commande sur une feuille de calcul dans Excel?
- Comment mettre à jour ou insérer la date et l'heure (actuelles) par un bouton de commande dans Excel?
- Comment utiliser un bouton de commande pour modifier une valeur de cellule spécifiée dans Excel?
- Comment utiliser le bouton de commande pour enregistrer la feuille de calcul active en tant que fichier PDF dans Excel?
- Comment insérer automatiquement une nouvelle ligne vierge par le bouton de commande dans Excel?
Meilleurs outils de productivité bureautique
Améliorez vos compétences Excel avec Kutools for Excel et faites l'expérience d'une efficacité comme jamais auparavant. Kutools for Excel offre plus de 300 fonctionnalités avancées pour augmenter la productivité et gagner du temps. Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte une interface à onglets à Office et facilite grandement votre travail
- Activer l'édition et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
- Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
- Augmente votre productivité de 50% et réduit des centaines de clics de souris chaque jour!