Passer au contenu principal

Comment copier plusieurs sélections ou plages dans Excel?

Par exemple, vous disposez d'une feuille de calcul volumineuse et vous souhaitez désormais uniquement copier certaines plages sélectionnées et les distribuer à d'autres feuilles de calcul. Mais lorsque vous sélectionnez plusieurs plages et cliquez sur Copier, une boîte de dialogue d'invite s'affiche pour vous rappeler: "Cette commande ne peut pas être utilisée sur plusieurs sélections." Dans cette condition, comment copier rapidement plusieurs plages sélectionnées? Voici quelques astuces pour résoudre cette tâche.


Copier plusieurs plages sélectionnées avec le Presse-papiers

Avec l'aide d' presse-papiers, vous pouvez coller toutes les plages sélectionnées dans une autre plage ou feuille de calcul à la fois. Veuillez procéder comme suit:

1Cliquez sur Accueil > doc copier plusieurs plages 09 dans l' presse-papiers groupe pour afficher le presse-papiers Pains Typiques.. Voir la capture d'écran:

2. Et puis copiez les plages sélectionnées dont vous avez besoin une par une. Dans le même temps, les plages copiées sont apparues dans le presse-papiers Pains Typiques. voir capture d'écran ci-dessus:

3. Sélectionnez la première cellule de la plage de destination dans laquelle vous allez coller toutes les plages copiées, puis cliquez sur Coller tout bouton dans le presse-papiers Vitre.

Et puis toutes les plages copiées ont été collées dans la plage de destination spécifiée.

Combinez facilement plusieurs sélections de nombreuses feuilles de calcul / classeurs dans une seule feuille de calcul / classeur

Il peut être fastidieux de combiner des dizaines de feuilles provenant de différents classeurs en une seule. Mais avec Kutools pour Excel Combiner (feuilles de calcul et classeurs) utilitaire, vous pouvez le faire en quelques clics!


ad combiner feuilles livres 1

Kutools for Excel - Boostez Excel avec plus de 300 outils essentiels. Profitez d'un essai GRATUIT complet de 30 jours sans carte de crédit requise ! Achetez-le Maintenant

Copiez plusieurs plages sélectionnées avec le code VBA

Avec le code VBA, vous pouvez également copier plusieurs plages sélectionnées et les coller dans n'importe quelle autre feuille de calcul.

1. Tenir le Ctrl et sélectionnez plusieurs plages non adjacentes que vous souhaitez utiliser.

2. presse autre + F11 en même temps pour ouvrir le Microsoft Visual Basic pour les applications fenêtre, cliquez sur insérer > Moduleet entrez le code suivant dans le module:

Option Explicit Sub CopyMultipleSelection () Dim SelAreas () As Range Dim PasteRange As Range Dim UpperLeft As Range Dim NumAreas As Integer, i As Integer Dim TopRow As Long, LeftCol As Integer Dim RowOffset As Long, ColOffset As Integer Dimit NonEmptyCellCount As Integer 'Exit si une plage n'est pas sélectionnée Si TypeName (Selection) <> "Range" Then MsgBox "Sélectionnez la plage à copier. Une sélection multiple est autorisée." Exit Sub End If 'Stocker les zones en tant qu'objets Range séparés NumAreas = Selection.Areas.Count ReDim SelAreas (1 To NumAreas) For i = 1 To NumAreas Set SelAreas (i) = Selection.Areas (i) Next' Déterminer le coin supérieur gauche cellule dans la sélection multiple TopRow = ActiveSheet.Rows.Count LeftCol = ActiveSheet.Columns.Count For i = 1 To NumAreas If SelAreas (i) .Row <TopRow Then TopRow = SelAreas (i) .Row Si SelAreas (i) .Column <LeftCol Then LeftCol = SelAreas (i) .Column Next Set UpperLeft = Cells (TopRow, LeftCol) 'Obtenir l'adresse de collage En cas d'erreur Resume Next Set PasteRange = Application.InputBox _ (Prompt: = "Spécifiez la cellule supérieure gauche pour le collage range: ", _ Title: =" Copy Mutliple Selection ", _ Type: = 8) On Error GoTo 0 'Quitter si annulé If TypeName (PasteRange) <>" Range "Then Exit Sub' Assurez-vous que seule la cellule supérieure gauche est used Set PasteRange = PasteRange.Range ("A1") 'Vérifier la plage de collage pour les données existantes NonEmptyCellCount = 0 For i = 1 To NumAreas RowOffset = SelAreas (i) .Row - TopRow ColOffset = Sel Areas (i) .Column - LeftCol NonEmptyCellCount = NonEmptyCellCount + _ Application.CountA (Range (PasteRange.Offset (RowOffset, ColOffset), _ PasteRange.Offset (RowOffset + SelAreas (i) .Rows.Count - 1, _ ColOffset + SelAreas) (i) .Columns.Count - 1))) Next i 'Si coller la plage n'est pas vide, avertir l'utilisateur If NonEmptyCellCount <> 0 Then _ If MsgBox ("Overwrite existing data?", vbQuestion + vbYesNo, _ "Copy Multiple Selection ") <> vbYes Then Exit Sub 'Copiez et collez chaque zone For i = 1 To NumAreas RowOffset = SelAreas (i) .Row - TopRow ColOffset = SelAreas (i) .Column - LeftCol SelAreas (i) .Copy PasteRange.Offset ( RowOffset, ColOffset) Suivant i End Sub

