Note: The other languages of the website are Google-translated. Back to English

Come ordinare più righe o colonne in modo indipendente contemporaneamente in Excel?

In Excel, puoi applicare la funzione Ordina per ordinare solo una riga o una colonna in un intervallo di colonne, ma, se devi ordinare più righe o colonne in modo indipendente contemporaneamente per ottenere la seguente schermata mostrata. Esistono modi rapidi per risolvere questa attività in Excel?

doc ordina più colonne 1

Ordina più colonne in modo indipendente contemporaneamente con il codice VBA

Ordina più righe in modo indipendente contemporaneamente con il codice VBA


freccia blu freccia destra Ordina più colonne in modo indipendente contemporaneamente con il codice VBA

Per ordinare più colonne in modo indipendente in ordine crescente, il seguente codice VBA può aiutarti, per favore fai come segue:

1. Tieni premuto il ALT + F11 chiavi per aprire il Microsoft Visual Basic, Applications Edition finestra.

2. Clic inserire > Moduloe incolla il codice seguente nel file Modulo Finestra.

Codice VBA: ordina più colonne in modo indipendente contemporaneamente:

Sub SortIndividualJR()
'Updateby Extendoffice
    Dim xRg As Range
    Dim yRg As Range
    Dim ws As Worksheet
    Set ws = ActiveSheet
    On Error Resume Next
    Set xRg = Application.InputBox(Prompt:="Range Selection:", _
                                    Title:="Kutools for excel", Type:=8)
    Application.ScreenUpdating = False
    For Each yRg In xRg
        With ws.Sort
            .SortFields.Clear
            .SortFields.Add Key:=yRg, Order:=xlAscending
            .SetRange ws.Range(yRg, yRg.End(xlDown))
            .Header = xlNo
            .MatchCase = False
            .Apply
        End With
    Next yRg
    Application.ScreenUpdating = True
End Sub

3. Quindi premere F5 chiave per eseguire questo codice e viene visualizzata una finestra di messaggio per ricordarti di selezionare l'intervallo di dati che desideri ordinare in base a ciascuna colonna, vedi screenshot:

doc ordina più colonne 2

4. E poi clicca OK, ogni colonna è stata ordinata in modo dipendente contemporaneamente, vedi screenshot:

doc ordina più colonne 1


freccia blu freccia destra Ordina più righe in modo indipendente contemporaneamente con il codice VBA

Se vuoi ordinare più righe in modo indipendente, ecco anche un codice VBA per te.

1. Seleziona i dati che desideri ordinare in base a ciascuna riga.

doc ordina più colonne 3

2. Tieni premuto il ALT + F11 chiavi per aprire il Microsoft Visual Basic, Applications Edition finestra.

3. Clic inserire > Moduloe incolla il codice seguente nel file Modulo Finestra.

Codice VBA: ordina più righe in modo indipendente contemporaneamente:

Sub SortIndividualR()
'Updateby Extendoffice
    Dim xRg As Range, yRg As Range
    If TypeName(Selection) <> "Range" Then Exit Sub
    Set xRg = Selection
    If xRg.Count = 1 Then
        MsgBox "Select multiple cells!", vbExclamation, "Kutools for Excel"
        Exit Sub
    End If
    With Application
        .ScreenUpdating = False
        .EnableEvents = False
        .Calculation = xlCalculationManual
    End With
    Application.ScreenUpdating = False
    For Each yRg In xRg.Rows
        yRg.Sort Key1:=yRg.Cells(1, 1), _
        Order1:=xlAscending, _
        Header:=xlNo, _
        Orientation:=xlSortRows
    Next yRg
    With Application
        .ScreenUpdating = True
        .EnableEvents = True
        .Calculation = xlCalculationAutomatic
    End With
    Application.ScreenUpdating = True
End Sub

4. Quindi premere F5 chiave per eseguire questo codice, i dati in ogni riga sono stati ordinati contemporaneamente, vedi screenshot:

doc ordina più colonne 4


I migliori strumenti per la produttività in ufficio

