Ako imate velik broj radnih listova u radnoj knjizi programa Excel, možda će vam biti teško pronaći određeni radni list. Razvrstavanje tablica radnih listova abecednim redom olakšat će vam pronalaženje onoga što tražite.
Pored organiziranja kartica radnih listi tako da ih dodate bojama, možete ih poredati abecednim redom ili alfanumeričkim brojem, pod uvjetom da ste primijenili svoje korisničke nazive u svoje radne listove. Nažalost, tablice sortiranja radnih listova abecednim redom nisu ugrađene u Excel, ali možete dodati makronaredbu u radnu knjigu koja će vam omogućiti sortiranje kartica uzlazno ili silazno. Pokazat ćemo vam kako dodati makronaredbu dostupnu na Microsoftovoj web stranici za podršku u Excel radnu knjigu koja će sortirati kartice radnih listova.
Za početak pritisnite Alt + F11 da biste otvorili program Microsoft Visual Basic for Applications (VBA). Zatim idite na Umetni> Modul.
Kopirajte i zalijepite sljedeću makronaredbu iz Microsofta u prozor modula koji se prikazuje.
Sub Sort_Active_Book () Dim i kao cjelina Dim j kao integer Dim iAnswer kao VbMsgBoxResult "Upitajte korisnika u kojem smjeru želite sortirati radne listove. IAnswer = MsgBox (" Sortiranje listova u porastu? "& Chr (10) _ Ako je odgovor "Da", "sortiranje" i "Ako kliknete" Ne "će sortirati u silaznoj poretku", vbYesNoCancel + vbQuestion + vbDefaultButton1, "Poredaj radne listove") za i = 1 do Sheets.Count Za j = u uzlaznom poretku. 'Ako je iAnswer = vbYes onda ako UCase $ (Sheets (j) .Name)> UCase $ (Sheme (j + 1) .Name) Zatim Sheets (j) .Move After: = Tablice (j + 1) odgovor je Ne, a zatim razvrstajte prema dolje navedenom redoslijedu. 'ElseIf iAnswer = vbNo Tada ako UCase $ (Sheets (j) .Name) <UCase $ (Sheets (j + 1) .Name) Zatim Sheets (j) .Move After: = Tablice (j + 1) Kraj Ako Kraj Ako Sljedeći j Dalje I Završi Sub
VBA urednik automatski naziva svaki modul s brojem na kraju, kao što su Module1, Module2 itd. Možete jednostavno prihvatiti zadani naziv modula. Međutim, ako planirate dodati druge makronaredbe u radnu knjigu, preporučujemo da preimenujte svaki modul tako da znate što jesu. Preimenovati ćemo naš modul kako bismo vam pokazali kako.
Za preimenovanje modula odaberite tekst u okviru Ime za modul u odjeljku Svojstva u lijevom oknu.
Unesite naziv modula u okvir Ime i pritisnite Enter. Imajte na umu da naziv modula ne može sadržavati razmake.
Naziv modula mijenja se na popisu Moduli u odjeljku Projekt u lijevom oknu.
Zatvorite uređivač VBA tako da odete na Datoteka> Zatvori i vratite se u Microsoft Excel.
Sada ćemo pokrenuti makronaredbu za sortiranje naših kartica. Pritisnite Alt + F8 da biste pristupili popisu makronaredbi u dijaloškom okviru Macro. Odaberite makronaredbu na popisu (u našem slučaju postoji samo jedna makronaredba) i kliknite "Pokreni".
Prikazuje se sljedeći dijaloški okvir, koji vam omogućuje da odaberete želite li sortirati listove uzlazno ili silazno. Želimo ih poredati uzastopnim redoslijedom, tako da kliknemo "Da".
Kartice radnog lista sada su raspoređene abecednim redom.
Makronaredba koju ste dodali dio je radne knjige sada, ali kada ga spremite vjerojatno ćete vidjeti sljedeći dijaloški okvir. To je zato što ste spremili radnu knjigu kao .xlsx datoteku, što je uobičajeni format Excel radne knjige koji ne uključuje makronaredbe. Da biste uključili makronaredbe u radnu knjigu i mogli ih pokrenuti, morate spremiti radnu knjigu kao radnu knjigu s makronaredbom ili datoteku .xlsm. Da biste to učinili, kliknite "Ne" u ovom dijaloškom okviru.
Prikazuje se dijaloški okvir Spremi kao. Prijeđite na mjesto na kojem želite spremiti radnu knjigu s omogućenom makrom, ako već niste u toj mapi. Odaberite "Excel Macro-Enabled Workbook (* .xlsm)" s padajućeg popisa "Spremi kao vrstu".
Kliknite "Spremi".
Ako radnu knjižicu ne spremate kao radnu knjigu s omogućenom makronaredbom (.xlsm datoteka), makronaredba koju ste dodali izbrisat će se. Možda želite izbrisati .xlsx verziju radne knjige kako ne biste zaboravili koristiti verziju .xlsm radne knjige ako želite dodati više kartica radnih listova i ponovno ih razvrstati pomoću makronaredbe. Uvijek možete spremiti radnu knjigu kao .xlsx datoteku ako više ne želite koristiti makronaredbe.