3. Puis cliquez sur le Courir bouton pour exécuter le code.

4. Et maintenant, veuillez spécifier une cellule pour coller les plages dans l'ouverture Copier plusieurs sélections boîte de dialogue, puis cliquez sur le OK bouton. Voir la capture d'écran:


Copiez rapidement plusieurs plages sélectionnées à partir d'une feuille de calcul

La Copier plusieurs plages utilité de Kutools for Excel peut vous aider à copier rapidement plusieurs plages de la feuille de calcul active. Veuillez procéder comme suit:

Kutools for Excel - Boostez Excel avec plus de 300 outils essentiels. Profitez d'un essai GRATUIT complet de 30 jours sans carte de crédit requise ! Achetez-le Maintenant

1. Sélectionnez les plages que vous souhaitez utiliser une par une sans maintenir la touche Ctrl clé, puis cliquez sur Kutools > Copier les plages. Voir la capture d'écran:

2. Dans le Copier plusieurs plages boîte de dialogue, cochez Tous option de Coller spécial section, et cliquez sur D'accord button. Voir la capture d'écran ci-dessus:

Remarque: Si vous souhaitez conserver la hauteur de ligne et la largeur de colonne comme plages d'origine, veuillez vérifier Y compris la hauteur de ligne option et Y compris la largeur de colonne dans la boîte de dialogue Copier plusieurs plages.

3. Et spécifiez une cellule pour coller les plages dans la boîte d'invite suivante, puis cliquez sur le bouton OK .

Et maintenant, toutes les plages sélectionnées seront collées dans la cellule spécifiée avec la même hauteur de ligne et la même largeur de colonne que les sélections d'origine.

Cliquez ici pour plus d'informations sur l'utilitaire Copier plusieurs plages       

Kutools for Excel - Boostez Excel avec plus de 300 outils essentiels. Profitez d'un essai GRATUIT complet de 30 jours sans carte de crédit requise ! Achetez-le Maintenant


Copier plusieurs plages de plusieurs feuilles de calcul / classeurs

Kutools for Excel fournit un autre Combiner des feuilles de travail utilitaire pour copier facilement plusieurs plages de plusieurs feuilles de calcul ou de nombreux classeurs dans Excel. Veuillez procéder comme suit:

Kutools for Excel - Boostez Excel avec plus de 300 outils essentiels. Profitez d'un essai GRATUIT complet de 30 jours sans carte de crédit requise ! Achetez-le Maintenant

1. Cliquez Kutools Plus > Combiner.

2. Dans la boîte de dialogue Ouverture des feuilles de calcul Combine - Étape 1 sur 3, veuillez cocher la case Combinez plusieurs feuilles de calcul d'un classeur dans une seule feuille de calcul option, et cliquez sur le Suivant .

3. Dans la boîte de dialogue Combiner les feuilles de calcul - Étape 2 sur 3, procédez comme suit:

(1) Sélectionnez le classeur dans le Liste des classeurs section, puis cliquez sur le Explorer bouton derrière chaque feuille de calcul pour spécifier la plage de chaque feuille de calcul;
(2) Cliquez sur le Ajouter pour ajouter d'autres classeurs dont vous allez copier des plages, puis répétez ci-dessus (1) pour spécifier des plages dans le classeur ajouté.
(3) Cliquez sur le Finition .

Kutools for Excel - Boostez Excel avec plus de 300 outils essentiels. Profitez d'un essai GRATUIT complet de 30 jours sans carte de crédit requise ! Achetez-le Maintenant

4. Ensuite, une boîte de dialogue Kutools pour Excel apparaît et demande un scénario de combinaison de sauvegarde. Veuillez cliquer sur le Oui bouton ou Non bouton selon vos besoins.

Jusqu'à présent, toutes les plages spécifiées de plusieurs feuilles de calcul ou classeurs ont été copiées et collées dans un nouveau classeur.


Démo: copiez plusieurs plages sélectionnées à partir d'une feuille de calcul

Démo: Copiez plusieurs plages sélectionnées à partir de nombreux classeurs / feuilles de calcul


Kutools for Excel: Plus de 300 outils pratiques à portée de main ! Commencez dès aujourd’hui votre essai gratuit de 30 jours sans limitation de fonctionnalités. Télécharger maintenant!

Meilleurs outils de productivité bureautique

