Üks viis koodi VBA-moodulisse hankimiseks on oma toimingute salvestamine Exceli makrosalvesti abil. Üks asi, mida peate meeles pidama, on see, et saate salvestada ainult neid asju, mida saate otse Excelis teha. Teatekasti kuvamine ei kuulu Exceli tavalisse repertuaari. (See on VBA asi.) Makrosalvesti on kasulik, kuid paljudel juhtudel peate tõenäoliselt vähemalt osa koodi käsitsi sisestama.
Siin on samm-sammult näide, mis näitab, kuidas salvestada makro, mis lisab uue töölehe ja peidab kõik peale kümne esimese rea ja kõik peale kümne esimese veeru. Kui soovite seda näidet proovida, alustage uue tühja töövihikuga ja järgige neid samme.
Aktiveerige töövihikus tööleht.
Iga tööleht sobib.
Klõpsake vahekaarti Arendaja ja veenduge, et Kasuta suhtelisi viiteid pole esile tõstetud.
See makro salvestatakse absoluutsete viidete abil.
Valige Arendaja → Kood → Makro salvestamine või klõpsake olekuriba vasakus otsas Valmis indikaatori kõrval olevat ikooni.
Excel kuvab dialoogiboksi Makro salvestamine.
Andke dialoogiboksis Makro salvestamine makrole nimeks TenByTen ja vajutage kiirklahvi jaoks Shift+T.
Makro saab käivitada, kui vajutate Ctrl+Shift+T.
Salvestamise alustamiseks klõpsake nuppu OK.
Excel lisab projekti automaatselt uue VBA mooduli, mis vastab aktiivsele töövihikule. Sellest hetkest alates teisendab Excel teie toimingud VBA-koodiks. Salvestamise ajal muutub olekuribal olev ikoon väikeseks ruuduks. See on meeldetuletus, et makrosalvesti töötab. Samuti võite makrosalvesti peatamiseks klõpsata sellel ikoonil.
Klõpsake uue lehe ikooni, mis asub viimase lehe vahekaardil paremal.
Excel lisab uue töölehe.
Valige kogu veerg K (11. veerg) ja vajutage Ctrl+Shift+paremnool; seejärel paremklõpsake mis tahes valitud veerus ja valige kiirmenüüst Peida.
Excel peidab kõik valitud veerud.
Valige terve rida 11 ja vajutage Ctrl+Shift+allanool; seejärel paremklõpsake mis tahes valitud rida ja valige kiirmenüüst Peida.
Excel peidab kõik valitud veerud.
Valige lahter A1.
Valige Arendaja → Kood → Peata salvestamine või klõpsake olekuribal (väikesel ruudul) nuppu Peata salvestamine.
Excel lõpetab teie toimingute salvestamise.
Selle äsja salvestatud makro vaatamiseks vajutage VBE aktiveerimiseks Alt+F11. Otsige projekti aknast üles töövihiku nimi. Näete, et projektis on loetletud uus moodul. Mooduli nimi oleneb sellest, kas makro salvestamise alustamisel oli töövihikus veel mooduleid. Kui te seda ei teinud, nimetatakse mooduli nimeks Moodul1. Mooduli koodiakna kuvamiseks saate moodulil topeltklõpsata.
Siin on teie tegevuse tulemusel loodud kood:
Sub TenByTen()
'
TenByTen makro
'
Klaviatuuri otsetee: Ctrl+Shift+T
'
Sheets.Add After:=ActiveSheet
Veerud ("K:K"). Valige
Vahemik (valik, valik. lõpp (xlToRight)).Valige
Selection.EntireColumn.Hidden = Tõene
Read (“11:11”). Valige
Vahemik (valik, valik. lõpp (xlalla)).Valige
Selection.EntireRow.Hidden = Tõene
Vahemik (“A1”). Valige
Lõpeta alam
Selle makro proovimiseks aktiveerige mis tahes tööleht ja vajutage 4. sammus määratud kiirklahvi: Ctrl+Shift+T.
Kui te makrole kiirklahvi ei määranud, ärge muretsege. Kõigi saadaolevate makrode loendi kuvamiseks ja soovitud makrode käivitamiseks tehke järgmist.
Valige Arendaja → Kood → Makrod.
Klaviatuurifännid saavad vajutada Alt+F8. Kumbki neist meetoditest kuvab dialoogiboksi, mis loetleb kõik saadaolevad makrod.
Valige loendist makro (antud juhul TenByTen).
Klõpsake nuppu Käivita.
Excel käivitab makro ja saate uue töölehe kümne nähtava rea ja kümne nähtava veeruga.
Saate makrosalvesti töötamise ajal täita suvalise arvu käsklusi ja teha mis tahes arvu toiminguid. Excel tõlgib teie hiiretoimingud ja klahvivajutused kohusetundlikult VBA-koodiks.
Ja loomulikult saate makrot ka pärast selle salvestamist redigeerida. Uute oskuste testimiseks muutke makrot nii, et see lisaks üheksa nähtava rea ja veeruga töölehe – see sobib suurepäraselt Sudoku pusle jaoks.