How can I stop the prompt for saving an existing file when copying data from excel sheet?

[vbaNumpty]

I have the following code:

Sub addwb()

    Application.ScreenUpdating = False

    Dim wbNew As Workbook

    Sheet1.Copy
    
    Set wbNew = ActiveWorkbook
    
    wbNew.SaveAs "C:\Users\Owner\Documents\Automation\TestWB.xlsx", 51
    
    wbNew.Close True


End Sub

but I am prompted if I want to overwrite the existing file. How can I make it force the save and not ask the user for a confirmation?

 

[vbaNumpty]

Application.DisplayAlerts = False

 

[smozgur]

Application.DisplayAlerts = False

One addition to this beautiful but dangerous method of the Application object: Always enable it after you are done using it in your code. It might cause unwanted results otherwise since it will disable all other alerts.

Application.DisplayAlerts = False
' Do what you need
Application.DisplayAlerts = True

 

[vbaNumpty]

One addition to this beautiful but dangerous method of the Application object: Always enable it after you are done using it in your code. It might cause unwanted results otherwise since it will disable all other alerts.

Application.DisplayAlerts = False
' Do what you need
Application.DisplayAlerts = True

If I have the Application.DisplayAlerts = False on a close workbook event, does it not default back to true when opening the file?

 

[smozgur]

If I have the Application.DisplayAlerts = False on a close workbook event, does it not default back to true when opening the file?

It works only when the macro is working, and Excel sets it as True as soon as the macro is finished. The danger I mentioned was about forgetting it in the False state might suppress other alerts that you might need to see until the macro is finished.