Can anyone spot the mistake. It gets as far as opening the new copy of the workbook sheets and that's all. Also, it is naming the new copy "2024.xlsx" instead of "Text (Date -1 mm/dd/yyyy)"
![]()
Worksheets(Array("Sheet 1", "Sheet 2")).Copy ActiveWorkbook.SaveAs Filename:="file location removed for safety" & "Text" & Format(Date - 1, "mm/dd/yyyy") & ".xlsx", _ FileFormat:=xlOpenXMLWorkbook, WriteResPassword:="0000", ReadOnlyRecommended:=True ActiveWorkbook.Close
Bookmarks