Я хочу сохранить текущий файл xlsm как xlsx, поэтому я написал код, как показано ниже. Этот код действительно сделал свою работу, и я смог увидеть файл, сохраненный как Myfile.xlsx, как то, что я определил в коде, однако есть некоторые небольшие проблемы, когда vba всегда сохраняет файл в другой файл как bookx.xlsx рядом с Myfile.xlsx. Как я могу избежать этого?

Sub saveAsXlsx()
Dim myPath As String
myPath = Application.ActiveWorkbook.Path
Worksheets(Array("sheet1", "sheet2")).Copy
ActiveWorkbook.SaveCopyAs Filename:=myPath & "\Myfile.xlsx" 
End Sub