Vytvořte sešit aplikace Excel a pomocí makra pojmenujte list podle aktuálního data

Vytvořte prázdný sešit pomocí makra a vytvořte v něm pracovní list, kterému je jako název přiřazeno aktuální datum

Chtěli byste použít makro k vytvoření sešitu, který obsahuje přesně jeden list s aktuálním datem jako názvem?

Takové makro je užitečné, pokud například musíte pravidelně zadávat určitá data a chcete si ušetřit potíže s vytvářením sešitu. K tomuto úkolu použijte následující makro aplikace Excel:

Sub CreateActualDateTable ()
Application.DisplayAlerts = False
Se sešity. Přidat
Zatímco .Worksheets.Count> 1
.Pracovní listy (1). Smazat
Zamířit
.Pracovní listy (1) .Název = Datum
Konec s
Application.DisplayAlerts = True
End Sub

Po spuštění aplikace Excel vytvoří nový prázdný sešit. Kromě jednoho listu jsou odstraněny všechny listy v této složce. Makro poté pojmenuje zbývající list aktuálním datem.

Následující obrázek ukazuje, jak může výsledek vypadat:

Makro zadáte stisknutím kombinace kláves ALT F11 v Excelu. Tím se vyvolá editor VBA. Pomocí příkazu VLOŽIT - MODUL vložte prázdný list modulu. Makro spustíte stisknutím kombinace kláves ALT F8 v Excelu.