Save as Visual Script Help

  • Thread starter Thread starter Jeremy
  • Start date Start date
J

Jeremy

I am using the following code to script a save as and am needing help how to
add time to the end. This would mean that the time on the computer would be
placed after published.

Current Code
NFN = Left(ActiveWorkbook.Name, Len(ActiveWorkbook.Name) - 4) &
"Published"
FULL = ActiveWorkbook.Path & "\" & NFN & ".XLS"
ActiveWorkbook.SaveAs FULL


Thank you
 
I do know that the : will be a problem with the formating of a file name so
something like - or just putting the numbers together would be fine
 
Back
Top