Con l'aiuto di appunti, puoi incollare tutti gli intervalli selezionati in un altro intervallo o foglio di lavoro alla volta. Si prega di fare quanto segue:

1. Clic Casa > nel appunti gruppo per visualizzare il file appunti Vetro.. Vedi screenshot:

2. Quindi copia gli intervalli selezionati di cui hai bisogno uno per uno. Allo stesso tempo, gli intervalli copiati sono stati visualizzati nel file appunti Vetro. vedi screenshot sopra:

3. Seleziona la prima cella dell'intervallo di destinazione in cui incollerai tutti gli intervalli copiati e fai clic Incolla tutto nel pulsante appunti Pannello.

E poi tutti gli intervalli copiati sono stati incollati nell'intervallo di destinazione specificato.

Combina facilmente più selezioni da molti fogli di lavoro / cartelle di lavoro in un unico foglio di lavoro / cartella di lavoro

Potrebbe essere noioso combinare decine di fogli di cartelle di lavoro diverse in un unico foglio. Ma con Kutools per Excel Combina (fogli di lavoro e cartelle di lavoro) utility, puoi farlo con pochi clic!

Con il codice VBA, puoi anche copiare più intervalli selezionati e incollarli in qualsiasi altro foglio di lavoro.

1. Tenendo il Ctrl chiave e selezionare più intervalli non adiacenti che si desidera utilizzare.

2. stampa altro + F11 chiavi allo stesso tempo per aprire il Microsoft Visual Basic per le applicazioni finestra, fare clic inserire > Modulie inserisci il codice seguente nel modulo:

Opzione 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 se un intervallo non è selezionato Se TypeName (Selezione) <> "Intervallo" Allora MsgBox "Seleziona l'intervallo da copiare. È consentita una selezione multipla." Exit Sub End If 'Memorizza le aree come oggetti Range separati NumAreas = Selection.Areas.Count ReDim SelAreas (1 To NumAreas) For i = 1 To NumAreas Set SelAreas (i) = Selection.Areas (i) Next' Determina l'angolo superiore sinistro cella nella selezione multipla 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) 'Ottieni l'indirizzo incolla On Error Resume Next Set PasteRange = Application.InputBox _ (Prompt: = "Specifica la cella in alto a sinistra per l'incolla range: ", _ Title: =" Copia selezione multipla ", _ Type: = 8) On Error GoTo 0 'Exit if cancelled If TypeName (PasteRange) <>" Range "Then Exit Sub' Assicurati che solo la cella in alto a sinistra sia usato Set PasteRange = PasteRange.Range ("A1") 'Controlla l'intervallo di incolla per i dati esistenti NonEmptyCellCount = 0 Per i = 1 To NumAreas RowOffset = SelAreas (i) .Row - TopRow ColOffset = Sel Aree (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))) Avanti i 'Se l'intervallo di incolla non è vuoto, avvisa l'utente If NonEmptyCellCount <> 0 Then _ If MsgBox ("Overwrite existing data?", vbQuestion + vbYesNo, _ "Copy Multiple Selection ") <> vbYes Then Exit Sub 'Copia e incolla ogni area For i = 1 To NumAreas RowOffset = SelAreas (i) .Row - TopRow ColOffset = SelAreas (i) .Column - LeftCol SelAreas (i) .Copy PasteRange.Offset ( RowOffset, ColOffset) Avanti i End Sub

3. Quindi fare clic su Correre pulsante per eseguire il codice.

4. E ora specifica una cella per incollare gli intervalli nell'apertura Copia selezione multipla finestra di dialogo e fare clic su OK pulsante. Vedi screenshot:

Le Copia più intervalli utilità di Kutools for Excel può aiutarti a copiare facilmente più intervalli dal foglio di lavoro attivo rapidamente. Si prega di fare quanto segue:

1. Seleziona gli intervalli che desideri utilizzare uno per uno senza tenere premuto il tasto Ctrl chiave, quindi fare clic su Kutools > Copia intervalli. Vedi screenshot:

2. Nel Copia più intervalli finestra di dialogo, controllare Tutti opzione da Incolla speciale sezione e fare clic su ok button. Vedi screenshot sopra:

Nota: Se desideri mantenere l'altezza della riga e la larghezza della colonna come gli intervalli originali, controlla Compresa l'altezza della riga opzione e Compresa la larghezza della colonna opzione nella finestra di dialogo Copia più intervalli.

3. E specificare una cella per incollare gli intervalli nella seguente finestra di messaggio e fare clic su OK pulsante.

E ora tutti gli intervalli selezionati verranno incollati nella cella specificata con la stessa altezza di riga e larghezza di colonna delle selezioni originali.

Fare clic qui per ulteriori informazioni sull'utilità Copia più intervalli       

Kutools per Excel ne fornisce un altro Combina fogli di lavoro utilità per copiare più intervalli da molti fogli di lavoro o molte cartelle di lavoro facilmente in Excel. Si prega di fare quanto segue:

1. Clic Kutools Plus > Combinare.

2. Nella finestra di dialogo di apertura Combina fogli di lavoro - Passaggio 1 di 3, selezionare il Combina più fogli di lavoro dalla cartella di lavoro in un foglio di lavoro opzione e fare clic su Successivo pulsante.

3. Nella finestra di dialogo Combina fogli di lavoro - Passaggio 2 di 3, eseguire le seguenti operazioni:

(1) Seleziona la cartella di lavoro nel file Elenco delle cartelle di lavoro sezione, quindi fai clic su Scopri la nostra gamma di prodotti pulsante dietro ogni foglio di lavoro per specificare l'intervallo da ogni foglio di lavoro;
(2) Fare clic su Aggiungi pulsante per aggiungere altre cartelle di lavoro da cui copiare gli intervalli, quindi ripetere sopra (1) per specificare gli intervalli nella cartella di lavoro aggiunta.
(3) Fare clic su Fine pulsante.

4. Quindi viene visualizzata una finestra di dialogo Kutools per Excel che richiede il salvataggio dello scenario di combinazione. Fare clic su Sì pulsante o Non pulsante di cui hai bisogno.

Finora tutti gli intervalli specificati da più fogli di lavoro o cartelle di lavoro sono stati copiati e incollati in una nuova cartella di lavoro.