Save only the Activesheet as a new file

Hi All

Please could someone help me out with my question?

I have some code that allows me to save the a workbook as a new file in a specific location. Which works great. But what I'd like it to do, is only save the activesheet as a new file, and not the whole workbook.

Is this at all possible?

below is the code i use:

 Dim SaveName As String
       SaveName = Sheets("Lookup").Range("C35").Text
       ActiveWorkbook.SaveAs Filename:="S:\Services\·Section-Wide Data\MASTER DATA\MyFile\" & _
           SaveName & ".xlsm"

As always, your help is greatly appreciated!