使用VBA在excel中保存文件

Question

I recoreded a macro of me saving a file, but I want the name of the file to be

"OOR" & " " & Date & " " & Time

so the output should be OOR 10.18.2017 07:38 AM

Can someone help me with the code? Greatly apreciate it:

 ChDir "C:\Users\spall1\Desktop\Base Business\Base Business Report\OOR Report"
     ActiveWorkbook.SaveAs Filename:= _
     "C:\Users\spall1\Desktop\Base Business\Base Business Report\OOR Report\OOR & DATE & TIME.xlsx" _
    , FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False

Answer 1

You need to close the constant String part with " before adding the variable of Date and Time .

Change the last part of the string from:

\OOR & DATE & TIME.xlsx"

to:

\OOR" & Date & Time & ".xlsx"

Or , you could use VBA Now , which will give you both Date and Time :

\OOR" & Now & ".xlsx"

Answer 2

:
    ActiveWorkbook.SaveAs _
     Filename:= _
      "C:\Users\spall1\Desktop\Base Business\Base Business Report\OOR Report\OOR " & Format(Now(), "YYYY-MM-DD HHMM") & ".xls" _
     , FileFormat:=xlOpenXMLWorkbook _
     , CreateBackup:=False
: