Tako ustvarite delovne zvezke, kot želite
Bi radi zagotovili, da v tabeli ustvarite celo vrsto praznih delovnih listov in jih vse preimenujete po svojih željah?
Če to storite ročno, traja veliko časa. Ročno preimenovanje tabel je še posebej dolgotrajno.
Z makrom je lažje. Imena tabel vnesite v območje tabele. Naslednja slika prikazuje, kako lahko to izgleda:
Nato za ustvarjanje tabel pokličite naslednji makro:
Sub FuegeBlaetterMithNamenEin ()
Zatemnjeno območje kot niz
Dim Cell As Range
Zatemni tabelo kot delovni list
Območje = "a1: a24"
Z ActiveWorkbook
Za vsako celico v celicah ActiveSheet.Range
Nastavi tabelo = .Sheets.Add (After: =. Sheets (Sheets.Count))
Table.Name = Cell.Text
Naslednja celica
Končaj s
End Sub
Daj s spremenljivko območje določa, iz katerega področja vaše tabele so vzeta imena delovnih listov.
Naslednja slika prikazuje delovni zvezek, v katerem so bila ustvarjena imena tabel za meseca 2010 in 2011:
Nasvet: Če želite vedeti, kako vnesti in zagnati makre v Excelu, boste tukaj našli kratek opis: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie -makros- in-excel-ein.html