🤖 Aide à l'IA Kutools: Révolutionner l'analyse des données en s'appuyant sur : Exécution intelligente   |  Générer du code  |  Créer des formules personnalisées  |  Analyser les données et générer des graphiques  |  Invoquer les fonctions Kutools...
Caractéristiques populaires: Rechercher, mettre en évidence ou identifier les doublons   |  Supprimer les lignes vides   |  Combinez des colonnes ou des cellules sans perdre de données   |   Tour sans formule 
Super recherche: VSearchup à critères multiples    VSearch à valeurs multiples  |   Recherche virtuelle sur plusieurs feuilles   |   Recherche floue ....
Liste déroulante avancée: Créez rapidement une liste déroulante   |  Liste déroulante dépendante   |  Liste déroulante à sélection multiple ....
Gestionnaire de colonnes: Ajouter un nombre spécifique de colonnes  |  Déplacer les colonnes  |  Basculer l'état de visibilité des colonnes masquées  |  Comparer les plages et les colonnes 
Caractéristiques en vedette: Mise au point de la grille   |  Voir Design   |   Grande barre de formule    Gestionnaire de classeurs et de feuilles   |  Centre de ressources (Texte automatique)   |  Sélecteur de date   |  Combiner des feuilles de travail   |  Crypter/déchiffrer les cellules    Envoyer des e-mails par liste   |  Super filtre   |   Filtre spécial (filtre gras/italique/barré...) ...
Les 15 meilleurs ensembles d'outils12 Texte Outils (Ajouter du texte, Supprimer les caractères, ...)   |   50+ Graphique Types (Diagramme de Gantt, ...)   |   40+ Pratique Formules (Calculer l'âge en fonction de l'anniversaire, ...)   |   19 Insertion Outils (Insérer le code QR, Insérer une image à partir du chemin, ...)   |   12 Conversion Outils (Nombres en mots, Conversion des devises, ...)   |   7 Fusionner et fractionner Outils (Lignes de combinaison avancées, Cellules divisés, ...)   |   ... et plus

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...

Description


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!
Comments (14)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hi there,
Great code but wondered how I can paste values rather than just paste?
Thanks :)
This comment was minimized by the moderator on the site
Hi there,
Great post and the VBA code works perfectly. Is it possible to change the code to paste special > values? If so, how?
Thanks!
This comment was minimized by the moderator on the site
Hi. Nice code, works great. Is it possible to modify the code in a way such that it is possible to insert/paste the market row/ranges multiple times instead of just one time?
This comment was minimized by the moderator on the site
Hi Jacob,
Maybe this Insert Title Rows feature of Kutools for Excel can solve your problem.
https://www.extendoffice.com/product/kutools-for-excel/excel-insert-title-rows.html
This comment was minimized by the moderator on the site
Hi! How do I use the same VBA Code above but instead of simply pasting, I would like it to paste special for just the values. The table I am putting the values (constants) into is already formatted and with totals (formulas)
Thanks so much in advance!
This comment was minimized by the moderator on the site
Hi Katrina Manahan,

Please open the Microsoft Visual Basic for applications window, and create a new Module, just press CTRL + V to paste the VBA code directly. The sequence numbers before code won't be pasted.
This comment was minimized by the moderator on the site
Thanks for the code, works perfectly. This odd lack of function within Excel has stumped me many times in the past. It's normally quicker in the end to work around it, but in this case I have 4000 individually colour-coded cells so any work-around would have taken a long time, so I'm very grateful. Steve
This comment was minimized by the moderator on the site
Hi, Is it possible to adjust the code so that the copied cells can be pasted in another sheet? Now I get the error message "400" when I attempt this. I use Office 2010. Also, is it possible to copy so that empty lines are deleted? I have a big document and I copy some cells with hundreds of non-copied rows between them. This makes for a rather bulky output.
This comment was minimized by the moderator on the site
I found that if you have the Clipboard task plane open you can copy multiple rows simply using ctrl+C and paste them in order with crtl+V using Excel 2007.
This comment was minimized by the moderator on the site
Thank you SOOOOOO much - what a great site
This comment was minimized by the moderator on the site
Found above explanation of options to copy multiple ranges very helpful - thanks! I used the 'clipboard' option to copy multiple rows. Had to select each group of consecutive rows and copy it, move on and select next row or group of consecutive rows and copy it, etc.. But after this its easy, go to where you want to paste them, eg a new sheet, and click 'Paste all' from the Clipboard and all the rows are copied to there with out any gaps! Exactly what I wanted - thanks again!
This comment was minimized by the moderator on the site
I want to select the rows like 1, 5,6,10. so how can i copy these rows ???
This comment was minimized by the moderator on the site
In this case you can just select the rows and copy them as usual.
This comment was minimized by the moderator on the site
How can I copy cell a1, e5, g2, and so on.... (more than 1000 cells in same column) and paste them into b1, f5, h2 (right into the next column in same row.)
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations