Vienas iš būdų, kaip gauti kodą į VBA modulį, yra įrašyti savo veiksmus naudojant „Excel“ makrokomandų įrašymo įrenginį. Vienas dalykas, kurį reikia atsiminti, yra tai, kad galite įrašyti tik tuos dalykus, kuriuos galite atlikti tiesiogiai programoje „Excel“. Pranešimo laukelio rodymas nėra įprastas „Excel“ repertuaras. (Tai yra VBA dalykas.) Makrokomandų įrašymo priemonė yra naudinga, tačiau daugeliu atvejų tikriausiai turėsite įvesti bent kodą rankiniu būdu.
Štai nuoseklus pavyzdys, kuriame parodyta, kaip įrašyti makrokomandą, kuri įterpia naują darbalapį ir paslepia visas, išskyrus pirmąsias dešimt eilučių ir visus stulpelius, išskyrus pirmuosius dešimt. Jei norite išbandyti šį pavyzdį, pradėkite nuo naujos tuščios darbaknygės ir atlikite šiuos veiksmus:
Suaktyvinkite darbalapį darbaknygėje.
Tiks bet koks darbalapis.
Spustelėkite skirtuką Kūrėjas ir įsitikinkite, kad Naudoti santykines nuorodas nėra paryškinta.
Ši makrokomanda bus įrašyta naudojant absoliučias nuorodas.
Pasirinkite Kūrėjas → Kodas → Įrašyti makrokomandą arba spustelėkite piktogramą, esančią šalia parengties indikatoriaus kairiajame būsenos juostos gale.
„Excel“ rodo dialogo langą Įrašyti makrokomandą.
Dialogo lange Įrašyti makrokomandą pavadinkite makrokomandą TenByTen ir paspauskite Shift + T, kad būtų rodomas spartusis klavišas.
Makrokomandą galima vykdyti paspaudus Ctrl+Shift+T.
Spustelėkite Gerai, kad pradėtumėte įrašymą.
„Excel“ automatiškai įterpia naują VBA modulį į projektą, atitinkantį aktyvią darbaknygę. Nuo šio momento „Excel“ konvertuoja jūsų veiksmus į VBA kodą. Kol įrašote, piktograma būsenos juostoje virsta mažu kvadratu. Tai priminimas, kad makrokomandos įrašymo priemonė veikia. Taip pat galite spustelėti šią piktogramą, kad sustabdytumėte makrokomandų įrašymo įrenginį.
Spustelėkite naujo lapo piktogramą, esančią paskutinio lapo skirtuko dešinėje.
„Excel“ įterpia naują darbalapį.
Pasirinkite visą K stulpelį (11 stulpelį) ir paspauskite Ctrl+Shift+rodyklė dešinėn; tada dešiniuoju pelės mygtuku spustelėkite bet kurį pasirinktą stulpelį ir nuorodų meniu pasirinkite Slėpti.
„Excel“ paslepia visus pasirinktus stulpelius.
Pasirinkite visą 11 eilutę ir paspauskite Ctrl+Shift+rodyklė žemyn; tada dešiniuoju pelės mygtuku spustelėkite bet kurią pasirinktą eilutę ir nuorodų meniu pasirinkite Slėpti.
„Excel“ paslepia visus pasirinktus stulpelius.
Pasirinkite langelį A1.
Pasirinkite Kūrėjas → Kodas → Sustabdyti įrašymą arba spustelėkite mygtuką Sustabdyti įrašymą būsenos juostoje (mažame kvadrate).
„Excel“ nustoja įrašyti jūsų veiksmus.
Norėdami peržiūrėti šią naujai įrašytą makrokomandą, paspauskite Alt + F11, kad suaktyvintumėte VBE. Projekto lange raskite darbaknygės pavadinimą. Matote, kad projekte yra naujas modulis. Modulio pavadinimas priklauso nuo to, ar darbaknygėje buvo kitų modulių, kai pradėjote įrašyti makrokomandą. Jei to nepadarėte, modulis bus pavadintas Module1. Galite dukart spustelėti modulį, kad pamatytumėte modulio kodo langą.
Štai jūsų veiksmų sugeneruotas kodas:
Sub TenByTen()
'
TenByTen makrokomandą
'
Spartusis klaviatūros klavišas: Ctrl + Shift + T
'
Sheets.Add After:=ActiveSheet
Stulpeliai („K:K“). Pasirinkite
Diapazonas (Pasirinkimas, pasirinkimas. Pabaiga (xlToRight)).Pasirinkite
Selection.EntireColumn.Hidden = Tiesa
Eilutės („11:11“). Pasirinkite
Diapazonas (Pasirinkimas, pasirinkimas. Pabaiga (xlDown)).Pasirinkite
Selection.EntireRow.Hidden = Tiesa
Diapazonas („A1“). Pasirinkite
Pabaigos sub
Norėdami išbandyti šią makrokomandą, suaktyvinkite bet kurį darbalapį ir paspauskite spartųjį klavišą, kurį priskyrėte atlikdami 4 veiksmą: Ctrl + Shift + T.
Jei makrokomandai nepriskyrėte sparčiojo klavišo, nesijaudinkite. Štai kaip parodyti visų galimų makrokomandų sąrašą ir paleisti norimą:
Pasirinkite Kūrėjas → Kodas → Makrokomandos.
Klaviatūros gerbėjai gali paspausti Alt + F8. Bet kuris iš šių metodų rodo dialogo langą, kuriame pateikiamos visos galimos makrokomandos.
Sąraše pasirinkite makrokomandą (šiuo atveju TenByTen).
Spustelėkite mygtuką Vykdyti.
„Excel“ vykdo makrokomandą ir gausite naują darbalapį su dešimčia matomų eilučių ir dešimčia matomų stulpelių.
Galite vykdyti bet kokį skaičių komandų ir atlikti bet kokį skaičių veiksmų, kol veikia makrokomandų įrašymo priemonė. „Excel“ pareigingai verčia pelės veiksmus ir klavišų paspaudimus į VBA kodą.
Ir, žinoma, galite redaguoti makrokomandą ją įrašę. Norėdami išbandyti savo naujus įgūdžius, pabandykite redaguoti makrokomandą taip, kad ji įterptų darbalapį su devyniomis matomomis eilutėmis ir stulpeliais – puikiai tinka „Sudoku“ galvosūkiui.