Макрос вместо F12 [Файл - Сохранить как]

Автоматическое сохранение копии файла при открытии

Максимально сокращаем время на ручную работу. Даже в мелочах. Все использованные команды изучаются на курсе Excel-XL: Макросы VBA Excel с нуля (24 ак.ч.)

Экономим время по-взрослому, даже на мелочах! 

При открытии файла он сам предложит сохранить копию и сам добавит в конце названия текущую дату и время.

Вы можете легко исправить название на своё собственное, а также подкорректировать формат даты и времени (или вообще убрать время).

Инструкция в картинках - см. пост у меня в Instagram: НАЖМИТЕ ЗДЕСЬ

По уровню сложности такой макрос легко пишется после моего курса «Макросы на VBA с нуля».

Private Sub Workbook_Open()
  tt = "Отчёт " 'имя файла без даты
  NN = Application.InputBox("Постоянная часть имени:", "Сделать копию файла?", tt)
  If NN = False Then Exit Sub
 'формат даты и времени
  dt = Application.WorksheetFunction.Text(Now, "YYMMDD hhmmss")
 'сохранение копии файла в ту же папку
  ThisWorkbook.SaveAs ThisWorkbook.Path & "\" & NN & dt & ".xlsm"
End Sub