Pam ar dori să-și aranjeze filele de foi de lucru în ordine alfabetică. Aceasta nu este o comandă în Excel, dar folosind o macro scurtă, o puteți adăuga în bara de instrumente cu acces rapid.
Urmăriți videoclipul
- Pam vrea să sorteze fila alfabetică a foilor de lucru
- Folosește o macrocomandă în registrul de lucru personal cu macrocomenzi
- Alt + T + M + S și modificați securitatea macro pentru a permite macro-urile
- Înregistrați un macro Hello World în registrul personal de lucru macro
- Tastați un cod nou în registrul de lucru pentru macrocomenzi personale
- Atribuiți codul respectiv unui buton QAT
Transcriere video
Aflați Excel din Podcast, Episodul 2084: Sortați filele Foaie de lucru alfabetic
Hei, bine ai venit din nou pe netcast, eu sunt Bill Jelen. Întrebarea de astăzi de la Pam: Există o modalitate de a alfabeta filele foii de lucru? Ei bine, nu există un mod încorporat de a face acest lucru, dar am putea face acest lucru cu o macro. Și acum, acesta este un Macro care ar trebui să fie într-adevăr în registrul personal de lucru macro, bine? Deci, dacă nu ați făcut niciodată macrocomenzi până acum, vom face Alt + T pentru Tom și pentru Mary, S pentru Sam. Și asigurați-vă că treceți de la Dezactivați toate macrocomenzile fără notificare la Dezactivați macrocomenzile cu notificare.
În regulă, apăsați Alt + F8 și aruncați o privire și vedeți dacă aveți macrocomenzi, asigurați-vă că alegeți Macrocomenzi în: Toate cărțile de lucru deschise. Dacă nu aveți nimic care începe ca PERSONAL.XLSB, trebuie să faceți acești pași opționali. Dacă aveți deja ceva cu PERSONAL.XLSB, atunci țineți o secundă, bine?
Deci, vom ieși la fila Vizualizare și vom înregistra o nouă macro. Se va numi HelloWorld. Fără spațiu, fără spațiu. Și vom stoca macro-ul în registrul de lucru pentru Macro-ul personal, faceți clic pe OK. Și tastați undeva Hello World, așa, apoi coborâți aici lângă Ready și faceți clic pe Stop. Bine, acum acest lucru vă va forța să aveți un registru personal de lucru macro. Bine, dacă nu ați folosit niciodată macrocomenzi înainte, este posibil să nu aveți asta.
În acest moment, vom apăsa Alt + F11 și dacă nu ați folosit niciodată macrocomenzi, veți obține acest ecran gri aici. Vom merge la View, Project Explorer și vom găsi noul PERSONAL.XLSB. Dacă aveți deja un modul acolo, pe care, desigur, îl veți deschide, desigur, faceți dublu clic pe modulul 1. Acum, am deja câteva macrocomenzi în registrul meu personal de lucrări de macro, dar voi veni chiar aici ultimul rând, puneți câteva spații.
În regulă, așa că ați tasta acest cod pe care l-am lipit. Și vom vorbi despre această macro pe măsură ce o rulez. Deci, o voi executa o rând pe rând apăsând tasta F8. Și un lucru pe care l-am învățat aici este după ce am terminat sortarea, a fost puțin desconcertant să ajung pe o foaie diferită, așa că îmi amintesc pe ce foaie suntem, așa că mai târziu o pot selecta chiar înainte ca macro-ul să fie Terminat.
Bine acum, iată-ne. Să ne întoarcem la Excel și veți vedea că prima foaie de acolo se numește Titlu. Suntem în prezent pe o foaie numită Întrebare. Vreau să adaug o nouă foaie înainte de Title, așa că facem Worksheets.Add și apoi vreau să o redenumesc. În prezent vine într-o Sheet1 ca TempSortSheet. Aveți grijă, acesta ar trebui să fie un nume pe care nu l-ați folosi niciodată. Așa că nu numiți această declarație de venit, bine? Folosiți ceva foarte aleatoriu, așa că atunci când vom avea o eroare dacă aveți deja o foaie numită TempSortSheet. Și apoi ceea ce am constatat este că foloseam această Foaie de lucru. Numărați din nou și din nou, așa că o voi pune într-o variabilă la fel de ușor de spus WSC decât Worksheets. Numărați mai târziu. Deci, avem 150 de foi de lucru și avem o listă a acestor foi de lucru.
Bine, așa că ești pentru prima dată prin bucla în care trec de la 1 la 250. Pentru prima dată prin buclă la foaia noastră nouă pe care am adăugat-o, TempSortSheet, pe rândul 1 coloana 1, ne a pune o valoare care este = la prima foaie de lucru. Bine, și ceea ce ar trebui să fie este bine, da, TempSortSheet chiar acolo. Dar am să las asta să ruleze de încă câteva ori. Voi apăsa F8 și veți vedea că primim toate filele foilor în ordinea în care apar în registrul de lucru și presupun că încep să primesc acele file care au numerele de cont, bine. Și am să las asta să ruleze, nu vreau să trebuiască să apăs F8 de 300 de ori. Deci, voi face clic aici și voi accesa Debug, Run To Cursor, care este Ctrl + F8, care va finaliza acest lucru. Și vedeți că avem o listă cu toate cele 150 de file de foi.Asta-i grozav.
Și acum iată unde profităm de puterea Excel. Există o mulțime de postări online, inclusiv pe panoul de mesaje, unde încearcă și sortează efectiv. Își scriu propriile sortări pentru a muta foile și vom profita de Excel aici, deoarece Excel are un fel și eu folosesc codul din Excel 2003. Îmi place acest cod, mai ușor de reținut. Voi începe în A1, Redimensionează-l la 150 de celule în care sortez asta. Cheia va fi A1. Ei bine, acesta este singurul lucru care ar putea fi. Ordinea va fi crescătoare și asigurați-vă că specificați că există un antet, bine? Nu dorim ca TempSortSheet să se sorteze în date. Bine, deci chiar acolo. BAM! Asta face felul și nu este nevoie să scriem în jurul codului de sortare cu bule. Și apoi vom merge de la rândul 2, care este A120,foaia de mutat este A120. De ce " " ? Ahh, în cazul în care aveți un nume de foaie, așa cum am avut-o la începutul acestei săptămâni, ca o foaie numită 123 care ar confunda Excel. Și apoi, unde vom muta? Vom trece la rândul 2, nu după prima foaie. Deci MoveAfter devine 1. Deci, vom lua foaia noastră numită A120 și o vom muta după prima foaie așa, F8, și acolo a funcționat. Rulați aceste trei rânduri încă o dată. A124 vine la locul potrivit.Vom lua foaia noastră numită A120 și o vom muta după prima foaie așa, F8, și acolo a funcționat. Rulați aceste trei rânduri încă o dată. A124 vine la locul potrivit.Vom lua foaia noastră numită A120 și o vom muta după prima foaie așa, F8, și acolo a funcționat. Rulați aceste trei rânduri încă o dată. A124 vine la locul potrivit.
În acest moment, acum știm că funcționează, putem face Ctrl + F8 care face toate mișcările - 150 de mișcări tocmai s-au întâmplat acolo. Și acum, voi șterge foaia originală, care este TempSortSheet ștearsă. Dar, înainte să îl șterg, nu vreau să spună cine rulează codul că suntem pe cale să ștergem foaia. Așadar, o șterg și apoi selectez foaia originală și afișez mesajul că registrele de lucru au fost sortate așa.
Bine, așa că acum, când avem macro-ul, știm că macro-ul funcționează și se află în registrul de lucru pentru macro-ul personal, câteva lucruri pe care vrem să le facem: Alt + F11 reveniți aici și asigurați-vă că vă aflați în macro-ul personal. registru de lucru, faceți clic acolo și faceți clic pe Salvare. Dacă nu îl salvați acum, mai târziu, când închideți Excel, va afișa acest mesaj despre „Doriți să salvați modificările la PERSONAL.XLSB?” și veți uita complet și nu veți salva modificările, nu? Așa că mă asigur întotdeauna să salvez modificările și apoi Alt + Tab unde personalizez bara de instrumente de acces rapid, aleg din Macro, găsesc cea care se numește SortSheets, adaug asta în bara de instrumente de acces rapid. Nu-mi place diagrama de flux, așa că vom căuta ceva care spune de la A la Z sau știi, așa căFolosiți-o și puneți o filă de sortare a foilor de fel, faceți clic pe OK, faceți clic pe OK.
În regulă, iată testul. Voi introduce un nou registru de lucru. Voi face câteva copii ale foilor și le vom pune într-un fel de secvență ciudată, Z și apoi Y și apoi M și apoi B, așa. Faceți clic pe Sortare foi și BAM! S-au întors aici în ordinea corectă. Cat de tare e asta.
Bine, deci episodul de astăzi, Pam vrea să sorteze filele foilor de lucru alfabetic. Wow! Am folosit macro-ul. Mai întâi, schimbați securitatea macro și înregistrați macrocomanda Hello World în registrul de lucru pentru macro-ul personal și apoi tastați codul în Registrul de lucru pentru macro-ul personal și atribuiți-l unui buton Bara de instrumente de acces rapid.
Vreau să-i mulțumesc lui Pam pentru această întrebare. Vreau să vă mulțumesc că ați trecut pe aici. Ne vedem data viitoare pentru un alt netcast de la.
Descărcare fișier
Descărcați exemplarul de fișier aici: Podcast2084.xlsm