Homepage » come » Come ordinare le schede del foglio di lavoro in ordine alfabetico in Excel

    Come ordinare le schede del foglio di lavoro in ordine alfabetico in Excel

    Se nella cartella di lavoro di Excel è presente un numero elevato di fogli di lavoro, potrebbe essere difficile trovare un foglio di lavoro specifico. Ordinare le schede del foglio di lavoro in ordine alfabetico renderebbe più facile trovare ciò che stai cercando.

    Oltre ad organizzare le schede del foglio di lavoro applicando dei colori, puoi anche ordinarle in ordine alfabetico o alfanumerico, a condizione che tu abbia applicato nomi personalizzati ai tuoi fogli di lavoro. Sfortunatamente, l'ordinamento alfabetico delle schede del foglio di lavoro non è integrato in Excel, ma puoi aggiungere una macro alla cartella di lavoro che ti consentirà di ordinare le schede in ordine crescente o decrescente. Ti mostreremo come aggiungere una macro disponibile sul sito di supporto di Microsoft alla cartella di lavoro di Excel che ordinerà le schede del foglio di lavoro.

    Per iniziare, premere Alt + F11 per aprire l'editor di Microsoft Visual Basic for Applications (VBA). Quindi, vai su Inserisci> Modulo.

    Copia e incolla la seguente macro da Microsoft nella finestra del modulo che viene visualizzata.

    Sub Sort_Active_Book () Dim i As Integer Dim j As Integer Dim iAnswer As VbMsgBoxResult "Richiedi all'utente in quale direzione desiderano" ordinare i fogli di lavoro. "IAnswer = MsgBox (" Ordina fogli in ordine crescente? "E Chr (10) _ & "Facendo clic su No si ordinerà in ordine decrescente", _ vbYesNoCancel + vbQuestion + vbDefaultButton1, "Ordina fogli di lavoro") Per i = 1 Per Sheets.Count Per j = 1 Per Sheets.Count - 1 "Se la risposta è Sì, quindi ordinare in ordine crescente. 'If iAnswer = vbYes Then If UCase $ (Sheets (j) .Name)> UCase $ (Sheets (j + 1) .Name) Then Sheets (j) .Move After: = Sheets (j + 1) End If "If la risposta è No, quindi ordina in ordine decrescente. 'ElseIf iAnswer = vbNo Then If UCase $ (Sheets (j) .Name) < UCase$(Sheets(j + 1).Name) Then                Sheets(j).Move After:=Sheets(j + 1)             End If          End If       Next j    Next i End Sub

    L'editor VBA assegna automaticamente a ciascun modulo un numero alla fine, come Module1, Module2, ecc. Puoi semplicemente accettare il nome predefinito del modulo. Tuttavia, se si prevede di aggiungere altre macro alla cartella di lavoro, è consigliabile rinominare ciascun modulo in modo da sapere quali sono. Rinomineremo il nostro modulo per mostrarti come.

    Per rinominare il modulo, selezionare il testo nella casella Nome per il modulo in Proprietà nel riquadro di sinistra.

    Digita un nome per il modulo nella casella Nome e premi Invio. Si noti che il nome del modulo non può contenere spazi.

    Il nome del modulo cambia nell'elenco Moduli sotto Progetto nel riquadro di sinistra.

    Chiudi l'editor VBA andando su File> Chiudi e torna a Microsoft Excel.

    Ora, eseguiremo la macro per ordinare le nostre schede. Premere Alt + F8 per accedere all'elenco di macro nella finestra di dialogo Macro. Seleziona la macro nell'elenco (nel nostro caso c'è solo una macro) e fai clic su "Esegui".

    Viene visualizzata la seguente finestra di dialogo, che consente di scegliere se si desidera ordinare i fogli di lavoro in ordine crescente o decrescente. Vogliamo ordinarli in ordine crescente, quindi facciamo clic su "Sì".

    Le schede del foglio di lavoro sono ora disposte in ordine alfabetico.

    La macro che hai aggiunto fa ora parte della tua cartella di lavoro, ma quando la salvi, probabilmente vedrai la seguente finestra di dialogo. Questo perché hai salvato la tua cartella di lavoro come un file .xlsx, che è un normale formato di cartella di lavoro di Excel che non include macro. Per includere macro nella cartella di lavoro ed essere in grado di eseguirle, è necessario salvare la cartella di lavoro come cartella di lavoro con attivazione macro o file .xlsm. Per fare ciò, fare clic su "No" in questa finestra di dialogo.

    Viene visualizzata la finestra di dialogo Salva con nome. Passare al punto in cui si desidera salvare la cartella di lavoro con attivazione macro, se non si è già in quella cartella. Seleziona "Cartella di lavoro con macro Excel (* .xlsm)" dall'elenco a discesa "Salva come".

    Fai clic su "Salva".

    Se non si salva la cartella di lavoro come cartella di lavoro con attivazione macro (file .xlsm), la macro aggiunta verrà eliminata. È possibile eliminare la versione .xlsx della cartella di lavoro in modo da non dimenticare di utilizzare la versione .xlsm della cartella di lavoro se si desidera aggiungere altre schede del foglio di lavoro e ordinarle nuovamente utilizzando la macro. È sempre possibile salvare la cartella di lavoro come file .xlsx nuovamente se non si desidera più utilizzare le macro.