I have the below code which works great but is there a way to overwrite the files if they already exist
Dim ws As Worksheet, newWb As Workbook
Application.ScreenUpdating = False
For Each ws In Sheets(Array("Bethan", "Hannah"))
Set newWb = ActiveWorkbook...