VBA Disabling 'Saving As' Popup

[mssbass]

How do I disable the popup that says Excel is "SAVING AS" with the bar that shows % complete? Application.DisplayAlerts = False doesn't seem to help.

Application.DisplayAlerts = False
ThisWorkbook.Save
txtdate = Format(Now, "mm") & "." & Format(Now, "dd") & "." & Format(Now, "yy")
ThisWorkbook.SaveAs Filename:="\\abc.com\Shares\Depts\Files\Reporting\Performance\Staffing_Bucket_" & txtdate & ".xlsx", FileFormat:=xlOpenXMLWorkbook

Application.Quit
Application.Quit

End Sub

 

[Yongle]

(untested)
You could try hiding the application when you saveAs

Application.Visible = False

[COLOR=#b22222]code to SAVEAS the workbook here [/COLOR]

Application.Wait Now + TimeValue("00:00:10")

Application.Visible = True