ThisWorkbook.SaveAs FileName:=Sheets("Details").Range("K2")

there should be a space between SaveAs and FileName

--
Regards,
Tom Ogilvy

"Stephen Pepper" wrote in message
om...
I am publishing an Excel form on a webpage that is set-up to return to
an email address and would like the workbook to Save As the
information in a particular cell.

I have tried variations of the following with no luck. Can anyone
help please.

ThisWorkbook.SaveAsFileName:=Sheets("Details").Ran ge("K2")