Saving an Excel Sheet

I am making use of Excel's automation and I use the Excel worksheet method of SaveAs. If the path and name of the file already exists I get the option to either overwrite the existing file, not overwrite, ot cancel. What I need is a way to have the option that if there is an existing file, then be able to input a new name, is there a Excel method that does that?

since you use automation (probably from VB), you can use VB to check for the existence of the file as in

Dim strfile as string
strfile = "c:\x.xls"
If Dir(strfile) <> "" then
x.Visible = true
x.WindowState = xlNormal
strfile = x.GetSaveAsFilename(strfile)
End If
x.ActiveWorkbook.SaveAs FileName:=strfile, ConflictResolution:=xlUserResolution