Utwórz pusty skoroszyt za pomocą makra i utwórz w nim arkusz, który jako nazwę otrzyma bieżącą datę
Czy chcesz użyć makra do utworzenia skoroszytu zawierającego dokładnie jeden arkusz z bieżącą datą jako nazwą?
Takie makro przydaje się, jeśli np. musisz regularnie wprowadzać pewne dane i chcesz oszczędzić sobie kłopotów z tworzeniem skoroszytu. Do tego zadania użyj następującego makra programu Excel:
Sub CreateActualDateTable ()
Application.DisplayAlerts = False
Z skoroszytami.Dodaj
Podczas gdy .Worksheets.Count> 1
.Arkusze (1) .Usuń
Wend
.Arkusze (1) .Nazwa = Data
Kończyć z
Application.DisplayAlerts = Prawda
Napis końcowy
Po uruchomieniu program Excel tworzy nowy, pusty skoroszyt. Z wyjątkiem jednego arkusza wszystkie arkusze w tym folderze są usuwane. Następnie makro nadaje pozostałemu arkuszowi bieżącą datę jako nazwę.
Poniższy rysunek pokazuje, jak może wyglądać wynik:
Aby wprowadzić makro, naciśnij kombinację klawiszy ALT F11 w programie Excel. To wywołuje edytor VBA. Użyj polecenia WSTAW - MODUŁ, aby wstawić pusty arkusz modułu. Aby uruchomić makro, naciśnij kombinację klawiszy ALT F8 w programie Excel.
