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 > dans le 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!

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
Dim NonEmptyCellCount As Integer
' Exit if a range is not selected
If TypeName(Selection) < > "Range" Then
MsgBox "Select the range to be copied. A multiple selection is allowed."
Exit Sub
End If
' Store the areas as separate Range objects
NumAreas = Selection.Areas.Count
ReDim SelAreas(1 To NumAreas)
For i = 1 To NumAreas
Set SelAreas(i) = Selection.Areas(i)
Next
' Determine the upper left cell in the multiple selection
TopRow = ActiveSheet.Rows.Count
LeftCol = ActiveSheet.Columns.Count
For i = 1 To NumAreas
If SelAreas(i).Row < TopRow Then TopRow = SelAreas(i).Row
If SelAreas(i).Column < LeftCol Then LeftCol = SelAreas(i).Column
Next
Set UpperLeft = Cells(TopRow, LeftCol)
' Get the paste address
On Error Resume Next
Set PasteRange = Application.InputBox _
(Prompt:="Specify the upper left cell for the paste range:", _
Title:="Copy Mutliple Selection", _
Type:=8)
On Error GoTo 0
' Exit if canceled
If TypeName(PasteRange) < > "Range" Then Exit Sub
' Make sure only the upper left cell is used
Set PasteRange = PasteRange.Range("A1")
' Check paste range for existing data
NonEmptyCellCount = 0
For i = 1 To NumAreas
RowOffset = SelAreas(i).Row - TopRow
ColOffset = SelAreas(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
' If paste range is not empty, warn user
If NonEmptyCellCount < > 0 Then _
If MsgBox("Overwrite existing data?", vbQuestion + vbYesNo, _
"Copy Multiple Selection") < > vbYes Then Exit Sub
' Copy and paste each area
For i = 1 To NumAreas
RowOffset = SelAreas(i).Row - TopRow
ColOffset = SelAreas(i).Column - LeftCol
SelAreas(i).Copy PasteRange.Offset(RowOffset, ColOffset)
Next 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:

L' 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:

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

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 .

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.