Kuldeep måste välja var tredje cell genom ett intervall på 1500 celler. ger en galen lösning.
Kolla på video
- Kuldeep vill välja var tredje cell för 1500 celler
- Makrokoden för att förena alla 500 celler är för lång och orsakar ett kompileringsfel!
- Lösning: Bygg 1, tom, tom. Kopiera dessa tre celler och klistra in till 1500 celler
- Välj de 1500 cellerna. Hem, Sök & välj, Gå till Special, Konstanter för att välja var tredje cell
- Sedan, en rad VBA för att flytta urvalet N rader eller kolumner bort.
- Slutligen en VBA-makro för att göra det hela
- Coolt tips: Om du använder Ctrl + G för dialogrutan Gå till, visar den nyligen valda intervall.
- Coolt tips: I dialogrutan Gå till, håll ned Skift för att välja från aktuell cell till Gå till-cellen.
- VBA-tips: Använd UsedRegion för att hitta den sista raden i kalkylbladet
Videoutskrift
Lär dig Excel från, Podcast avsnitt 2108: Välj var tredje cell.
Detta är en doozy. Kuldeep skickar in en fråga. Han säger att han har data i E24 till BEV24. Det är 1500 celler. Han måste välja var tredje cell. (obegripligt - 00:14) fackmakrot är för långt och genererar fel. Vad pratar han om, fackföreningens makro?
Han pratar om, han har redan provat det här, HOWTOSELECTEVERYTHIRDCELL. Spela in lite makro här. Välj den här cellen och sedan CONTROL-tangenterna, den cellen, den cellen, den cellen, den cellen, den cellen. (oförståelig - 00:33) gå för långt. Jag vill bara se hur de spelar in koden. Stoppa inspelningen. ALT + F8. HOWTOSELECTEVERYTHIRDCELL, EDIT, och det här är riktigt dåligt. Det finns inget magiskt sätt att välja var tredje cell. Du måste bara lista alla 500 celler där, vilket tar längre tid än att välja 500 celler, eller hur? Bara meningslöst. Meningslöst, meningslöst, meningslöst. (Så att - 01:00) makroinspelaren inte har något bättre sätt att göra detta.
Så jag sa till Kuldeep, vad vi måste göra, det vi måste utnyttja, är speciella celler. Jag sa, av någon chans, är varje tredje cell numerisk och allt annat är text? Nej, säger han. Okej, så här är vad jag ska göra. Jag ska gå till en helt ny rad och sätta en 1 och sedan ingenting, ingenting, och jag kommer att kopiera dessa tre celler, de tre cellerna så, och det jag ska göra är jag ' kommer att gå till slutet och välja alla dessa celler. Det här är 1500 celler som är en multipel av 3 och klistrar in, och vad som kommer att göra för mig är att det kommer att ge mig var tredje cell kommer att vara numerisk, så och det vackra är, vad kan göra då är, välj härifrån, skriv BEV26 och jag håller ned SKIFT-tangenten när jag klickar på OK, och det kommer att väljas till slutet och sedan HEM,HITTA & VÄLJ, GÅ TILL SPECIAL, och jag vill ha KONSTANTERNA, klicka på OK, och vad jag nu har gjort är att jag lyckats mycket snabbt välja var tredje cell.
Du säger, vad är det bra? Hur knuffar du upp urvalet, vilket är en bra fråga, men här är vad vi ska göra. Vi ska byta till VBA. ALT + F11, ALT + F11, CONTROL + G, och denna vackra lilla kod här. Från urvalet ska vi kompensera ett antal rader nedåt, något antal kolumner över och välja, okej? Så när jag tittar på data vill jag gå till Bill Jelen i E23. Egentligen vill jag åka till Kuldeep i E24, som är två rader uppåt. Så jag ska säga gå upp två rader, tryck på ENTER, och det valet, som var var tredje cell, kommer nu att röra sig uppåt.
Är det inte bara fantastiskt, och i själva verket skrev jag fyra små makron, en som heter flytta upp, flytta ner, flytta åt vänster, flytta åt höger, för när jag visade Kuldeep den här metoden är han som, åh nej, det finns 20 saker jag måste göra. Så här klickar vi på makrot för att flytta uppåt som ska flytta mig upp till rad 23, och sedan flytta höger makro, flytta åt höger makro, flytta ner, vänster, vänster, höger? Titta, vi kunde bara … vi kan … när vi har fått den där där, är vi riktigt coola att kunna flytta saker, vet du, och sedan, därifrån, var det en hel massa andra saker Kuldeep ville göra . Han ville kopiera och klistra in (obegripligt - 03:14) transponera någon annanstans, rätt, och det är allt enkelt, relativt. Det blir varje tredje cell vald.
Nu, vad jag ska visa dig här - för jag misstänker att Kuldeep vill göra allt detta i ett makro och inte vill behöva göra stegen om och om igen och igen, och hej jag applåderar det, det är fantastiskt - ska jag säga till Kuldeep, det första jag vill göra är att jag vill att du ska välja alla celler. (Var - 03:35) du vill välja var tredje cell, jag vill att du ska välja alla celler så, okej, och sedan säger vi räkna hur många kolumner vi har, ta reda på var vi började och sedan räkna ut ut nästa tillgängliga rad, och jag använder USEDRANGE för att ta reda på var den sista raden är. Jag lägger till 2 rader i det, och så vad det borde göra är att bara hitta en fin tom rad nere i rad 27. Låt oss ta en titt, och så 27 är en tom rad. Koden kommer att sätta en 1 i kolumn 5 i den tomma raden,och sedan kommer det att kopiera 3 celler. Så, E, F och G finns i de 3 cellerna som vi ska kopiera där och vi kommer att kopiera den till 1500 kolumner, som genererar en serie av 1s och blank, blank, 1, blank, tomt, 1, tomt, tomt, hela vägen ut till slutet av våra data, och sedan SPECIALCELLS, detta är hem, hitta och välj, gå till specialceller, välj konstanterna .VÄLJ.
Okej, så nu är det valt att data, och då vet vi att vi vill gå fyra rader upp och, bam, så går det upp, i det här fallet till rad 23. Kuldeep vill rad 24, (justera koden en bit - 04:43) och tryck sedan på nedåtpilen så är vi klara.
Det är det bästa sättet jag måste göra. Om någon har en bättre metod för att välja varje tredje cell (oförståelig - 04:52) coolt sätt att göra det eller alla andra celler eller var fjärde celler, lämna i alla fall några kommentarer i YouTube-kommentarerna.
Men Hej. Jag har inte marknadsfört Power Excel With-boken eller VBA med makroboken, någon av dem. Massor av bra exceltips och tricks i dessa böcker. Klicka på det i det övre högra hörnet för att läsa mer om boken.
OK. Så i det här avsnittet vill Kuldeep välja var tredje cell för 1500 celler. Han försökte skriva ett makro för att förena alla 500 celler, men det är för långt och orsakar ett kompileringsfel. Så, lösning 1: bygg en 3-cellmatris med 1, tom, tom; kopiera dessa 3 celler och klistra in till 1500 celler; som skapar ett intervall på 1500 cellkolumner brett intervall med 1, tomt, tomt, 1, tomt tomt; välj 1500 celler, hitta och välj, gå till special, konstanter, välj var tredje cell; sedan den ena raden av VBA, selection.offset.select, för att flytta upp ett antal rader eller kolumner eller något annat; och sedan slutligen (obegripligt - 05:52) en VBA-makro för att göra det hela.
Jag vill tacka Kuldeep för att ha skickat in den frågan och 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: Podcast2108.xlsm
