Apibrėžkite „Excel“ darbaknygės darbalapių skaičių

Anonim

Kaip apibrėžti „Excel“ lapų skaičių naudojant makrokomandą

Daugelis makrokomandų yra sukurtos automatiškai sukurti darbaknyges. Šiuose aplankuose paprastai taip pat turėtų būti tam tikras darbo lapų skaičius.

Norėdami valdyti norimą lapų skaičių naudodami makrokomandą, naudokite šią komandą:

Apibrėžti lakštų skaičių ()
Application.SheetsInNewWorkbook = 5
Pabaiga Sub

Naudokite skaičių po lygybės ženklo, kad nustatytumėte, kiek darbalapių turėtų būti jūsų darbaknygėje. Ši vertė yra identiška skaičiui, kurį vartotojas gali nustatyti meniu „Įrankiai - Parinktys - Bendra“ lauke „Darbaknygės lapai“, kaip matyti šiame paveikslėlyje:

Žinoma, jūs taip pat galite perskaityti vertę. Tai naudinga, jei norite tik trumpai pakeisti darbalapių skaičių, kad sukurtumėte aplanką, kuriame būtų būtent toks darbalapių skaičius. Ši programa parodo, kaip tai padaryti:

  1. Jis išsaugo šiuo metu iš anksto nustatytą lapų skaičių kintamajame.
  2. Jis nustato vertę į skaičių 7.
  3. Sukuriama nauja darbaknygė (kurioje yra septyni lapai).
  4. Jis iš naujo nustato iš anksto nustatytą lentelių skaičių į anksčiau išsaugotą vertę.

Čia yra šiai užduočiai tinkamas programų sąrašas:

Papildomos lentelės numerisMark ()
Dim skaičius kaip sveikasis skaičius
Skaičius = Application.SheetsInNewWorkbook
Application.SheetsInNewWorkbook = 7
Darbaknygės. Pridėti
Application.SheetsInNewWorkbook = skaičius
Pabaiga Sub