Imate stupac teksta. Za svaki tekst u stupcu želite umetnuti novi radni list i imenovati taj radni list za vrijednost u ćeliji.
Gledaj video
- Pam želi stvoriti radni list za svaki broj računa
- Trenutno koristi Show Filter Pages stranice
- U potrazi za bržim putem
- Spremite radnu knjigu kao XLSM
- Provjerite Makro sigurnost s alt = "" + TMS i postavi na drugu razinu
- Alt + F11
- Umetni modul
- Upišite kod kako je prikazano
- Alt + Q za povratak u Excel
- Alt + F8
- Odaberite makronaredbu i kliknite Opcije
- Dodijeli Ctrl + Shift + W
Prijepis videozapisa
Naučite Excel iz Podcasta, epizoda 2082: Makronaredba za radne listove
Hej, dobrodošao natrag u prijenos uživo, ja sam Bill Jelen. Pa, prošli sam tjedan bio u Bloomingtonu i Indianapolisu, Indiana, gdje sam tamo držao dva seminara, a Pam sa seminara Indy rekla je da ima ovaj radni list, a za svaku ćeliju u stupcu A želi stvoriti novi radni list i onda sam izmislila ovaj dio , stavite odgovarajuću ćeliju iz stupca B u ćeliju B1.
Trenutno mislim, Pam je primijetila da to radi na vrlo pametan način, kako stvoriti sve te radne listove, ali to je još uvijek gnjavaža. Ona prelazi na Umetni, zaokretnu tablicu, u redu, a zatim iz te nove zaokretne tablice stavlja Račun u područje Filteri, a zatim Podatke u takvo područje vrijednosti. A zatim ide na Mogućnosti, Prikaži stranice filtra izvješća, Prikaži sve stranice računa i BAM! Dobiva plahte s ciljem kako želi. Sad kad su podaci na pogrešnom mjestu, ona zapravo kaže da u ovom trenutku samo prolazi kroz sve grupe, a zatim tako briše te zaokretne tablice, u redu? Dakle, to je metoda koju ona trenutno koristi i želim vidjeti mogu li učiniti nešto brže od tog radnog lista.
Dakle, način na koji ćemo to učiniti je da ćete morati unaprijed odabrati listove, unaprijed odabrati listove. Također, hej, ako nikada prije niste radili makronaredbe, napravite Alt + T za Toma, M za Mariju, S za Sama i prijeđite s prvog na drugi izbor. Također jako, jako važno, vaša datoteka za koju garantiram da je spremljena kao .xlsx. Neće uspjeti ako tako ostavite, morate napraviti File, Save As i odabrati ovu Excel Macro-Enabled Radnu knjigu. Taj je gornji zadani, a gornji je užasan format datoteke koji ne smije koristiti makronaredbe.
U redu, pa ćemo odabrati te podatke Alt + F11, otvara VBA Editor. Ako nikada prije niste radili VBA, ovdje ćete dobiti ovaj ružni zaslon. Reći će Umetni, modul i postoji naš novi modul, a vi ćete upisati ovaj kod: riječ Sub CreateSheets (). Čim natipkate da će staviti Kraj Sub, ali između njih dvoje reći ćemo Za svaku ćeliju u Odabiru. Postavit ćemo radni list i zaista bismo trebali napraviti ovaj Dim WS kao radni list. Želite postaviti radni list = Worksheets. Dodati. Sada, Worksheets.Add mora znati gdje ga želimo dodati i što želim učiniti, želim samo dodati ovaj radni list nakon zadnjeg rada koji je u radnoj knjižici. Dakle, reći ću koliko imamo sada radnih listova. I ovdje samo pokušajmo, recimo: Debug.Print worksheets.Count.Dobro, stoji da imamo 4, vratimo se na Excel i provjerimo to. 1 2 3 4, pa ćemo je dodati nakon 4. lista. Dakle, nakon završetka, trebali bismo vidjeti novi radni list i na njemu ćemo staviti podatke za račun 100.
U redu, WS.Name = cell.Value i tada smo odlučili da ćemo uzeti sve što je desno od Računa: podatke. Uzet ćemo te podatke i staviti ih u ćeliju B1 potpuno novog radnog lista koji smo upravo stvorili. Dakle, iz ćelije, zar ne, za svaku ćemo ćeliju pomaknuti 0 redaka 1 stupac i zgrabiti tu vrijednost, u redu? Tako imamo makronaredbu: Datoteka, Zatvori i Povratak u Microsoft Excel, a zatim ćemo pritisnuti Alt + F8. Alt + F8, CreateSheets, ići će na Options. Čovječe, što će biti dobro? Ctrl + Shift + W. W za radne listove. Zato držim Shift + W tamo, kliknite OK i možemo kliknuti Cancel. U redu, odaberite te ćelije, a zatim Ctrl + Shift + W. Gledajte ovdje odmah nakon Zamotavanja - BAM! Ima ih na svakom. Dobivao je podatke sa svakog pojedinog lista. Kul, cool način.
Budući da bih mogao stvoriti mnogo radnih listova na Flyu, i naravno, to bi radilo i puno više od toga. Napravimo = ROW * 2 kopirajmo ovo dolje, dolje, dolje, dolje, dolje i odaberemo sve one - Oh, čekaj, tamo moramo staviti neke podatke. Napunimo ga s 2, u redu. A zatim Ctrl + Shift + W. BAM! Oh, već sam upotrijebio jedan list 49. Ali, pogledajte, bili smo skroz blizu, brzog i brzog kraja. Kako stvoriti puno različitih radnih listova na Flyu.
U redu, teme u ovoj epizodi: Pam iz Indyja želi stvoriti radni list za svaki broj računa u stupcu A. Trenutno koristi stranice prikaza filtra izvješća zaokretnih tablica. Ona traži brži put, u redu? Dakle, radnu ćemo knjigu spremiti kao XLSM. Idemo na Alt + TMS i postavimo drugi izbor, a ne prvi izbor. Alt + F11, sada smo u VBA, Umetnite modul, Upišite kod kao što je prikazano, Alt + Q za povratak u Excel, Alt + F8, odaberite naziv makronaredbe i kliknite Opcije, dodijelite Ctrl + Shift + W.
Hej, želim zahvaliti Pam što je bila na mom seminaru u Indianapolisu. Tamo nam je bilo super, dobra grupa. I želim vam zahvaliti što ste navratili. Vidimo se sljedeći put za još jedan prijenos od.
Preuzmi datoteku
Preuzmite datoteku uzorka ovdje: Podcast2082.xlsm
