Ordinare le colonne di Excel ...come wikipedia

[nippon]

Buongiorno a tutti.

Scusate il titolo criptico.

Per lavoro dovrei incolonnare dei dati. Ho visto che su Excel c'è la funzione "ordina per", che permette di ordinare i dati secondo determinati criteri; inoltre è successivamente possibile usare la funzione "quindi", che permette di dare priorità tra le varie colonne.

C'è però un sistema per incolonnare velocemente i dati di una colonna in ordine alfabetico A-Z / Z-A (oppure 0-9 / 9-0), facendo però in modo che anche le altre colonne si muovano di conseguenza? Per capirci, sarebbe quello che fanno i due triangolini divergenti sopra le varie colonne in Wikipedia.

Spero d'esser stato chiaro

[Anthony47]

Bentornato!

Non capisco a cosa tu alluda quando parli dei triangolini di Wikipedia, ne' sono certo di aver capito la domanda…
Comunque se, parlando di Excel, selezioni le N colonne di una tabella e ordini con un criterio a scelta una colonna a scelta (o piu' criteri su piu' colonne) anche le altre colonne vengono riarrangiate, in modo che i record (le N celle della stessa riga) non vengano "scombussolati"; scombussolamento che invece succede se selezioni solo la colonna che vai a ordinare.

Se questa affermazione non ti accende una lucina allora spiega "meglio" di quale prestazione parli e vedremo.

Ciao

[nippon]

Ciao Anthony

Scusa il ritardo della risposta.
Stavo cercando qualche esempio pratico su wikipedia ma non sono riuscito a trovare nulla...
In pratica alcune pagine hanno delle colonne con dei vari dati; ipotizziamo si parli di qualcosa ordinato per anno, dimensione, energia (tiro fuori parole a caso...).
Cliccando su questi 2 triangolini divergenti, posso ordinare le colonne per anno (A/Z, oppure cliccandoci nuovamente sopra Z/A), per dimensione e per energia, e tutte le altre colonne si regolano di conseguenza. Non so come spiegarlo meglio di così...

[wallace&gromit]

Non è ancora chiaro dove ti blocchi, se hai trovato il comando "ordina" sei passato vicino alle icone AZ e ZA che fanno esattamente qunanto chiedi, di principio ordinano sempre usando come criterio la colonna in cui hai una cella selezionata, mantenendo la coerenza all'interno delle righe adiacenti. Se, come suggerito da Anthony, hai tutta una colonna selezionata, prima di ordinare quella singola colonna in modo disgiunto da quelle adiacenti, ti chiede conferma.

nippon / data / energia -> saranno terremoti?

[nippon]

Nel senso che su wiki si possono cliccare velocemente queste frecce divergenti per ordinare, mentre su Excel bisogna andare su ordina per, risultando più macchinoso. Mi serviva perciò una cosa così rapida se possibile.

[Marius44]

Ciao
Se ho capito bene e se stiamo parlando di un Foglio Excel, prova con questa macro

Codice: Seleziona tutto

Option Explicit

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim ur As Long, dtc As Long
Dim dt1 As String, dt2 As String, LC As String, crit As String, quad As String
Dim ord
If Not Intersect(Target, Range("A1:E1")) Is Nothing Then
  ur = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row 'ultima cella piena
  dtc = Target.Column                                 'colonna cliccata
  dt1 = Cells(2, dtc).Value                           'dato riga2
  dt2 = Cells(3, dtc).Value                           'dato riga3
  'cambia tipo ordinamento
  If dt1 > dt2 Then
    ord = xlAscending
  ElseIf dt2 > dt1 Then
    ord = xlDescending
  End If
  'trasforma num.col. in lettera
  LC = Replace(Cells(1, dtc).Address(False, False), "1", "")
  'imposta stringhe
  crit = LC & "2:" & LC & ur
  quad = "A1:E" & ur
  'ordinamento
  ActiveWorkbook.ActiveSheet.Sort.SortFields.Clear
  ActiveWorkbook.ActiveSheet.Sort.SortFields.Add Key:=Range(crit _
        ), SortOn:=xlSortOnValues, Order:=ord, DataOption:=xlSortNormal
  With ActiveWorkbook.ActiveSheet.Sort
        .SetRange Range(quad)
        .Header = xlYes
        .MatchCase = False
        .Orientation = xlTopToBottom
        .SortMethod = xlPinYin
        .Apply
  End With
  Cells(1, 6).Select
End If
End Sub


Ti allego il file sul quale ho lavorato. Basta selezionare una cella dell'intervallo A1:E1

http://www.filedropper.com/ordinammarius

Fai sapere. Ciao,
Mario

[Anthony47]

Al messaggio di W&G aggiungo che se i dati da ordinare fanno parte di una "struttura tabella" allora l'ordinamento coinvolge automaticamente tutte le colonne della tabella, senza bisogno di selezionarle; basta selezionare quale colonna usare come base dell'ordinamento e premere il tasto A-Z oppure Z-A.

Per cose piu' complicate prova la macro di Marius (vedi sopra)

Ciao a tutti