Here is the code to close without savingActiveWorkbook.Close Falseand,To save newly open excel sheet with nameActiveWorkbook.SaveAs Filename:="Your Desired Name"