Z makrom VBA ustvarite nov delovni zvezek, ki vsebuje točno toliko delovnih listov, kot jih potrebujete
V mnogih makrih je treba ustvariti nove delovne zvezke, ki so na primer napolnjeni z določeno vsebino. Pomembna naloga tukaj je ustvariti nov Excelov delovni zvezek, ki vsebuje točno toliko preglednic, kot jih želite.
Naslednji makro opravlja to delo. Ustvari nov delovni zvezek, ki vsebuje 31 delovnih listov. Ti delovni listi so oštevilčeni od 1 do 31. Tu so ustrezni ukazi VBA:
Sub FuegeTabellenEin ()
Zatemni številko kot celo število
Dim i kot celo število
Dim Mappe kot delovni zvezek
Number = Application.SheetsInNewWorkbook
Application.SheetsInNewWorkbook = 31
Nastavi mapo = Delovni zvezki.Dodaj
Za i = 1 Za Mappe.Worksheets.Count
Mapa. Delovni listi (i). Ime = i
Naprej i
Application.SheetsInNewWorkbook = številka
End Sub
Ko se zažene, Excel prikaže nov delovni zvezek, ki vsebuje 31 delovnih listov. Naslednja slika prikazuje, kako to izgleda v registru listov:
V makru določite želeno število delovnih listov s številko 31. To številko spremenite, če želite imeti v delovnem zvezku manj ali več delovnih listov.
Če želite vnesti makro, pritisnite ALT F11 v Excelu, da odprete urejevalnik VBA. Z ukazom INSERT - MODULE vstavite prazen list modula. Za zagon makra neposredno iz Excela uporabite kombinacijo tipk ALT F8.
