Come trasporre e impilare in modo facile e veloce un intervallo di dati in Excel?
Ad esempio, alcuni dati sono organizzati in gruppi e ora si desidera trasporre l’intervallo impilando i dati di ciascuna colonna, come illustrato nello screenshot seguente. In questo articolo ti spiegheremo passo passo come eseguire questa operazione in Excel.
Trasporre e impilare dati con VBA
Trasporre e impilare dati con la funzione Trasponi tabella Dimension di Kutools 
Trasporre e impilare dati con VBA
È possibile utilizzare una macro VBA per trasporre e impilare i dati.
1. Seleziona i dati (escluse le intestazioni di colonna) e premi i tasti Alt + F11 per aprire la finestra di Microsoft Visual Basic for Applications.
2. Fare clic su Inserisci > Modulo, quindi incollare il codice seguente nel Modulo.
VBA: Trasporre e impilare dati
Sub ConvertTableToList()
'UpdatebyExtendoffice20161121
Const TEST_COLUMN As String = "A"
Dim i As Long, j As Long
Dim iLastRow As Long
Dim iLastCol As Long
Application.ScreenUpdating = False
With ActiveSheet
iLastRow = .Cells(.Rows.Count, TEST_COLUMN).End(xlUp).Row
For i = iLastRow To 2 Step -1
iLastCol = .Cells(i, .Columns.Count).End(xlToLeft).Column
For j = iLastCol To 3 Step -1
.Rows(i + 1).Insert
.Cells(i + 1, 2).Value = .Cells(i, j).Value
.Cells(i, j).Value = ""
Next j
Next i
.Rows(1).Delete
End With
Application.ScreenUpdating = True
End Sub
3. Premere il tasto F5: i dati verranno trasposti e impilati. Vedere lo screenshot:
Nota: Nel codice VBA, la lettera A indica che i dati trasposti verranno posizionati nella colonna A del foglio di lavoro corrente, sostituendo i dati originali presenti in quella colonna.
Trasporre e impilare dati con la funzione Trasponi tabella Dimension di Kutools
Se desideri trasporre e impilare rapidamente un intervallo di dati senza ricorrere al codice VBA, puoi usare l’utilità Kutools per Excel di Trasponi tabella Dimension.
1. Seleziona i dati da utilizzare, quindi fai clic su Kutools > Intervallo > Converti Dimensione Tabella. Vedere lo screenshot:
2. Nella finestra di dialogo, seleziona l’opzione Converti Tabella Bidimensionale in Tabella Unidimensionale e indica in quale cella desideri posizionare i dati trasposti nella casella di testo Intervallo risultati (cella singola). Guarda lo screenshot:
3. Fai clic su Ok. L’intervallo è ora stato trasposto e impilato in colonne.
Kutools per Excel– Potenzia Excel con oltre 300 strumenti essenziali, rendendo il tuo lavoro più veloce e semplice, e sfrutta le funzionalità basate sull’IA per un’elaborazione dati più intelligente e una maggiore produttività.Scaricalo ora
Demo: Trasporre un intervallo e impilare dati con la funzione Trasponi tabella Dimension di Kutools
Migliori Strumenti per la Produttività in Office
Potenzia le tue competenze in Excel con Kutools per Excel e sperimenta un’efficienza mai vista prima.Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e Risparmia tempo.Clicca qui per ottenere la funzionalità di cui hai più bisogno...
Office Tab Porta l'interfaccia a schede in Office e rende il tuo lavoro molto più semplice
- Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Apri e crea più documenti in nuove schede all’interno della stessa finestra, invece che in finestre separate.
- Aumenta la tua produttività del 50 % e risparmia centinaia di clic del mouse ogni giorno!
Tutti i componenti aggiuntivi di Kutools in un unico programma di installazione.
Kutools for Office è la suite che include componenti aggiuntivi per Excel, Word, Outlook e PowerPoint, oltre a Office Tab Pro: la soluzione ideale per i team che lavorano su diverse app di Office.
- Suite completa— componenti aggiuntivi per Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Un unico programma di installazione, una sola licenza— configurazione in pochi minuti (pronto per MSI)
- Funziona meglio insieme— produttività ottimizzata tra le app di Office
- Prova gratuita di 30 giorni con tutte le funzionalità— nessuna registrazione, nessuna carta di credito
- Miglior rapporto qualità-prezzo— risparmia rispetto all’acquisto dei singoli componenti aggiuntivi