function saveWithDate(myWorkbook as Workbook) Dim dateStr as String dateStr = Date$ myWorkbook.SaveAs FileName:=dateStr & ".xls" end function
Looking for relevant Microsoft Windows Whitepapers? Visit the SearchWinIT.com Research Library.