Detect if file is open

[Chad]

Is there a method to detect if a file is already in use by someone, before I
open it?

Chad

 

[Bob Kilmer]

Any particular kind of file?

 

[Chad]

Let's start with just Excel spreadsheets for now.

chad

 

[Seth]

Just use this function:

Function IsWorkbookOpen(WorkbookName as String) As Boolean
Dim Wkb as Workbook
on error resume next
Set Wkb = Workbooks(WorkbookName)
If Not Wkb Is Nothing Then IsWorkbookOpen = True
End Function


Just have to pass the workbook name to the function...if
it is open, it will return TRUE, if it is closed, FALSE

Seth

 

[Dave Peterson]

http://support.microsoft.com/default.aspx?scid=kb;EN-US;q138621
XL: Macro Code to Check Whether a File Is Already Open