Check if file is open and open if closed

Hi,
I have code which will check if the file "C of S.xls" is open. Ideally, if it is open, the sub will exit but if it it closed, the sub will open "C of S.xls".
When the file is already open, everything works fine. However, when the file is closed, I get the "subscript out of range, Run time error 9" debug error at the point in the routine where it looks for the "C of S.xls" file.
How can I avoid this happening?
I have attached the file.
Thanks.

Jockster

Yes indeed - a typo.
Function code still gets stuck when looking for "R of C.xls" when it is not open. When it is open, the Function code doesn't detect this and tries to open "R of C.xls" again. Very frustrating.

This code simply checks to see if a file is open,

Then if uses an IF statement to goto one of either 2 different modules, if a file exists, then you can code it to do A , or if does not , then B

Hope this helps,

Please Login or Register  to view this content.

Thanks elmarko,
Have tried your code but when I changed the file name to check the 'else' part of the function, I get the debug window with "Run-time error '53': File not found". So, even with the 'on error resume next' and 'on error goto 0' in place, the code still halts and displays the debug window.
Is there something in place which is cancelling out the error handling 'override'?