Makro Vytváranie listov z buniek - tipy pre Excel

Máte stĺpec textu. Pre každý text v stĺpci chcete vložiť nový pracovný hárok a pomenovať tento pracovný hárok pre hodnotu v bunke.

Pozeraj video

  • Pam chce vytvoriť pracovný list pre každé číslo účtu
  • V súčasnosti používa možnosť Zobraziť stránky filtra prehľadov
  • Hľadáte rýchlejšiu cestu
  • Uložte zošit ako XLSM
  • Skontrolujte zabezpečenie makier pomocou alt = "" + TMS a nastavte na druhú úroveň
  • Alt + F11
  • Vložte modul
  • Zadajte kód podľa obrázka
  • Alt + Q sa vrátite do Excelu
  • Alt + F8
  • Vyberte makro a kliknite na položku Možnosti
  • Priradiť k Ctrl + Shift + W

Prepis videa

Naučte sa Excel z Podcastu, epizóda 2082: Vytváranie makier pracovných hárkov

Ahoj, vitaj späť na netcastu, som Bill Jelen. Minulý týždeň som bol v Bloomingtone a Indianapolise v Indiane na dvoch seminároch a Pam zo seminára Indy povedala, že tento pracovný list má, a pre každú bunku v stĺpci A chce vytvoriť nový pracovný list a potom som túto časť vytvoril , vložte zodpovedajúcu bunku zo stĺpca B do bunky B1.

Myslím tým momentálne, Pam poznamenala, že to robí veľmi šikovným spôsobom, ako vytvoriť všetky tieto pracovné listy, ale stále je to problém. Prejde do ponuky Vložiť, kontingenčná tabuľka, OK a potom z tejto novej kontingenčnej tabuľky vloží účet do oblasti filtrov a potom do oblasti s údajmi ako je táto. A potom prejde na Možnosti, Zobraziť stránky filtra prehľadu, Zobraziť všetky stránky účtu a BAM! Dostáva listy, aké chce. Teraz, keď sú údaje na nesprávnom mieste, vlastne hovorí, že v tomto okamihu iba prejde všetky skupiny a potom tieto kontingenčné tabuľky odstráni, dobre? Takže to je metóda, ktorú momentálne používa, a chcem zistiť, či dokážem pre tento pracovný hárok urobiť niečo rýchlejšie.

To, ako to urobíme, je teda to, že budete musieť vopred vybrať hárky, predbežne vybrať hárky. Tiež hej, ak ste ešte nikdy nerobili makra, urobte Alt + T pre Toma, M pre Mary, S pre Sama a zmeňte z prvej na druhú voľbu. Tiež je skutočne, skutočne dôležité, váš súbor, ktorý zaručujem, uložený ako .xlsx. Nebude to fungovať, ak to necháte tak, musíte urobiť File (Súbor), Save As (Uložiť ako) a zvoliť tento zošit programu Excel s povolením makra. Ten najvyšší je predvolený a ten najhorší je hrozný formát súboru, v ktorom nie je dovolené používať makrá.

Dobre, takže vyberieme tieto údaje Alt + F11, otvorí sa editor VBA. Ak ste nikdy predtým nerobili VBA, získate tu túto škaredú obrazovku. Povedzte Vložiť, Modul a je tu náš nový modul. Zadáte tento kód: slovo Sub CreateSheets (). Len čo napíšete, že vložia End Sub, ale medzi dva z nich, povieme Pre každú bunku vo výbere. Chystáme sa nastaviť pracovný hárok a naozaj by sme mali urobiť tento Dim WS ako pracovný hárok. Chcete nastaviť pracovný list = Pracovné listy. Pridať. Teraz, Pracovné listy. Add musí vedieť, kam ho chceme pridať, a čo chcem urobiť, je len pridať tento pracovný hárok po poslednej práci v zošite. Takže poviem, koľko pracovných listov máme teraz. A teraz to skúsme, povedzme: Pracovné listy Debug.Print.Count.Dobre, hovorí sa, že máme 4. Vráťme sa späť do programu Excel a skontrolujte to. 1 2 3 4, takže ho budeme pridávať po 4. hárku. Po ukončení by sa nám teda mal zobraziť nový pracovný hárok a tento pracovný hárok je miesto, kam vložíme údaje pre účet 100.

V poriadku, WS.Name = cell.Value a potom sme sa rozhodli, že vezmeme všetko, čo je napravo od Účtu: Údaje. A vezmeme tieto údaje a vložíme ich do bunky B1 úplne nového pracovného hárka, ktorý sme práve vytvorili. Takže z bunky, vpravo, pre každú bunku ideme do offsetu 0 riadkov o 1 stĺpec a chytíme tú hodnotu, dobre? Máme teda svoje makro: Súbor, Zavrieť a Návrat do programu Microsoft Excel a potom stlačíme kombináciu klávesov Alt + F8. Alt + F8, CreateSheets, prejde do ponuky Možnosti. Chlapče, čo bude dobré? Ctrl + Shift + W. W pre pracovné listy. Takže tam pridržím Shift + W, kliknem na OK a môžeme kliknúť na Zrušiť. V poriadku, vyberte tieto bunky a potom Ctrl + Shift + W. Pozerajte tu hneď po skončení - BAM! Má ich na každej jednej. Získal údaje z každého jednotlivého hárka. Super, super cesta.

Byť schopný vytvoriť mnoho pracovných listov za behu a samozrejme by to fungovalo oveľa viac. Urobme a = ROW * 2, skopírujme to dole, dole, dole, dole, dole a vyberte všetky z nich - ach počkajte, musíme tam dať nejaké dáta. Naplňme to 2, dobre. A potom Ctrl + Shift + W. BAM! Jeden list 49 som už použil. Ale pozrite sa, boli sme úplne blízko, na konci rýchlo a rýchlo. Ako vytvoriť veľa rôznych pracovných listov v režime Fly.

Dobre, témy v tejto epizóde: Pam z Indy chce vytvoriť pracovný hárok pre každé číslo účtu v stĺpci A. V súčasnosti používa možnosť Zobraziť stránky filtra prehľadov kontingenčných tabuliek. Hľadá rýchlejšiu cestu, dobre? Takže uložíme zošit ako XLSM. Pôjdeme Alt + TMS a nastavíme druhú, nie prvú voľbu. Alt + F11, teraz sme vo VBA, vložte modul, zadajte kód, ako je znázornené, Alt + Q sa vrátite do Excelu, Alt + F8, vyberte názov makra a kliknite na Možnosti, priradiť k Ctrl + Shift + W.

Ahoj, chcem sa poďakovať Pam za to, že bol na mojom seminári v Indianapolise. Bolo nám tam super, dobre partia. A chcem sa vám poďakovať, že ste sa zastavili. Uvidíme sa nabudúce pri ďalšom netcaste z.

Stiahnuť súbor

Stiahnutie vzorového súboru nájdete tu: Podcast2082.xlsm

Zaujímavé články...