issues with coding problem

I am trying to save this file but I'm having problems with "my Name" This information is in a workbook that is already opened called "Recaps" and the sheetname is "Data" and the value I am looking for is in "$C$5". I open another workbook called "Spare" and want to rename and save it to the code below.

How can I correct this error?

Dim myPath$, myName$ 
Application.DisplayAlerts = False 
myPath = "C:\Service Recaps\John Mudaro\" 
myName = Sheets("Data").Range("C5").Value 
ActiveWorkbook.SaveAs myPath & myName 
Application.DisplayAlerts = True

this did not work, any other suggestions?

Thanks in advance

Hi,

Does the following help ...

ActiveWorkbook.SaveAs Filename:=myPath & myName & ".xls"

HTH
Carim