Ako vložiť tabuľky na nasledujúcich x dní
Potrebujete tabuľky s menami, ktoré majú dátum? Je to užitočné napríklad vtedy, ak zaznamenávate údaje za deň a pre každý záznam použijete samostatný pracovný list.
Ak si chcete ušetriť starosti s vytváraním pracovných listov sami a pridávaním požadovaných hodnôt dátumu, môže vám pomôcť makro. Nasledujúce makro definuje niekoľko pracovných hárkov, ktoré nasledujú po aktuálnom dátume na základe aktuálneho dátumu:
Sub FuegeTabellenEin ()
Dim číslo ako celé číslo
Dim i As Integer
Number = InputBox („Koľko hárkov vložiť?“)
Pre i = 1 To číslo
Worksheets.Add after: = Worksheets (Worksheets.Count)
Pracovné listy (Worksheets.Count). Názov = Dátum + i
Ďalej i
Koniec pod
Po spustení makra vám Excel zobrazí vstupné okno. V tomto okne môžete zadať počet pracovných hárkov, ktoré chcete vytvoriť. Nasledujúci obrázok ukazuje, ako toto okno vyzerá:
Tu zadajte požadovaný počet pracovných hárkov. Počnúc aktuálnym dátumom, Excel potom vytvorí požadovaný počet tabuliek a poskytne im aktuálny dátum, dátum nasledujúceho dňa a podobne. Nasledujúci obrázok ukazuje, ako môže výsledok vyzerať:
Tip: Ak by ste chceli vedieť, ako zadávať a spúšťať makrá v Exceli, nájdete tu stručný popis: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie -makros- in-excel-ein.html
