Знаете, че архивирането на работата ви е важно. Сега можете да накарате макрос на Excel да го направи вместо вас. Този прост макрос записва вашата работна книга в нов файл с днешната дата като част от името.
Как работи макросът
Номерът на този макрос е да съберете новото име на файл като път, днешна дата и оригинално име на файл.
Пътят се улавя чрез използване на свойството Path на обекта ThisWorkbook. Днешната дата се грабва с функцията за дата.
По подразбиране функцията за дата връща mm/dd/yyyy. Наклонените черти биха довели до неуспешно записване на файла, така че форматирате датата с помощта на тирета (Format(Date, “mm-dd-yy”)), тъй като Windows не позволява наклонени черти напред в имената на файлове.
Последната част от новото име на файл е оригиналното име на файла. Вие го улавяте, като използвате свойството Name на обекта ThisWorkbook:
Подмакрос1()
„Стъпка 1: Запазете работната книга с ново име на файл
Тази работна книга.SaveCopyAs _
Име на файл:=Тази работна книга.Път & " & _