Pam bi htjela rasporediti kartice po radnom listu po abecedi. Ovo nije naredba u Excelu, ali pomoću kratke makronaredbe možete je dodati na alatnu traku za brzi pristup.
Gledaj video
- Pam želi sortirati kartice radnog lista po abecedi
- Uporaba makronaredbe u osobnoj radnoj knjižici makronaredbi
- Alt + T + M + S i promijenite sigurnost makronaredbi kako biste omogućili makronaredbe
- Zabilježite makro Hello World u osobnu radnu knjigu makronaredbi
- Upišite novi kod u Personal Macro Workbook
- Dodijelite taj kôd QAT gumbu
Prijepis videozapisa
Naučite Excel iz Podcasta, epizoda 2084: Poredaj kartice po abecednom redu
Hej, dobrodošao natrag u prijenos uživo, ja sam Bill Jelen. Današnje pitanje od Pam: Postoji li način abecede kartica radnog lista? Pa, nema ugrađenog načina za to, ali mogli bismo to učiniti pomoću makronaredbe. A ovo je makronaredba koja bi stvarno trebala biti u osobnoj makronaredbi, u redu? Dakle, ako nikada prije niste radili makronaredbe, napravit ćemo Alt + T za Toma i za Mary, S za Sama. I obavezno prijeđite s Onemogući sve makronaredbe bez obavijesti na Onemogući makronaredbe s obavijesti.
U redu, zatim pritisnite Alt + F8 i pogledajte imate li makronaredbe, obavezno odaberite Makronaredbe u: Sve otvorene radne knjige. Ako nemate ništa što počinje kao PERSONAL.XLSB, morate napraviti ove neobavezne korake. Ako već imate nešto s PERSONAL.XLSB, pričekajte trenutak, u redu?
Dakle, idemo na karticu Pogled i snimit ćemo novi makro. Zvat će se HelloWorld. Nema prostora, nema prostora. I pohranit ćemo makronaredbu u Osobnu makronaredbu, kliknite U redu. I jednostavno upišite negdje Hello World, onako, a zatim siđite ovdje pored Ready i kliknite Stop. Dobro, sad će vas to prisiliti da imate Osobnu makronaredbu. Dobro, ako nikada prije niste koristili makronaredbe, možda ih nemate.
U ovom ćemo trenutku pritisnuti Alt + F11 i ako nikada niste koristili makronaredbe, ovdje ćete dobiti ovaj sivi zaslon. Idemo na View, Project Explorer i pronaći ćemo novi PERSONAL.XLSB. Ako tamo već imate modul koji ćete, naravno, da, naravno da ćete otvoriti module i dvaput kliknuti Modul 1. Sad već imam nekoliko makronaredbi u svojoj osobnoj makronaredbi, ali doći ću ovdje dolje zadnji red, stavite nekoliko razmaka.
Dobro, onda biste upisali ovaj kod koji sam zalijepio. I razgovarat ćemo o ovoj makronaredbi dok je pokrećem. Dakle, pokretat ću ga jedan po jedan pritiskom na tipku F8. I jedna stvar koju sam ovdje naučio je nakon završetka sortiranja, pomalo me zbunjivalo završiti na drugom listu, pa se sjetim na kojem smo listu, pa kasnije, mogu ga odabrati neposredno prije nego što je makronaredba gotovo.
Dobro, evo nas. Vratimo se Excelu i vidjet ćete da se prvi list tamo zove Naslov. Trenutno smo na listu koji se zove Pitanje. Želim dodati novi list prije Naslova, pa radimo Radne listove.Dodaj, a zatim želim to preimenovati. Trenutno dolazi u Sheet1 kao TempSortSheet. Budite oprezni, ovo bi trebalo biti ime koje nikada ne biste koristili. Kao da ne zovete ovu izjavu o dohotku, u redu? Dovoljno je upotrijebiti nešto vrlo slučajno, pa ćemo kad naletimo na pogrešku ako već imate list pod nazivom TempSortSheet. A onda sam otkrio da sam koristio ovaj Worksheet.Count iznova i iznova, tako da ću ga kasnije staviti u varijablu kao što je lakše reći WSC nego Worksheets.Count kasnije. Dakle, imamo 150 radnih listova i imamo popis tih radnih listova.
U redu, znači prvi put ste prošli kroz petlju gdje idem od 1 do 250. Prvi put kroz petlju do našeg potpuno novog lista koji smo dodali, TempSortSheet, u 1. stupac 1. retka, idemo na prvi radni list staviti vrijednost koja je =. U redu, i ono što bi to trebalo biti dobro, da, TempSortSheet upravo tamo. Ali pustit ću ovo još nekoliko puta. Pritisnite F8 i vidjet ćete da dobivamo sve kartice lista onim redom kako se pojavljuju u radnoj knjižici, i pretpostavljam da počinjem dobivati one kartice s brojevima računa, u redu. I pustit ću ovo, ne želim pritisnuti F8 300 puta. Dakle, kliknite ovdje i idem na Otklanjanje pogrešaka, Pokreni do kursora što je Ctrl + F8 koji će to završiti. Vidimo da imamo popis svih 150 kartica.To je odlično.
A sada evo gdje iskorištavamo snagu Excela. Puno je objava na mreži, uključujući na oglasnoj ploči, gdje se zapravo pokušava sortirati. Za premještanje listova pišu vlastitu sortaciju, a mi ćemo ovdje iskoristiti Excel jer Excel ima sortiranje i koristim kôd iz Excela 2003. Sviđa mi se ovaj kod, lakši za pamćenje. Počet ću u A1, promijeni ga u 150 ćelija, gdje to sortiram. Ključ će biti A1. Pa, to je jedino što bi moglo biti. Narudžba će biti uzlazna i obavezno navedite da postoji zaglavlje, u redu? Ne želimo da naš TempSortSheet sortira podatke. U redu, baš tamo. BAM! To vrši sortiranje i ne trebamo pisati oko koda za sortiranje mjehurića. A onda ćemo ići iz reda 2 koji je A120,list za pomicanje je A120. Zašto " " ? Ah, u slučaju da imate naziv lista, kakav smo imali ranije ovog tjedna, poput lista naziva 123 koji bi zbunio Excel. A onda, kamo ćemo ga premjestiti? Prijeći ćemo na red 2, ali ne nakon prvog lista. Dakle, MoveAfter postaje 1. Dakle, uzet ćemo naš list koji se zove A120 i premjestiti ga nakon prvog takvog lista, F8, i tamo je uspio. Pokreni te tri linije još jednom. A124 dolazi na pravo mjesto.uzet ćemo naš list nazvan A120 i premjestiti ga nakon prvog lista onako, F8, i tamo je uspio. Pokreni te tri linije još jednom. A124 dolazi na pravo mjesto.uzet ćemo naš list nazvan A120 i premjestiti ga nakon prvog lista onako, F8, i tamo je uspio. Pokreni te tri linije još jednom. A124 dolazi na pravo mjesto.
U ovom trenutku, sada znamo da to funkcionira, možemo napraviti Ctrl + F8 koji obavlja sve pokrete - tamo se upravo dogodilo 150 poteza. A sada ću izbrisati izvorni list koji je naš izbrisani TempSortSheet. Ali prije nego što ga izbrišem, ne želim da kažu onome tko koristi kôd da ćemo izbrisati list. Dakle, jednostavno ga izbrišem, a zatim odaberem izvorni list i prikažem poruku da su radne knjige tako sortirane.
U redu, sad kad imamo makronaredbu, znamo da makronaredba radi i nalazi se u osobnoj radnoj knjižici makronaredbi, nekoliko stvari koje želimo učiniti: Alt + F11 vratite se ovdje i provjerite jeste li u osobnoj makronaredbi radnu knjigu, kliknite tamo i kliknite Spremi. Ako ga ne spremite sada, kasnije kad zatvorite Excel, zasvijetlit će poruka "Želite li spremiti promjene u PERSONAL.XLSB?" i potpuno ćete zaboraviti i nećete spremiti promjene, zar ne? Stoga uvijek spremim promjene, a zatim Alt + Tab gdje prilagodim Alatnu traku za brzi pristup, odaberem jednu od makronaredbi, pronađem onu koja se zove SortSheets, dodam je na alatnu traku za brzi pristup. Ne sviđa mi se dijagram toka, pa ćemo potražiti nešto što kaže od A do Ž ili znate, pa nekas upotrijebite ovaj i stavite malu karticu tamo poredati takve listove, kliknite U redu, kliknite U redu.
U redu, evo testa. Umetnut ću novu radnu knjigu. Napravit ću neke kopije listova i stavit ćemo ih u nekakav čudan niz, Z, pa Y, pa M, pa B, tako. Pritisnite Sortiraj listove i BAM! Vratili su se ovdje u pravom slijedu. Kako je to cool.
U redu, dakle, današnja epizoda, Pam želi sortirati kartice radnog lista po abecedi. Vau! Koristili smo makro. Prvo promijenite sigurnost makronaredbe i zabilježite makro Hello World u osobnu radnu knjigu makronaredbi, a zatim upišite kod u Personal Macro Workbook i dodijelite ga gumbu Alatne trake za brzi pristup.
Želim zahvaliti Pam na tom pitanju. Želim vam zahvaliti što ste navratili. Vidimo se sljedeći put za još jedan prijenos od.
Preuzmi datoteku
Preuzmite datoteku uzorka ovdje: Podcast2084.xlsm
