Where is the open code?

--

HTH

RP
(remove nothere from the email address if mailing direct)


"phil" wrote in message
...
I have code written (see below) that makes sure if a workbook (TMR.xls)
is called something else or is not located in the right folder (TMR
folder),
then the user cannot open it. It works fine if the workbook has been
located
in
another folder. But, if it has the wrong name and is in the TMR folder, a
Visual Basic Error message appears saying it can't locate the workbook,
AND
THEN OPENS IT !!!! The visual basic error is preventing the rest of the
code,
which would close the workbook. any suggestions how to get around this?
Your
help will be appreciated.
code=
If ActiveWorkbook.FullName = "C:\TMR\TMR.xls" Then
Sheets("MENU").Select
Else
Sheets("End").Select
Application.ActiveWorkbook.Save
Application.Quit

Please note that simply entering 'On Error Resume Next' in the code is
not making any difference. I need to prevent the Error dialogue kicking
in.

Your help is much needed and appreciated




Expand AllCollapse All
--
phil in da uk