Pam vorrebbe disporre le schede del foglio di lavoro in ordine alfabetico. Questo non è un comando in Excel, ma utilizzando una breve macro, puoi aggiungerlo alla barra di accesso rapido.
Guarda un video
- Pam vuole ordinare alfabeticamente le schede del foglio di lavoro
- Sto andando a utilizzare una macro nella cartella personale delle macro
- Alt + T + M + S e modifica la sicurezza delle macro per consentire le macro
- Registrare una macro Hello World nella cartella di lavoro delle macro personali
- Digita il nuovo codice nella cartella di lavoro delle macro personali
- Assegna quel codice a un pulsante QAT
Trascrizione del video
Impara Excel da Podcast, Episodio 2084: Ordina alfabeticamente le schede del foglio di lavoro
Ehi, bentornato al netcast, sono Bill Jelen. La domanda di oggi di Pam: esiste un modo per alfabetizzare le schede del foglio di lavoro? Bene, non esiste un modo integrato per farlo, ma potremmo farlo con una macro. E ora, questa è una macro che dovrebbe davvero essere nella cartella di lavoro personale delle macro, va bene? Quindi, se non hai mai fatto macro prima, faremo Alt + T per Tom e per Mary, S per Sam. E assicurati di passare da Disabilita tutte le macro senza notifica a Disabilita macro con notifica.
D'accordo, premi Alt + F8 e dai un'occhiata e vedi se hai delle macro, assicurati di scegliere Macro in: Tutte le cartelle di lavoro aperte. Se non hai nulla che inizi come PERSONAL.XLSB, devi eseguire questi passaggi facoltativi. Se hai già qualcosa con PERSONAL.XLSB, aspetta solo un secondo, va bene?
Quindi, andremo alla scheda Visualizza e registreremo una nuova macro. Si chiamerà HelloWorld. Nessuno spazio, nessuno spazio. E memorizzeremo la macro nella cartella di lavoro Macro personale, fare clic su OK. E digita da qualche parte Hello World, in questo modo, quindi scendi qui accanto a Pronto e fai clic su Stop. Va bene, ora questo ti costringerà ad avere un manuale di macro personale. Va bene, se non hai mai usato le macro prima, potresti non averle.
A questo punto, premeremo Alt + F11 e se non hai mai usato le macro, otterrai questa schermata grigia qui. Andremo su Visualizza, Esplora progetti e troveremo il nuovo PERSONAL.XLSB. Se hai già un modulo lì, che ovviamente lo farai, certo sì, apri i moduli e fai doppio clic sul modulo 1. Ora, ho già un paio di macro nel mio manuale di macro personale ma verrò proprio qui per l'ultima riga, inserisci un paio di spazi.
Bene, quindi dovresti digitare questo codice che ho incollato. E parleremo di questa macro mentre la eseguo. Quindi, lo eseguirò una riga alla volta premendo il tasto F8. E una cosa che ho imparato qui è che dopo aver terminato l'ordinamento, è stato un po 'sconcertante finire su un foglio diverso, quindi ricordo su quale foglio ci troviamo, quindi in seguito posso selezionarlo subito prima che la macro sia fatto.
Va bene ora, eccoci qui. Torniamo a Excel e vedrai che il primo foglio si chiama Titolo. Siamo attualmente su un foglio chiamato Domanda. Voglio aggiungere un nuovo foglio prima di Title, quindi facciamo Worksheets.Add e poi voglio rinominarlo. Attualmente è disponibile in un foglio1 come TempSortSheet. Attenzione, questo dovrebbe essere un nome che non useresti mai. Come non chiamare questo conto economico, va bene? Usa solo qualcosa di molto casuale così quando noi ti imbatterai in un errore se hai già un foglio chiamato TempSortSheet. E poi quello che ho scoperto è che stavo usando questo Worksheet.Count più e più volte, quindi lo inserirò in una variabile più facile da dire WSC rispetto a Worksheets.Count più avanti. Quindi abbiamo 150 fogli di lavoro e abbiamo un elenco di quei fogli di lavoro.
Va bene, quindi sei la prima volta attraverso il ciclo in cui vado da 1 a 250. La prima volta attraverso il ciclo al nostro nuovo foglio che abbiamo aggiunto, il TempSortSheet, sulla riga 1 colonna 1, andremo per mettere un valore che è = al primo foglio di lavoro. Va bene, e quello che dovrebbe essere va bene, sì, TempSortSheet proprio lì. Ma lo lascerò correre ancora un paio di volte. Premerò F8 e vedrai che stiamo ottenendo tutte le schede dei fogli nell'ordine in cui appaiono nella cartella di lavoro, e presumo di iniziare a ottenere quelle schede che hanno i numeri di conto, ok. E lo lascerò correre, non voglio dover premere F8 300 volte. Quindi, farò clic qui e andrò su Debug, Run To Cursor che è Ctrl + F8 che lo finirà. E vediamo che abbiamo un elenco di tutte le 150 schede dei fogli.È fantastico.
Ed ora è qui che sfruttiamo la potenza di Excel. Ci sono molti messaggi online, anche sulla bacheca, dove cercano effettivamente di ordinare. Scrivono il proprio ordinamento per spostare i fogli e qui trarremo vantaggio da Excel perché Excel ha un ordinamento e io sto usando il codice di Excel 2003. Mi piace questo codice, più facile da ricordare. Inizierò in A1, ridimensionalo per essere 150 celle in cui lo ordino. La chiave sarà A1. Bene, questa è l'unica cosa che potrebbe essere. L'ordine sarà crescente e assicurati di specificare che c'è un'intestazione, ok? Non vogliamo che il nostro TempSortSheet si ordina nei dati. Va bene, quindi proprio lì. BAM! Questo fa l'ordinamento e non abbiamo bisogno di scrivere intorno al bubble sort code. E poi andremo dalla riga 2 che è A120,il foglio da spostare è A120. Perché il " " ? Ahh, nel caso tu abbia un nome di foglio, come lo avevamo all'inizio di questa settimana, come un foglio chiamato 123 che confonderebbe Excel. E poi, dove lo sposteremo? Ci sposteremo non alla riga 2 ma dopo il primo foglio. Quindi MoveAfter diventa 1. Quindi, prenderemo il nostro foglio chiamato A120 e lo sposteremo dopo il primo foglio in questo modo, F8, e lì ha funzionato. Ripeti quelle tre righe ancora una volta. A124 arriva nel punto giusto.prendi il nostro foglio chiamato A120 e lo sposta dopo il primo foglio in questo modo, F8, e lì ha funzionato. Esegui queste tre righe ancora una volta. A124 arriva nel punto giusto.prendi il nostro foglio chiamato A120 e lo sposta dopo il primo foglio in questo modo, F8, e lì ha funzionato. Ripeti quelle tre righe ancora una volta. A124 arriva nel punto giusto.
A questo punto, ora che sappiamo che sta funzionando, possiamo fare Ctrl + F8 che fa tutto il movimento - 150 mosse sono appena avvenute lì. E ora, cancellerò il foglio originale che è il nostro TempSortSheet eliminato. Ma prima di eliminarlo, non voglio che dica a chiunque stia eseguendo il codice che stiamo per eliminare il foglio. Quindi, lo elimino e poi seleziono il foglio originale e visualizzo il messaggio che le cartelle di lavoro sono state ordinate in questo modo.
Ok, quindi ora che abbiamo la macro, sappiamo che la macro funziona ed è nella cartella di lavoro personale delle macro, un paio di cose che vogliamo fare: Alt + F11 torna qui e assicurati di essere nella macro personale cartella di lavoro, fare clic lì e fare clic su Salva. Se non lo salvi ora, in seguito, quando chiuderai Excel, verrà visualizzato questo messaggio con la dicitura "Salvare le modifiche a PERSONAL.XLSB?" e dimenticherai completamente e non salverai le modifiche, giusto? Quindi mi assicuro sempre di salvare le modifiche e poi Alt + Tab dove personalizzo la barra degli strumenti di accesso rapido, scelgo tra le macro, trovo quella che si chiama SortSheets, aggiungila alla barra degli strumenti di accesso rapido. Non mi piace il diagramma di flusso, quindi cercheremo qualcosa che dica dalla A alla Z o sai, quindi lascia 's usa questo e metti una piccola scheda lì di Ordina fogli in questo modo, fai clic su OK, fai clic su OK.
Va bene, ora ecco il test. Inserirò una nuova cartella di lavoro. Farò alcune copie dei fogli e le inseriremo in una specie di strana sequenza, Z e poi Y e poi M e poi B, così. Fare clic su Ordina fogli e BAM! Sono di nuovo qui nella giusta sequenza. Quant'è fico.
Va bene, quindi l'episodio di oggi, Pam vuole ordinare le schede del foglio di lavoro in ordine alfabetico. Wow! Abbiamo usato la macro. Innanzitutto, modifica la protezione delle macro e registra la macro Hello World nella cartella di lavoro delle macro personali, quindi digita il codice nella cartella di lavoro delle macro personali e assegnalo a un pulsante della barra di accesso rapido.
Voglio ringraziare Pam per questa domanda. Voglio ringraziarti per essere passato. Ci vediamo la prossima volta per un altro netcast da.
Download file
Scarica il file di esempio qui: Podcast2084.xlsm
