Hi, using Excel 2000.

I want to ensure that a file with the code isn't saved in error or during
testing. The code below saves the active workbook which works the majority
of times but has on occasion, saved the file with the code. I have set up a
line of code to capture the active file name when the code is run but can't
get the code that saves the file to display a message if the file bring
saved is the one with the code and then closes the file without saving.

Thanks in advance of any help. Rob

' this line sets iFname to the active file name
iFname = Application.ActiveWorkbook.Name

'save the active file
Set Wb = ActiveWorkbook
Application.DisplayAlerts = False
Wb.Save
Application.DisplayAlerts = True