'kay, so i'm a dummy.
have a workbook Template that i've added the following code to:

Private Sub Workbook_Open()
ans = InputBox("Name the new workbook")
ActiveWorkbook.SaveAs Filename:="C:\Documents and Settings
\FredFarnswithers\Desktop\" & ans & ".xls"
End Sub

works fine, however once saved, then reopened, the input box apears,
etc.
How do i get rid of the code, once the template is saved as a newly
named workbook?

Any help GRATEFULLY received!!
Hugh