Jos Excel-työkirjassasi on suuri määrä laskentataulukoita, voi olla vaikea löytää tiettyä laskentataulukkoa. Työtunnisteen välilehtien lajittelu aakkosjärjestyksessä helpottaisi etsimääsi.
Lomakkeiden välilehtien järjestämisen lisäksi voit myös lajitella ne aakkosjärjestykseen tai aakkosnumeerisesti, kunhan olet käyttänyt mukautettuja nimeä laskentataulukoihin. Valitettavasti laskentataulukot lajitellaan aakkosjärjestykseen Exceliin, mutta voit lisätä makron työkirjaan, jonka avulla voit lajitella välilehdesi ylöspäin tai laskevassa järjestyksessä. Näytämme, kuinka voit lisätä makron Microsoftin tukisivustossa Excel-työkirjallesi, joka lajittelee laskentataulukot.
Aloita painamalla Alt + F11 avataksesi Microsoft Visual Basic for Applications (VBA) -editorin. Siirry sitten kohtaan Lisää> Moduuli.
Kopioi ja liitä seuraava makro Microsoftin näytöllä olevaan moduulivalikkoon.
Sub Sort_Active_Book () Dim i Kokonaislimit Dim j As Integer Dim iAnswer VbMsgBoxResult "Pyydä käyttäjää mihin suuntaan he haluavat lajitella laskentataulukot. IAnswer = MsgBox (" Lajittele taulukot nousevassa järjestyksessä? "& Chr (10) _ & "Napsauttamalla Ei lajitellaan laskevaan järjestykseen", _ vbYesNoCancel + vbQuestion + vbDefaultButton1, "Lajittele laskentataulukot") i = 1 lomakkeeseen.Valitse j = 1 Sheets.Count - 1 "Jos vastaus on Kyllä, lajittele nousevassa järjestyksessä. 'Jos iAnswer = vbYes Sitten Jos UCase $ (Sheets (j) .Name)> UCase $ (Sheets (j + 1) .Name) Sitten Sheets (j) .Move After: = Sheets (j + 1) End Jos " vastaus on Ei, lajittele sitten alenevassa järjestyksessä. "ElseIf iAnswer = vbNo Jos sitten UCase $ (Sheets (j) .Name) <UCase $ (Sheets (j + 1) .Name) Sitten Sheets (j) .Move After: = Taulukot (j + 1) loppu, jos loppu jos Seuraava j Seuraava i loppu al VBA-editori nimeää automaattisesti jokaisen moduulin numeron loppuun, kuten Module1, Module2 jne. Voit yksinkertaisesti hyväksyä moduulin oletusnimi. Jos kuitenkin haluat lisätä muita makroja työkirjaan, kannattaa nimetä kaikki moduulit uudelleen, jotta tiedät, mitä he ovat. Nimeämme moduulimme uudelleen ja näytämme sinulle miten.
Voit nimetä moduulin uudelleen valitsemalla moduulin Nimi-ruudussa olevan tekstin vasemmasta ruudusta Ominaisuudet-kohdassa.
Kirjoita moduulin nimi Nimi-ruutuun ja paina Enter. Huomaa, että moduulin nimi ei voi sisältää välilyöntejä.
Moduulin nimi muuttuu projektin Moduuliluettelossa vasemmanpuoleisessa ruudussa.
Sulje VBA-editori valitsemalla Tiedosto> Sulje ja palaa Microsoft Exceliin.
Nyt ajetaan makro lajittelemaan välilehtimme. Paina Alt + F8 päästäksesi Makro-valintaikkunan makrojen luetteloon. Valitse makro luettelosta (meidän tapauksessamme on vain yksi makro) ja klikkaa "Suorita".
Seuraava valintaikkuna avautuu, jolloin voit valita, haluatko lajitella laskentataulukot nousevassa tai laskevassa järjestyksessä. Haluamme lajitella ne nousevaan järjestykseen, joten klikkaamme "kyllä".
Työarkin välilehdet on nyt järjestetty aakkosjärjestykseen.
Lisätty makro on osa työkirjaasi nyt, mutta kun tallennat sen, näet todennäköisesti seuraavan valintaikkunan. Tämä johtuu siitä, että olet tallentanut työkirjan .xlsx-tiedostona, joka on normaali Excel-työkirjaformaatti, joka ei sisällä makroja. Jos haluat sisällyttää makrot työkirjaan ja pystyä käsittelemään niitä, sinun on tallennettava työkirjan makrotason työkirjaksi tai .xlsm-tiedostoksi. Voit tehdä tämän napsauttamalla "Ei" tässä valintaikkunassa.
Tallenna nimellä -valintaikkuna avautuu. Siirry paikkaan, johon haluat tallentaa makronkäyttöisen työkirjan, jos et ole jo kyseisessä kansiossa. Valitse "Excel Macro-Enabled Workbook (* .xlsm)" avattavasta "Tallenna nimellä" -luettelosta.
Napsauta Tallenna.
Jos et tallenna työkirjaa makrokeloisena työkirjana (.xlsm-tiedosto), lisätty makro poistetaan. Haluat ehkä poistaa työkirjan .xlsx-version, jotta et unohda käyttää työkirjan .xlsm-versiota, jos haluat lisätä lisää laskentataulukoita ja lajitella ne uudelleen makron avulla. Voit aina tallentaa työkirjan uudelleen .xlsx-tiedostona, jos et halua enää käyttää makroja.