Comment créer un bouton de commande pour copier et coller des données dans Excel ?
Supposons que vous ayez besoin de copier fréquemment une plage de cellules vers un autre emplacement après avoir modifié les données. La méthode manuelle de copie et collage peut être fastidieuse et chronophage. Comment automatiser cette tâche de copie et collage ? Cet article va vous montrer comment utiliser un bouton de commande pour copier et coller des données en un seul clic.
Créer un bouton de commande pour copier et coller des données avec du code VBA
Créer un bouton de commande pour copier et coller des données avec du code VBA
Veuillez suivre les étapes ci-dessous pour copier et coller des données automatiquement en cliquant 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 faites un clic droit dessus. Sélectionnez Afficher le code dans le menu contextuel.
3. Dans la fenêtre Microsoft Visual Basic for Applications qui apparaît, remplacez le code original dans la fenêtre Code par le code VBA ci-dessous.
Code VBA : Utiliser un 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 SubRemarque : 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 où coller les données. Veuillez les modifier selon vos besoins.
4. Appuyez sur les touches Alt + Q pour fermer la fenêtre Microsoft Visual Basic for Applications. Désactivez ensuite le Mode Création sous l'onglet Développeur.
5. Maintenant, cliquez 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 des cellules.
Découvrez la magie d'Excel 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 adaptées pour rationaliser vos flux de travail.
- Codage VBA : Écrivez et implémentez du code VBA sans effort.
- Interprétation des formules : Comprenez facilement des formules complexes.
- Traduction de texte : Surmontez les barrières linguistiques dans vos feuilles de calcul.
Articles connexes :
- Comment enregistrer et fermer le classeur actif sans invite à l'aide d'un bouton de commande dans Excel ?
- Comment toujours afficher un bouton de commande flottant sur une feuille de calcul dans Excel ?
- Comment mettre à jour ou insérer la date et l'heure (actuelles) à l'aide d'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 un bouton de commande pour enregistrer la feuille de calcul active en tant que fichier PDF dans Excel ?
- Comment insérer automatiquement une nouvelle ligne vide à l'aide d'un bouton de commande dans Excel ?
Meilleurs outils de productivité pour Office
Améliorez vos compétences Excel avec Kutools pour Excel, et découvrez une efficacité incomparable. Kutools pour Excel propose plus de300 fonctionnalités avancées pour booster votre productivité et gagner du temps. Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte l’interface par onglets à Office, simplifiant considérablement votre travail.
- Activez la modification 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é de50 % et réduit des centaines de clics de souris chaque jour !
Tous les modules complémentaires Kutools. Une seule installation
La suite Kutools for Office regroupe les modules complémentaires pour Excel, Word, Outlook & PowerPoint ainsi qu’Office Tab Pro, idéal pour les équipes travaillant sur plusieurs applications Office.
- Suite tout-en-un — modules complémentaires Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Un installateur, une licence — installation en quelques minutes (compatible MSI)
- Une synergie optimale — productivité accélérée sur l’ensemble des applications Office
- Essai complet30 jours — sans inscription, ni carte bancaire
- Meilleure valeur — économisez par rapport à l’achat d’add-ins individuels