Kutools per Excel risolve la maggior parte dei tuoi problemi e aumenta la tua produttività dell'80%

  • Riutilizzo: Inserisci rapidamente formule complesse, grafici e tutto ciò che hai usato prima; Crittografa celle con password; Crea mailing list e invia email ...
  • Bar Super Formula (modifica facilmente più righe di testo e formula); Layout di lettura (leggi e modifica facilmente un gran numero di celle); Incolla su intervallo filtrato...
  • Unisci celle / righe / colonne senza perdere dati; Contenuto delle celle divise; Combina righe / colonne duplicate... Impedisci celle duplicate; Confronta intervalli...
  • Seleziona Duplica o Unico Righe; Seleziona Righe vuote (tutte le celle sono vuote); Super Find e Fuzzy Find in molte cartelle di lavoro; Selezione casuale ...
  • Copia esatta Più celle senza modificare il riferimento della formula; Riferimenti di creazione automatica a più fogli; Inserisci punti elenco, Caselle di controllo e altro ...
  • Estrai testo, Aggiungi testo, Rimuovi per posizione, Rimuovi spazio; Creare e stampare totali parziali di paging; Converti contenuto e commenti tra celle...
  • Super filtro (salva e applica schemi di filtri ad altri fogli); Ordinamento avanzato per mese / settimana / giorno, frequenza e altro; Filtro speciale in grassetto, corsivo ...
  • Combina cartelle di lavoro e fogli di lavoro; Unisci tabelle in base a colonne chiave; Suddividi i dati in più fogli; Conversione in batch xls, xlsx e PDF...
  • Più di 300 potenti funzionalità. Supporta Office/Excel 2007-2021 e 365. Supporta tutte le lingue. Facile implementazione nella tua azienda o organizzazione. Funzionalità complete Prova gratuita di 30 giorni. Garanzia di rimborso di 60 giorni.
scheda kte 201905

Scheda Office porta l'interfaccia a schede a Office e semplifica notevolmente il lavoro

  • 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 della stessa finestra, piuttosto che in nuove finestre.
  • Aumenta la produttività del 50% e riduce ogni giorno centinaia di clic del mouse!
fondo officetab
Commenti (11)
Ancora nessuna valutazione. Puoi essere il primo a votare!
Questo commento è stato fatto dal moderatore sul sito
Quando provo a ordinare le colonne, ordina i dati al di fuori dell'intervallo selezionato! Perchè è questo?
Questo commento è stato fatto dal moderatore sul sito
Funziona benissimo! grazie !
Questo commento è stato fatto dal moderatore sul sito
¿Come puoi ordinare per colore più filati di forma indipendente e cosa le celdas che non hanno colore estén a la derecha?
Questo commento è stato fatto dal moderatore sul sito
Lo adoro, sono curioso di sapere la funzionalità di ordinamento per colore per ogni colonna individualmente. Ho provato questo ma non ha funzionato:


Dim xRg come intervallo
Dim yRg come intervallo
Dim ws come foglio di lavoro
Imposta ws = Foglio attivo
On Error Resume Next
Imposta xRg = Application.InputBox(Prompt:="Selezione intervallo:", _
Titolo:="Ktools for excel", Tipo:=8)
Application.ScreenUpdating = False
Per ogni yRg In xRg
Con ws.Sort
.OrdinaCampi.Cancella
.SortFields.Add Chiave:=yRg, _
SortOn:=xlSortOnCellColor, Order:=xlDescending, DataOption:=xlSortNormal
.SetRange ws.Range(yRg, yRg.End(xlDown))
.Intestazione = xln
.MatchCase = False
.Applicare
Fine Con
Prossimo yRg
Application.ScreenUpdating = True
End Sub
Questo commento è stato fatto dal moderatore sul sito
Grazie mille per questo. Ha davvero aiutato. Vorrei anche sapere come ordinare per colore. Ho 26 colonne, ognuna con diversi tipi di elementi identificati dal colore del carattere. Vorrei alfabetizzare tutte le colonne individualmente ma in un ordine di colore specifico. Come faccio a fare questo?
Questo commento è stato fatto dal moderatore sul sito
Mi hai appena risparmiato diversi mal di testa con questa soluzione! Grazie mille!
Questo commento è stato fatto dal moderatore sul sito
ottimo post, grazie mille!
Questo commento è stato fatto dal moderatore sul sito
Спасибо тебе человек!!
Questo commento è stato fatto dal moderatore sul sito
I miei dati vanno da 0 a 100; Quando provo a ordinare più righe contemporaneamente, inizia i dati con i 100, quindi ordina il resto numericamente dal minimo al massimo, mettendo i 100 sul lato minimo dell'intervallo. Come posso risolvere questo problema?
Questo commento è stato fatto dal moderatore sul sito
Aggiornare; Mi sono reso conto che sta ordinando solo in base alla prima cifra del numero - Come faccio a ordinarlo in base al numero intero?
Questo commento è stato fatto dal moderatore sul sito
Ciao, Devin,
Il codice funziona bene nel mio foglio di lavoro. Potresti caricare il tuo file Excel o lo screenshot dei dati qui? In modo che, possiamo aiutare a verificare dove si trova il problema?
.
Non ci sono ancora commenti pubblicati qui
Lasciate i vostri commenti
Pubblicazione come ospite
×
Valuta questo post:
0   Personaggi
Posizioni suggerite

Seguici

Copyright © 2009 - www.extendoffice.com. | Tutti i diritti riservati. Offerto da ExtendOffice, | Mappa del sito
Microsoft e il logo Office sono marchi o marchi registrati di Microsoft Corporation negli Stati Uniti e / o in altri paesi.
Protetto da Sectigo SSL