good afternoon,

i have a macro that i want to adjust just a bit. the portion of the macro
is as follows:

fname = Format(Range("E3").Value, "yyyy-mm-dd") & " " & Range("A1").Value
ActiveWorkbook.SaveAs Filename:="C:\Users\Documents\" & fname & ".xlsx",
FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False

'Sub Email() - sends a copy of the email to the recipients listed in the
Recip Array
Recip = ")

everything works fine, but in the subject line, i would like the time
displayed along with the date. i tried to save the file in the format
yyyy-mm-dd hh:mm but filenames do not allow ":" . next i tried to assigne a
secondary name subj = format (range("E3").value, "yyyy-mm-dd hh:mm") and i
added that just below the recip = array... in the macro, but that does not
show the time either.

any other suggestions?

jat

If you want the time included in the filename, the easy way is to just leave
the colon out of the format:-

fname = Format(Range("E3").Value, "yyyy-mm-dd hhmm")

It will just show as 24hour (military time)


--
Regards,

OssieMac


"jatman" wrote:

good afternoon,

i have a macro that i want to adjust just a bit. the portion of the macro
is as follows:

fname = Format(Range("E3").Value, "yyyy-mm-dd") & " " & Range("A1").Value
ActiveWorkbook.SaveAs Filename:="C:\Users\Documents\" & fname & ".xlsx",
FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False

'Sub Email() - sends a copy of the email to the recipients listed in the
Recip Array
Recip = ")

everything works fine, but in the subject line, i would like the time
displayed along with the date. i tried to save the file in the format
yyyy-mm-dd hh:mm but filenames do not allow ":" . next i tried to assigne a
secondary name subj = format (range("E3").value, "yyyy-mm-dd hh:mm") and i
added that just below the recip = array... in the macro, but that does not
show the time either.

any other suggestions?

jat