Turite teksto stulpelį. Kiekvienam stulpelio tekstui norite įterpti naują darbalapį ir pavadinti tą darbalapį reikšmei langelyje.
Žiūrėti video
- Pam nori sukurti kiekvieno sąskaitos numerio darbalapį
- Šiuo metu ji naudoja Rodyti ataskaitos filtro puslapius
- Ieško greitesnio būdo
- Išsaugokite darbaknygę kaip XLSM
- Patikrinkite „Macro Security“ naudodami alt = "" + TMS ir nustatę antrą lygį
- „Alt“ + F11
- Įdėkite modulį
- Įveskite kodą, kaip parodyta
- „Alt“ + Q, kad grįžtumėte į „Excel“
- „Alt“ + F8
- Pasirinkite makrokomandą ir spustelėkite Parinktys
- Priskirkite „Ctrl“ + „Shift“ + W
Vaizdo įrašo nuorašas
Sužinokite „Excel“ iš „Podcast“, 2082 serija: sukurkite makrokomandos lapus
Ei, sveiki sugrįžę į internetą, aš Billas Jelenas. Na, praėjusią savaitę buvau Blumingtone ir Indianapolyje, Indianoje, ten surengiau du seminarus, o Pam iš Indijos seminaro pasakė, kad turi šį darbalapį, o kiekvienai A stulpelio langelei ji nori sukurti naują darbalapį, o tada aš sukūriau šią dalį , įdėkite atitinkamą langelį iš B stulpelio į langelį B1.
Aš turiu omenyje, kad šiuo metu Pam pažymėjo, kad tai daro labai sumaniai, kaip sukurti visus tuos darbalapius, tačiau vis tiek vargo. Ji eina į „Insert“, „Pivot Table“, „OK“ ir tada iš tos naujos „Pivot Table“ ji įdeda sąskaitą į „Filtrai“ sritį, o tada į „Data“ - į vertybių sritį. Tada ji eina į Parinktys, Rodyti ataskaitos filtro puslapius, Rodyti visus paskyros puslapius ir BAM! Ji gauna užvalkalus kaip nori. Dabar, kai duomenys yra netinkamoje vietoje, ji iš tikrųjų sako, kad šiuo metu ji tiesiog viską peržiūri grupes ir tada ištrina tas sukamas lenteles, gerai? Taigi, šį metodą ji naudoja šiuo metu ir noriu sužinoti, ar galiu padaryti ką nors greitesnio iš šio darbalapio.
Taigi, kaip mes tai darysime, turėsite iš anksto pasirinkti lapus, iš anksto pasirinkti lapus. Taip pat, jei dar niekada nedarėte makrokomandų, darykite „Alt“ + T Tomui, M - Marijai, S - Samui ir pakeiskite iš pirmo pasirinkimo į antrą. Taip pat labai svarbu, kad jūsų failas, kurį garantuoju, yra išsaugotas kaip .xlsx. Tai neveiks, jei taip paliksite, turite atlikti failą, išsaugoti kaip ir pasirinkti šią „Excel“ makrokomandą įgalinančią darbaknygę. Viršutinis yra numatytasis, o viršutinis - siaubingas failo formatas, kuriam neleidžiama naudoti makrokomandų.
Gerai, todėl mes pasirinksime tuos duomenis Alt + F11, atidaromas VBA redaktorius. Jei dar niekada nedarėte VBA, gausite šį bjaurų ekraną čia. Pasakys „Įterpti“, „Modulis“ ir yra mūsų naujas modulis, ir jūs ketinate įvesti šį kodą: žodis „Sub CreateSheets“ () Kai tik įvesite, kad jie įdės pabaigos antrinę dalį, bet tarp dviejų tų, kuriuos pasakysime „Kiekvienai langeliui“. Mes ketiname nustatyti darbalapį ir tikrai turėtume tai padaryti „Dim WS“ kaip darbalapį. Norite nustatyti darbalapį = darbalapiai. Papildyti. Dabar, darbalapiai. Pridėti reikia žinoti, kur mes norime jį pridėti ir ką aš noriu padaryti, tai aš tiesiog noriu pridėti šį darbalapį po paskutinio jos darbaknygėje esančio darbo. Taigi, aš pasakysiu, kiek dabar turime darbalapių. Ir čia pabandykime, tarkime: Derinti. Spausdinti darbalapius. Skaičius.Gerai, sakoma, kad turime 4, grįžkime į „Excel“ ir patikrinkime. 1 2 3 4, todėl jį pridėsime po 4 lapo. Taigi po to, kai baigsis, turėtume pamatyti naują darbalapį, kuriame mes įdėsime 100 paskyros duomenis.
Gerai, dabar WS.Name = langelis. Vertė ir tada mes nusprendėme, kad imsimės visko, kas yra dešinėje paskyros pusėje: duomenys. Paimsime tuos duomenis ir įdėsime į ką tik sukurto visiškai naujo darbalapio B1 langelį. Taigi, iš langelio, dešinėje, kiekvienai langelei perimsime 0 eilučių po 1 stulpelį ir paimsime tą vertę, gerai? Taigi turime makrokomandą: Failas, Uždaryti ir grįžti į „Microsoft Excel“, tada paspausime „Alt“ + F8. Alt + F8, „CreateSheets“, eis į parinktį. Berniukas, kas bus gera? „Ctrl“ + „Shift“ + W. W darbalapiams. Taigi ten palaikau „Shift“ + W, spustelėkite Gerai ir galime spustelėti Atšaukti. Gerai, pasirinkite tas langelius ir tada „Ctrl“ + „Shift“ + W. Žiūrėkite čia po „Wrap Up“ - BAM! Kiekviename yra jų. Ji gavo duomenis iš kiekvieno atskiro lapo. Kietas, šaunus būdas eiti.
Galimybė sukurti daugybę darbalapių „Fly“ ir, žinoma, tai būtų naudinga kur kas daugiau. Padarykime = ROW * 2 tai nukopijuokite žemyn, žemyn, žemyn, žemyn, žemyn ir pasirinkite visus tuos - O palaukite, mes turėjome įdėti kai kuriuos duomenis ten. Užpildykime jį 2, gerai. Tada „Ctrl“ + „Shift“ + W. BAM! O, aš jau naudojau vieną 49 lapą. Bet žiūrėk, mes buvome iki pat galo, greitas ir greitas greitas kelias. Kaip sukurti daug skirtingų darbalapių „Fly“.
Gerai, šio epizodo temos: Pam iš Indy nori sukurti darbalapį kiekvienam A stulpelio numeriui. Šiuo metu ji naudoja „Show Pivot“ lentelių ataskaitos filtro puslapius. Ji ieško greitesnio kelio, gerai? Taigi mes išsaugosime darbaknygę kaip XLSM. Eisime „Alt + TMS“ ir nustatysime antrąjį, o ne pirmąjį pasirinkimą. Alt + F11, dabar mes esame VBA, įterpti modulį, įveskite kodą, kaip parodyta, Alt + Q, kad grįžtumėte į „Excel“, Alt + F8, pasirinkite makrokomandos pavadinimą ir spustelėkite Parinktys, priskirkite „Ctrl“ + „Shift“ + W.
Ei, noriu padėkoti Pamui už dalyvavimą mano seminare Indianapolyje. Mes ten puikiai praleidome laiką, gera grupė. Ir noriu padėkoti, kad užsukote. Pamatysime kitą kartą kitai internetinei transliacijai iš.
Atsisiųsti failą
Parsisiųskite failo pavyzdį čia: Podcast2082.xlsm
