How to test : files are already opened or not

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

How to test, wheather a particular excel file is already opened or not.
Please help me
 
This function does the job:

Public Function IsOpenWB(ByVal WBname As String) As Boolean
'returns true if workbook is open
Dim objWorkbook As Object
On Error Resume Next
IsOpenWB = False
Set objWorkbook = Workbooks(WBname)
If Err = 0 Then IsOpenWB = True
End Function

Regards,
Stefi


„kris†ezt írta:
 
Back
Top