Pam norėtų sutvarkyti savo darbalapio skirtukus abėcėlės tvarka. Tai nėra „Excel“ komanda, tačiau naudodami trumpą makrokomandą galite ją pridėti prie savo greitosios prieigos įrankių juostos.
Žiūrėti video
- Pam nori surikiuoti darbalapio skirtukus abėcėlės tvarka
- Eiti naudoti makrokomandą asmeninėje makrokomandų knygoje
- Alt + T + M + S ir pakeiskite makrokomandų saugumą, kad leistumėte makrokomandas
- Įrašykite „Hello World“ makrokomandą į asmeninę makrokomandų knygą
- Įveskite naują kodą į „Personal Macro Workbook“
- Priskirkite tą kodą QAT mygtukui
Vaizdo įrašo nuorašas
Sužinokite „Excel“ iš „Podcast“, 2084 serija: Rūšiuoti darbalapio skirtukus abėcėlės tvarka
Ei, sveiki sugrįžę į internetą, aš Billas Jelenas. Šiandieninis „Pam“ klausimas: ar yra būdas abėcėlės tvarka suskaičiuoti darbalapio skirtukus? Na, nėra jokio įmontuoto būdo tai padaryti, bet mes galėtume tai padaryti naudodami makrokomandą. O dabar, tai yra makrokomanda, kuri tikrai turėtų būti asmeninėje makrokomandų darbo knygoje, gerai? Taigi, jei dar niekada nedarėte makrokomandų, Tomui darysime Alt + T, o Samui - Mary, S. Ir įsitikinkite, kad perėjote nuo Neleisti visų makrokomandų be pranešimo prie Išjungti makrokomandas su pranešimu.
Gerai, tada paspauskite „Alt“ + F8 ir pažiūrėkite, ar turite makrokomandų, būtinai pasirinkite „Makrokomandos“: „Visos atviros darbo knygos“ Jei neturite nieko, kas prasideda kaip PERSONAL.XLSB, turite atlikti šiuos pasirenkamus veiksmus. Jei jau turite ką nors su „PERSONAL.XLSB“, tiesiog palaikykite sekundę, gerai?
Taigi, eisime į skirtuką Vaizdas ir įrašysime naują makrokomandą. Tai vadinsis „HelloWorld“. Nėra vietos, nėra vietos. Makrokomandą išsaugosime „Personal Macro Workbook“, spustelėkite Gerai. Ir tiesiog įveskite kažkur „Hello World“, panašų į tą, tada nusileiskite čia šalia „Ready“ ir spustelėkite „Stop“. Gerai, dabar tai privers turėti asmeninę makrokomandų darbaknygę. Gerai, jei niekada anksčiau nenaudojote makrokomandų, galbūt to neturite.
Šiuo metu paspausime „Alt“ + F11 ir jei niekada nenaudojote makrokomandų, čia gausite šį pilką ekraną. Eisime į „View“, „Project Explorer“ ir rasime naują PERSONAL.XLSB. Jei jau turite modulį, kurį, žinoma, turėsite, tikrai taip, atidarykite modulius ir dukart spustelėkite 1 modulį. Dabar aš jau turiu keletą makrokomandų savo asmeninėje makrokomandų knygoje, bet aš eisiu čia paskutinėje eilutėje įdėkite porą tarpų.
Gerai, todėl tada įveskite šį kodą, kurį įklijavau. Ir mes kalbėsime apie šią makrokomandą, kai ją paleidžiu. Taigi, aš paleisiu jį po vieną eilutę, paspausdamas klavišą F8. Vienas dalykas, kurį aš išmokau čia, yra pabaigus rūšiuoti. Tai buvo šiek tiek neramu, kai atsiduriau kitame lape, todėl prisimenu, kuriame lape mes esame, todėl vėliau galiu jį pasirinkti prieš makrokomandą padaryta.
Gerai dabar, štai mes čia. Grįžkime prie „Excel“ ir pamatysite, kad pirmasis jų lapas vadinamas „Pavadinimas“. Šiuo metu esame lape pavadinimu Klausimas. Noriu pridėti naują lapą prieš pavadinimą, todėl darome darbalapius. Pridėti ir tada noriu pervadinti. Šiuo metu „Sheet1“ yra „TempSortSheet“. Būkite atsargūs, tai turėtų būti vardas, kurio niekada nenaudotumėte. Kaip nevadinti šios pajamų ataskaitos, gerai? Tiesiog naudokite ką nors labai atsitiktinio, taigi, kai mes padarysime klaidą, jei jau turite lapą pavadinimu TempSortSheet. Ir tada radau tai, kad naudojau šį darbalapį. Skaičiuokite vėl ir vėl, todėl aš tiesiog įdėsiu jį į kintamąjį, kurį lengviau pasakyti WSC, nei darbalapius. Skaičiuokite vėliau. Taigi turime 150 darbalapių ir turime jų sąrašą.
Gerai, taigi jūs pirmą kartą per tą ciklą, kur einu nuo 1 iki 250. Pirmą kartą per visą mūsų naują lapą, kurį pridėjome, „TempSortSheet“, 1 eilutės 1 stulpelyje, einame į pirmąjį darbalapį įdėti reikšmę, kuri yra =. Gerai, ir kas tai turėtų būti, gerai, TempSortSheet čia. Bet aš leisiu tai paleisti dar porą kartų. Paspausiu F8 ir pamatysite, kad visus lapų skirtukus gauname tokia tvarka, kokia jie rodomi darbaknygėje, ir tarkime, kad aš pradedu gauti tuos skirtukus, kurių sąskaitų numeriai yra gerai. Aš leisiu šiam bėgti, nenoriu, kad tektų 300 kartų spausti F8. Taigi, aš spustelėsiu čia ir eisiu į Derinti, paleisti žymeklį, kuris yra Ctrl + F8, kuris tai užbaigs. Ir matome, kad turime visų 150 lapų skirtukų sąrašą.Tai nuostabu.
Ir dabar mes naudojame „Excel“ galimybes. Yra daugybė skelbimų internete, įskaitant pranešimų lentą, kur jie iš tikrųjų bando surūšiuoti. Jie rašo savo rūšį, norėdami perkelti lapus, o mes čia pasinaudosime „Excel“ privalumais, nes „Excel“ turi rūšiavimą ir aš naudoju „Excel 2003“ kodą. Man šis kodas patinka, lengviau įsimenamas. Pradėsiu nuo A1, pakeiskite dydį į 150 langelių, kur aš tai rūšiuoju. Raktas bus A1. Na, tai gali būti vienintelis dalykas. Užsakymas bus didėjantis, ir būtinai nurodykite, kad yra antraštė, gerai? Nenorime, kad mūsų „TempSortSheet“ būtų suskirstyti į duomenis. Gerai, taigi čia pat. BAM! Tai rūšiuoja ir mums nereikia rašyti apie burbulų rūšiavimo kodą. Tada eisime iš 2 eilutės, kuri yra A120,lapas, kurį reikia perkelti, yra A120. Kodėl „“? Ahh, jei turite lapo pavadinimą, kaip mes turėjome anksčiau šią savaitę, pavyzdžiui, lapas pavadinimu 123, kuris suklaidintų „Excel“. Ir tada, kur mes jį perkelsime? Pereisime ne į 2 eilutę, o po pirmo lapo. Taigi „MoveAfter“ tampa 1. Taigi, mes paimsime savo lapą, vadinamą A120, ir perkelsime jį po pirmo tokio lapo, F8, ir ten jis veikė. Vykdykite šias tris eilutes dar kartą. A124 patenka į reikiamą vietą.paimsiu savo lapą, vadinamą A120, ir perkelsime jį po pirmo tokio lapo, F8, ir ten jis suveikė. Vykdykite šias tris eilutes dar kartą. A124 patenka į reikiamą vietą.paimsiu savo lapą, vadinamą A120, ir perkelsime jį po pirmo tokio lapo, F8, ir ten jis suveikė. Vykdykite šias tris eilutes dar kartą. A124 patenka į reikiamą vietą.
Šiuo metu mes žinome, kad jis veikia, mes galime atlikti „Ctrl + F8“, kuris atlieka visus judesius - ten tiesiog įvyko 150 judesių. Dabar ištrinsiu pradinį lapą, kuris yra mūsų ištrintas „TempSortSheet“. Bet prieš ištrindamas, nenoriu, kad kas pasakytų kodą, pasakytų, jog netrukus ištrinsime lapą. Taigi, aš tiesiog jį ištrinu, tada pasirenku originalų lapą ir rodau pranešimą, kad darbaknygės buvo taip surūšiuotos.
Gerai, todėl dabar, kai turime makrokomandą, žinome, kad makrokomanda veikia ir yra asmeninėje makrokomandų knygoje, keli dalykai, kuriuos norime padaryti: „Alt“ + F11 grįžkite čia ir įsitikinkite, kad esate asmeninėje makrokomandoje. darbaknygę, spustelėkite ten ir spustelėkite Išsaugoti. Jei dabar jo neišsaugosite, vėliau, uždarydami „Excel“, jis mirksės šiuo pranešimu apie „Ar norite išsaugoti PERSONAL.XLSB pakeitimus?“ ir jūs visiškai pamiršite ir neišsaugosite pakeitimų, tiesa? Taigi visada būtinai išsaugoju pakeitimus ir tada Alt + Tab, kur tinkinu greitosios prieigos įrankių juostą, renkuosi iš makrokomandų, surandu tą, kuri vadinama „SortSheets“, įtraukiu į greitosios prieigos įrankių juostą. Man nepatinka schema, todėl mes ieškosime kažko, kur parašyta nuo A iki Z, arba jūs žinote, todėl leiskite 'Naudokitės šiuo ir įdėkite nedidelį skirtuką iš „Rūšiuoti lapus“, pavyzdžiui, spustelėkite Gerai, spustelėkite Gerai.
Gerai, dabar čia testas. Įterpsiu naują darbo knygą. Aš padarysiu keletą lapų kopijų ir mes juos įdėsime į kažkokią keistą seką, Z ir tada Y, tada M ir tada B, panašiai. Spustelėkite Rūšiuoti lapus ir BAM! Jie grįžo čia teisinga seka. Argi tai ne šaunu.
Gerai, todėl šiandienos epizodas Pam nori rūšiuoti darbalapio skirtukus abėcėlės tvarka. Oho! Naudojome makrokomandą. Pirmiausia pakeiskite makrokomandų saugumą ir įrašykite „Hello World“ makrokomandą į asmeninę makrokomandų darbaknygę, tada įveskite kodą „Personal Macro Workbook“ ir priskirkite jį greitosios prieigos įrankių juostos mygtukui.
Noriu padėkoti Pamui už šį klausimą. Noriu padėkoti, kad užsukote. Pamatysime kitą kartą kitai internetinei transliacijai iš.
Atsisiųsti failą
Parsisiųskite failo pavyzdį čia: Podcast2084.xlsm
