Come ordinare i fogli di lavoro in ordine alfabetico / alfanumerico in Excel?
Normalmente è possibile ordinare o organizzare l'ordine delle schede del foglio di lavoro in Excel trascinando e rilasciando le schede del foglio sulla barra delle schede del foglio. Ma per farlo con più fogli di lavoro, potresti prendere in considerazione i seguenti modi complicati per ordinare rapidamente i fogli di lavoro in ordine alfabetico / alfanumerico in una grande cartella di lavoro.
Ordina i fogli di lavoro in ordine alfabetico / alfanumerico con codice VBA
Ordina i fogli di lavoro in ordine alfabetico / alfanumerico con Kutools per Excel
Ordina i fogli di lavoro in ordine alfabetico / alfanumerico con codice VBA
Esiste una macro per l'ordinamento dei fogli di lavoro in base all'alfa pubblicata nel centro di supporto Microsoft. Possiamo applicarlo con i seguenti passaggi:
1. Tenere premuto il tasto ALT + F11 chiavi e apre il file Microsoft Visual Basic, Applications Edition finestra.
2. Clicchi inserire > Modulie quindi incolla la seguente macro nel file Finestra del modulo.
VBA: ordina i fogli in ordine alfabetico / alfanumerico
Sub SortWorkBook()
'Updateby20140624
Dim xResult As VbMsgBoxResult
xTitleId = "KutoolsforExcel"
xResult = MsgBox("Sort Sheets in Ascending Order?" & Chr(10) & "Clicking No will sort in Descending Order", vbYesNoCancel + vbQuestion + vbDefaultButton1, xTitleId)
For i = 1 To Application.Sheets.Count
For j = 1 To Application.Sheets.Count - 1
If xResult = vbYes Then
If UCase$(Application.Sheets(j).Name) > UCase$(Application.Sheets(j + 1).Name) Then
Sheets(j).Move after:=Sheets(j + 1)
End If
ElseIf xResult = vbNo Then
If UCase$(Application.Sheets(j).Name) < UCase$(Application.Sheets(j + 1).Name) Then
Application.Sheets(j).Move after:=Application.Sheets(j + 1)
End If
End If
Next
Next
End Sub
3. premi il F5 chiave per eseguire questa macro. Nella seguente finestra di messaggio, fare clic su Sì, tutti i fogli di lavoro verranno ordinati in ordine alfabetico crescente; e fare clic Non, tutti i fogli di lavoro verranno ordinati in ordine alfabetico decrescente.
Ordina i fogli di lavoro in ordine alfabetico / alfanumerico con Kutools per Excel
Se non hai familiarità con le macro o preferisci altri modi, puoi provare Kutools for Excel. Kutools for Excel's Ordina fogli lo strumento può ordinare facilmente tutti i fogli di lavoro.
Prima di applicare Kutools for Excel, Per favore scaricalo e installalo prima.
1. Clic Kutools Plus > Foglio di lavoro > Ordina fogli. Vedi screenshot:
2. Nel Ordina fogli finestra di dialogo, selezionare un tipo di ordinamento necessario nel riquadro di destra, ad esempio tipo alfa, Ordinamento alfanumericoe quindi fare clic su OK pulsante. Vedi screenshot:
Quindi tutti i fogli di lavoro vengono ordinati in base al tipo di ordinamento specificato. Vedi screenshot:
Kutools for Excel's Ordina fogli lo strumento può riorganizzare rapidamente tutti i fogli di lavoro nella cartella di lavoro attiva. Supporta diversi tipi di ordinamento, incluso tipo alfa, Ordinamento alfanumerico, Ordinamento colore ed Invertire. Inoltre, puoi anche spostare su / giù i fogli di lavoro e ripristinare l'ordinamento.
Se desideri avere una prova gratuita (30 giorni) di questa utility, fare clic per scaricarlo, quindi andare ad applicare l'operazione secondo i passaggi precedenti.
Demo: ordina tutti i fogli di lavoro in ordine alfabetico / alfanumerico
Articolo correlato:
Ordina le schede del foglio di lavoro per colore
I migliori strumenti per la produttività in ufficio
Potenzia le tue competenze di Excel con Kutools per Excel e sperimenta l'efficienza come mai prima d'ora. Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e risparmiare tempo. Fai clic qui per ottenere la funzionalità di cui hai più bisogno...
Office Tab porta l'interfaccia a schede in Office e semplifica notevolmente il tuo 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!