Pam vill ordna flikarna i kalkylbladet alfabetiskt. Detta är inte ett kommando i Excel, men med ett kort makro kan du lägga till det i ditt verktyg för snabbåtkomst.
Kolla på video
- Pam vill sortera kalkylbladets flikar alfabetiskt
- Kommer att använda ett makro i den personliga makroarbetsboken
- Alt + T + M + S och ändra makrosäkerhet för att tillåta makron
- Spela in ett Hello World-makro i den personliga makroarboken
- Skriv ny kod i Personal Macro Workbook
- Tilldela den koden till en QAT-knapp
Videoutskrift
Lär dig Excel från Podcast, avsnitt 2084: Sortera arbetsbladets flikar alfabetiskt
Hej, välkommen tillbaka till netcast, jag heter Bill Jelen. Dagens fråga från Pam: Finns det ett sätt att alfabetisera kalkylbladets flikar? Det finns inget inbyggt sätt att göra det, men vi kan göra det med ett makro. Och nu är det här en makro som verkligen borde finnas i den personliga makroarbetsboken, okej? Så om du aldrig har gjort makron förut, ska vi göra Alt + T för Tom och för Mary, S för Sam. Och se till att du går från Inaktivera alla makron utan avisering till Inaktivera makron med avisering.
Okej, tryck sedan på Alt + F8 och ta en titt och se om du har några makron, se till att välja makron i: Alla öppna arbetsböcker. Om du inte har något som börjar som PERSONAL.XLSB måste du göra dessa valfria steg. Om du redan har något med PERSONAL.XLSB, vänta bara en sekund, okej?
Så vi ska gå ut på fliken Visa och vi ska spela in en ny makro. Det kommer att kallas HelloWorld. Inget utrymme, inget utrymme. Och vi ska lagra makrot i Personal Macro Workbook, klicka på OK. Och skriv bara någonstans Hello World, så här, och kom sedan ner här bredvid Ready och klicka på Stop. Okej, nu tvingar du dig att ha en personlig makroarbetsbok. Okej, om du aldrig har använt makron förut kanske du inte har det.
Vid den här tiden kommer vi att trycka på Alt + F11 och om du aldrig har använt makron kommer du att få den här grå skärmen här. Vi ska gå till View, Project Explorer och vi kommer att hitta den nya PERSONAL.XLSB. Om du redan har en modul där som du självklart kommer att göra, ja, öppna moduler och dubbelklicka på modul 1. Nu har jag redan ett par makron i min personliga makroarbetsbok men jag kommer hit ner för att sista raden, sätt ett par mellanslag in.
Okej, så då skulle du skriva den här koden som jag klistrade in. Och vi ska prata om detta makro när jag kör det. Så jag ska köra den en rad i taget genom att trycka på F8-tangenten. Och en sak jag lärde mig här är efter att ha avslutat sorten, det var lite oroväckande att hamna på ett annat ark, så jag kommer ihåg vilket ark vi är på, så senare kan jag välja det precis innan makrot är Gjort.
Okej nu, här är vi. Låt oss gå tillbaka till Excel så ser du att det första arket där heter Titel. Vi har för närvarande ett ark som heter Fråga. Jag vill lägga till ett nytt ark före rubrik, så vi gör Worksheets.Add och sedan vill jag byta namn på det. Kommer för närvarande i ett ark1 som TempSortSheet. Var försiktig, detta borde vara ett namn som du aldrig skulle råka använda. Som att inte kalla detta resultaträkning, okej? Använd bara något mycket slumpmässigt så när vi- kommer du att stöta på ett fel om du redan har ett ark som heter TempSortSheet. Och vad jag hittade är att jag använde det här arbetsbladet. Räkna om och om och om igen, så jag ska bara lägga det i en variabel så lättare att säga WSC än arbetsblad. Räkna senare. Så vi har 150 kalkylblad och vi har en lista över dessa kalkylblad.
Okej, så du är på första gången genom slingan där jag går från 1 till 250. Första gången genom slingan till vårt helt nya ark som vi lade till, TempSortSheet, på rad 1 kolumn 1, vi ska att sätta ett värde som är = till det första kalkylbladet. Okej, och vad det borde vara är bra, ja, TempSortSheet precis där. Men jag ska låta detta gå ett par gånger till. Jag trycker på F8 så ser du att vi får alla arkflikarna i den ordning de visas i arbetsboken och antar att jag börjar få de flikarna som har kontonumret, okej. Och jag ska låta det här springa, jag vill inte behöva trycka på F8 300 gånger. Så jag ska klicka här och gå till Debug, Run To Cursor som är Ctrl + F8 som kommer att avsluta det. Och se att vi har en lista över alla 150 arkflikar.Det är jättebra.
Och nu här utnyttjar vi kraften i Excel. Det finns många inlägg online inklusive på anslagstavlan, där de faktiskt försöker sortera. De skriver sin egen sortering för att flytta arken och vi kommer att dra nytta av Excel här eftersom Excel har en sortering och jag använder koden från Excel 2003. Jag gillar den här koden, lättare att komma ihåg. Jag ska börja i A1, ändra storlek på den till att vara 150 celler där jag sorterar det. Nyckeln blir A1. Det är det enda det kan vara. Beställningen kommer att stiga, och se till att ange att det finns en rubrik, okej? Vi vill inte att vårt TempSortSheet ska sorteras ner i data. Okej, så precis där. BAM! Det gör sorteringen och vi behöver inte skriva kring bubblasorteringskod. Och sedan ska vi gå från rad 2 som är A120,arket att flytta är A120. Varför " " ? Ahh, om du har ett arknamn, som vi hade det tidigare i veckan, som ett ark som heter 123 som skulle förvirra Excel. Och vart vi ska flytta den till? Vi kommer att flytta till inte rad 2 utan efter det första arket. Så MoveAfter blir 1. Så vi ska ta vårt ark som heter A120 och flytta det efter det första arket så, F8, och där fungerade det. Kör de tre raderna en gång till. A124 kommer till rätt plats.kommer att ta vårt ark som heter A120 och flytta det efter det första arket så, F8, och där fungerade det. Kör de tre raderna en gång till. A124 kommer till rätt plats.kommer att ta vårt ark som heter A120 och flytta det efter det första arket så, F8, och där fungerade det. Kör de tre raderna en gång till. A124 kommer till rätt plats.
Vid den här tiden, nu vet vi att det fungerar, vi kan göra Ctrl + F8 som gör alla rörelserna - 150 drag hände precis där. Och nu ska jag ta bort originalarket som är vårt borttagna TempSortSheet. Men innan jag tar bort det vill jag inte att de ska berätta för den som kör koden att vi ska ta bort arket. Så jag tar bara bort det och väljer sedan originalarket och visar meddelandet att arbetsböckerna har sorterats så.
Okej, så nu när vi har makrot vet vi att makrot fungerar och det finns i den personliga makroarbetsboken, ett par saker vi vill göra: Alt + F11 komma tillbaka hit och se till att du är i det personliga makrot. arbetsbok, klicka där och klicka på Spara. Om du inte sparar det nu, senare när du stänger Excel kommer det att blinka upp detta meddelande om "Vill du spara ändringar i PERSONAL.XLSB?" och du kommer helt att glömma bort och inte spara ändringarna, eller hur? Så jag ser alltid till att spara ändringarna och sedan Alt + Tab där jag anpassar verktygsfältet Snabbåtkomst, väljer bland makron, hittar den som heter SortSheets, lägger till den i verktygsfältet Snabbåtkomst. Jag gillar inte flödesschemat så vi letar efter något som säger A till Z eller om du vet, så låt 's använd den här och placera en liten flik där av Sortera blad, klicka på OK, klicka på OK.
Okej, nu är testet här. Jag lägger in en ny arbetsbok. Jag ska göra några kopior av arken och sätta dem i en konstig sekvens, Z och sedan Y och sedan M och sedan B, så. Klicka på Sortera ark och BAM! De är tillbaka här i rätt ordning. Hur coolt är inte det.
Okej, så dagens avsnitt, Pam vill sortera kalkylbladets flikar alfabetiskt. Wow! Vi använde makrot. Ändra först makrosäkerheten och spela in Hello World-makrot i den personliga makroarboken och skriv sedan koden i Personal Macro Workbook och tilldela den till en snabbåtkomstverktygsfältknapp.
Jag vill tacka Pam för den frågan. Jag vill tacka dig för att du kom förbi. Vi ses nästa gång för en ny netcast från.
Nedladdning fil
Ladda ner exempelfilen här: Podcast2084.xlsm
