Edit macro - copy sheet to another workbook

Hi

Currently the macro below will, copy the active sheet from a workbook to a new workbook and will then open a 'save as' window to save the new workbook.

I would like to edit the macro so that rather than copying the active sheet to a new workbook, the sheet is instead copied and added to the workbook C:\Users\RobMarr\Google Drive\Supplier Meetings status.xlsm

Reminders
It is important the active sheet is copied and not removed from the original workbook. This will be a repeat process so I will be adding copysheets to the supplier meetings status on a daily basis.

If someone could edit the code for me that would be great.

Sub Macro()

ActiveSheet.Copy
Res = Application.GetSaveAsFilename(fileFilter:="Excel Files (*.xlsx), *.xlsx")
If Res <> 0 Then ActiveWorkbook.SaveAs Res
End Sub

Thanks
Mike