Добрый день.
Подскажите, пожалуйста, как в данный макрос дописать путь для сохранения фала?:
У меня задача пересохранять периодически файл xlsm в xlsx с датой c исходным именем в ту же папку, где лежит исходник xlsm.
Подскажите, пожалуйста, как в данный макрос дописать путь для сохранения фала?:
Код |
---|
Application.DisplayAlerts = False If ActiveWorkbook.FileFormat <> 51 Then sfn = sfn & "Телефонный справочник " & Format(Date, "DD.MM.YYYY") & ".xlsx" ActiveWorkbook.SaveAs sp & sfn, 51 End If |
У меня задача пересохранять периодически файл xlsm в xlsx с датой c исходным именем в ту же папку, где лежит исходник xlsm.
Изменено: vikttur - 26.08.2021 16:40:44