FindFile

Finds if a workbook is open or not in same Excel session

Function FindFile(FileName) As Boolean
 Dim Fo As Boolean
 FindFile = False
 For i = Workbooks.Count To 1 Step -1
  If UCase(Workbooks(i).Name) = UCase(FileName) Then
   FindFile = True
   Exit Function
  End If
 Next i
End Function

Parameters

FileName

Views 161 Downloads 64

Perm link