Copy the active sheet as a new workbook and then save it.
Like this:

Sub SaveActiveSheet()
ActiveSheet.Copy
ActiveWorkbook.SaveAs Filename:=Range("c3").Value
End Sub

-----Original Message-----
Hi,
do you know a Sub () that can saves my active sheet with
the name of C3 Value.
Thanks in advance
Pit
.