Saving spreadsheets from a macro

Hi all!
I am new to this forum, I like to work things out for myself but this problem has been driving me nuts!
I have a macro which files a copy of the spreadsheet containing the macro to a folder and file specified within the worksheet then the worksheet closes.
What I would like to do is save the file as a copy and close without closing the original.
The code below is what I am working with:

Sub saveas()
 
Dim filelabel As Variant
 filelabel = Range("d62").Value

Dim folder As Variant
folder = Range("d63").Value
 
ChDir folder
 
ThisWorkbook.saveas Filename:=filelabel
 
ThisWorkbook.Close
 
End Sub

I am sure this will be an easy one for someone

Hello warpspeed,

Use SaveCopyAs instead of SaveAs.

Sub saveas()
 
Dim filelabel As Variant
 filelabel = Range("d62").Value

Dim folder As Variant
folder = Range("d63").Value
 
ChDir folder
 
ThisWorkbook.SaveCopyAs Filename:=filelabel
 
ThisWorkbook.Close
 
End Sub