Prompt for SaveAs Filename

[jonsi]

I have a Macro in a Workbook that uses SaveAs on a dummy .csv file (XYZddmmyyyy.csv) that prompts the User to amend the existing Filename to a relevant one (changing the ddmmyyyy bit). It works fine on an Office 2K box returning the SaveAs box allowing a user specified filename, but on an XP box running Office 2003 it doesn't return the SaveAs box at all - it just overwrites the XYZddmmyyyy.csv file. I don't want Users renaming files within the directory if I can help it.

The relevant bit of the Macro is :
ActiveWorkbook.SaveAs Filename:="X:\Folder\SubFolder\XYZddmmyyyy.csv", FileFormat:=xlCSV,_ CreateBackup=[blue]False[/blue]

What's changed and what do I need to insert here to allow a prompt to input the new Filename that will work on any machine?

hwyl
Jonsi

 

[xlbo]

Hmmm - don't have 2003 and XL XP doesn't have the createbackup option but I would suggest changing that to TRUE and seeing what happens !

Rgds, Geoff

"Three things are certain: Death, taxes and lost data. Guess which has occurred"

Please read FAQ222-2244 before you ask a question