If you ever wondered how to determine, if an opened workbook was saved before below you'll find a code snippet that might do the job for you.
'@Author - Alexander Bolte '@ChangeDate - 2014-05-30 '@Description - Returns true, if a workbooks path property 'is unequal an empty string. 'This is true only if the workbook has been saved. '@Param wrk - an initialized Excel Workbook object. Function fails, if Nothing is handed. '@Returns true, if a given workbook has been saved. Else False.PublicFunctionwasWorkbookEverSaved(ByRefwrkAsWorkbook)AsBooleanDimretAsBooleanret=wrk.path<>""wasWorkbookEverSaved=retEndFunction