I have code written (see below) that makes sure if a workbook (TMR.xls)
is called something else or isnot located in the right folder (TMR folder),
then it will not open. 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

Your help is much needed and appreciated


--
phil in da uk

are you trying to open the workbook programmatically or is it a user chosen
opening? it sounds like you are trying programmatically. If that is the case
you could always make sure Excel chooses the correct workbook. If not try
on error resume next
statement


"phil" wrote:

I have code written (see below) that makes sure if a workbook (TMR.xls)
is called something else or isnot located in the right folder (TMR folder),
then it will not open. 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

Your help is much needed and appreciated


--
phil in da uk

I am trying to control how the workbook is opened programatically
but I'm not sure how the 'on error resume next' is supposed to work
...where would I insert this in the code below? Thanks.

"ben" wrote:

are you trying to open the workbook programmatically or is it a user chosen
opening? it sounds like you are trying programmatically. If that is the case
you could always make sure Excel chooses the correct workbook. If not try
on error resume next
statement


"phil" wrote:

I have code written (see below) that makes sure if a workbook (TMR.xls)
is called something else or isnot located in the right folder (TMR folder),
then it will not open. 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

Your help is much needed and appreciated


--
phil in da uk

anywhere would be acceptable
but if you are trying to open it programmatically, why would the workbook be
the wrong name or in the wrong directory as you can control exactly what is
opened?


"phil" wrote:

I am trying to control how the workbook is opened programatically
but I'm not sure how the 'on error resume next' is supposed to work
..where would I insert this in the code below? Thanks.

"ben" wrote:

are you trying to open the workbook programmatically or is it a user chosen
opening? it sounds like you are trying programmatically. If that is the case
you could always make sure Excel chooses the correct workbook. If not try
on error resume next
statement


"phil" wrote:

I have code written (see below) that makes sure if a workbook (TMR.xls)
is called something else or isnot located in the right folder (TMR folder),
then it will not open. 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

Your help is much needed and appreciated


--
phil in da uk

sorry ben, its users opening the workbook, -I meant, I'm trying to use code
to determine how it is opened.

"ben" wrote:

anywhere would be acceptable
but if you are trying to open it programmatically, why would the workbook be
the wrong name or in the wrong directory as you can control exactly what is
opened?


"phil" wrote:

I am trying to control how the workbook is opened programatically
but I'm not sure how the 'on error resume next' is supposed to work
..where would I insert this in the code below? Thanks.

"ben" wrote:

are you trying to open the workbook programmatically or is it a user chosen
opening? it sounds like you are trying programmatically. If that is the case
you could always make sure Excel chooses the correct workbook. If not try
on error resume next
statement


"phil" wrote:

I have code written (see below) that makes sure if a workbook (TMR.xls)
is called something else or isnot located in the right folder (TMR folder),
then it will not open. 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

Your help is much needed and appreciated


--
phil in da uk

The suggestion to enter 'On Error Resume Next' is not making any difference
Error 1004 pops up, saying it can't find TMR and then it opens the workbook
for full use.


"phil" wrote:

sorry ben, its users opening the workbook, -I meant, I'm trying to use code
to determine how it is opened.

"ben" wrote:

anywhere would be acceptable
but if you are trying to open it programmatically, why would the workbook be
the wrong name or in the wrong directory as you can control exactly what is
opened?


"phil" wrote:

I am trying to control how the workbook is opened programatically
but I'm not sure how the 'on error resume next' is supposed to work
..where would I insert this in the code below? Thanks.

"ben" wrote:

are you trying to open the workbook programmatically or is it a user chosen
opening? it sounds like you are trying programmatically. If that is the case
you could always make sure Excel chooses the correct workbook. If not try
on error resume next
statement


"phil" wrote:

I have code written (see below) that makes sure if a workbook (TMR.xls)
is called something else or isnot located in the right folder (TMR folder),
then it will not open. 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

Your help is much needed and appreciated


--
phil in da uk