Molte persone usano Excel come un semplice gestore di database, inserendo le informazioni in diverse righe di un foglio di lavoro. Mentre lavori con le tue tabelle di dati, potresti incontrare la necessità di invertire l’ordine delle righe nella tabella. Pertanto, se hai una tabella con dieci righe, le righe andrebbero da dieci a una anziché da una a dieci.

Non esiste una funzione intrinseca in Excel che ti consenta di capovolgere i dati in questo modo. Tuttavia, puoi usare le capacità di ordinamento di Excel per ottenere la stessa cosa seguendo questi passaggi generali:

  1. Inserisci una nuova colonna immediatamente a sinistra della tabella dei dati.

  2. Nelle celle della nuova colonna, inserisci i numeri da 1 a tutte le righe presenti nella tabella.

  3. Seleziona le righe che compongono la tabella dei dati.

  4. Scegli Ordina dal menu Dati. Excel visualizza la finestra di dialogo Ordina.

(Vedi figura 1.)

  1. Nell’elenco a discesa Ordina per, indica che desideri ordinare in base alla colonna appena creata.

  2. Fare clic su Decrescente come tipo di ordinamento.

  3. Fare clic su OK. Excel riordina i dati nell’ordine inverso di quello che erano.

Se devi sfogliare molti dati su base giornaliera, utilizzare i passaggi precedenti può diventare piuttosto stancante. In questo caso, potresti voler creare una macro che faccia il lavoro per te. La seguente macro, FlipRows, farà il trucco:

Sub FlipRows()

Dim vTop As Variant     Dim vEnd As Variant     Dim iStart As Integer     Dim iEnd As Integer         Application.ScreenUpdating = False         iStart = 1         iEnd = Selection.Rows.Count         Do While iStart < iEnd             vTop = Selection.Rows(iStart)

vEnd = Selection.Rows(iEnd)

Selection.Rows(iEnd) = vTop             Selection.Rows(iStart) = vEnd             iStart = iStart + 1             iEnd = iEnd - 1         Loop         Application.ScreenUpdating = True End Sub

Per utilizzare questa macro, tutto ciò che devi fare è selezionare le righe che desideri capovolgere ed eseguirla. La macro non cambierà i tuoi dati, a parte il capovolgimento delle righe. In altre parole, non aggiungerà alcuna colonna di informazioni.

Una caratteristica interessante di questo approccio è che puoi adattarlo rapidamente al capovolgimento delle colonne di dati. Tutto quello che devi fare è cambiare tutte le occorrenze della parola “Righe” in “Colonne”. Così, il seguente diventa la nuova macro:

Sub FlipColumns()

Dim vTop As Variant     Dim vEnd As Variant     Dim iStart As Integer     Dim iEnd As Integer         Application.ScreenUpdating = False         iStart = 1         iEnd = Selection.Columns.Count         Do While iStart < iEnd             vTop = Selection.Columns(iStart)

vEnd = Selection.Columns(iEnd)

Selection.Columns(iEnd) = vTop             Selection.Columns(iStart) = vEnd             iStart = iStart + 1             iEnd = iEnd - 1         Loop         Application.ScreenUpdating = True End Sub

Di nuovo, seleziona semplicemente le colonne che desideri capovolgere e quindi esegui la macro.

_Nota: _

Se desideri sapere come utilizzare le macro descritte in questa pagina (o in qualsiasi altra pagina dei siti ExcelTips), ho preparato una pagina speciale che include informazioni utili.

Fare clic qui per aprire quella pagina speciale in una nuova scheda del browser.

ExcelTips è la tua fonte di formazione economica su Microsoft Excel.

Questo suggerimento (2653) si applica a Microsoft Excel 97, 2000, 2002 e 2003.