Rename "RestoreSheetsCalculation" to "ContinueOpen", otherwise the OnTime event in Workbook_Open has no macro to run.