Stop user from closing workbook until conditions apply

[Jacob Hilderbrand]

Would that be...

[VBA]
ThisWorkbook.SaveAs MyPath
[/VBA]

You need to specify the name of the file as well.

[VBA]
Dim Desktop As Object
Dim MyPath As String
Dim MyName As String

Set Desktop = CreateObject("WScript.Shell")
MyPath = Desktop.SpecialFolders("Desktop")
MyName = "DailyInputs" & Format(Date, "ddmmyy") & ".xls"

ThisWorkbook.SaveAs (MyPath & "\" & MyName)

[/VBA]