check for open file

[RuthandAndy]

I have a file path name that I need to open from an excel application only if it is not already open. how do I check if the file is open? I have tried
Application.GetOpenFilename(pathname) but I am really just guessing.

 

[AlphaFrog]

Try something like this...

<font face=Courier New>    <SPAN style="color:#00007F">Dim</SPAN> wb <SPAN style="color:#00007F">As</SPAN> Workbook<br>    <br>    <SPAN style="color:#00007F">On</SPAN> <SPAN style="color:#00007F">Error</SPAN> <SPAN style="color:#00007F">Resume</SPAN> <SPAN style="color:#00007F">Next</SPAN><br>        <SPAN style="color:#00007F">Set</SPAN> wb = Workbooks("FileName.xls")<br>    <SPAN style="color:#00007F">On</SPAN> <SPAN style="color:#00007F">Error</SPAN> <SPAN style="color:#00007F">GoTo</SPAN> 0<br>    <SPAN style="color:#00007F">If</SPAN> wb <SPAN style="color:#00007F">Is</SPAN> <SPAN style="color:#00007F">Nothing</SPAN> <SPAN style="color:#00007F">Then</SPAN><br>        <SPAN style="color:#007F00">' workbook is not already open</SPAN><br>        Workbooks.Open PathName<br>        <SPAN style="color:#00007F">Set</SPAN> wb = ActiveWorkbook<br>    <SPAN style="color:#00007F">End</SPAN> <SPAN style="color:#00007F">If</SPAN></FONT>

 

[RuthandAndy]

AlphaFrog, Thanks for your help. I will give this a try

 

[Ruddles]

Alternatively there's a workbook property called .UserStatus which returns the name of the person who has a workbook open.

http://msdn.microsoft.com/en-us/library/aa215930(v=office.11).aspx

Check the .MultiUserEditing property too.