Ein einfaldasta vinnublaðstengda sjálfvirknin sem þú getur beitt með fjölvi í Excel er að bæta við og nefna nýtt vinnublað. Hér er hvernig þessi fjölvi virkar og hvernig á að nota hann.
Hvernig macro virkar
Þegar þú lest í gegnum línurnar í kóðanum muntu sjá að þetta fjölvi er tiltölulega leiðandi:
Sub Macro1()
'Skref 1: Segðu Excel hvað á að gera ef villa
Við Villa GoTo MyError
'Skref 2: Bættu við blaði og nefndu það
Blað.Bæta við
ActiveSheet.Name = _
WorksheetFunction.Text(Now(), "md-yyyy h_mm_ss
fyrir hádegi Eftir hádegi")
Hætta undir
'Skref 3: Ef hér gerðist villa; segðu notandanum
MyError:
MsgBox "Það er nú þegar til blað sem heitir það."
End Sub
Þú verður að gera ráð fyrir því að ef þú gefur nýja blaðinu nafn sem er þegar til, myndi villa koma upp. Svo í skrefi 1 segir fjölvi Excel að sleppa strax í línuna sem segir MyError (í skrefi 3) ef það er villa.
Skref 2 notar aðferðina Bæta við til að bæta við nýju blaði. Sjálfgefið er að blaðið heitir Sheet xx, þar sem xx táknar númer blaðsins. Þú gefur blaðinu nýtt nafn með því að breyta Name eiginleikanum á ActiveSheet hlutnum. Í þessu tilviki ertu að nefna vinnublaðið með núverandi dagsetningu og tíma.
Eins og með vinnubækur, í hvert sinn sem þú notar VBA til að bæta við nýju blaði, verður nýlega bætt blað sjálfkrafa að virka blaðinu. Að lokum, í skrefi 2, athugaðu að fjölvi hættir ferlinu. Það verður að gera þetta svo það fari ekki óvart í skref 3 (sem kemur aðeins við sögu ef villa kemur upp).
Skref 3 lætur notandann vita að nafn blaðsins sé þegar til. Aftur ætti þetta skref að vera virkjað aðeins ef villa kemur upp.
Hvernig á að nota macro
Til að útfæra þetta fjölvi geturðu afritað og límt það inn í venjulega einingu:
Virkjaðu Visual Basic Editor með því að ýta á Alt+F11.
Hægrismelltu á heiti verkefnis/vinnubókar í verkefnaglugganum.
Veldu Insert→ Module.
Sláðu inn eða límdu kóðann í nýstofnaða einingu.