Save file with date as nae file

[Truiz]

Good day,

I'm trying to save a file with today's date in the format MM.DD.YYYY

How would I go about that?

 

[Joe4]

Something like:

 ActiveWorkbook.SaveAs Filename:="C:\Users\Joe4\" & Format(Date,"mm.dd.yyyy") & ".xlsx"

Change the file path and file extension to match your needs.

 

[Truiz]

Yeah thats what I was looking for, how do I prompt to change the file name in case the file name already exist?

 

[Joe4]

Build the full file name and path in a variable, and then you can check to see if it exists like this: https://wellsr.com/vba/2017/excel/vba-dir-function-to-check-if-file-exists/

If it exists, you can use an InputBox to prompt the user for a different name.

 

[wornhall]

Another suggestion: save the file in YYYY.mm.dd.mm.ss and you will not be having collisions. Also, the name can be sorted or listed in chronological order within a main-name.