Excel si soubory zamyká, mělo by stačit se nejprve pokusit otevřít soubor pro zápis a když dostanete výjimku, tak má právě v Excelu někdo soubor otevřený.
Public Function IsFileLocked(fileName As String)
Try
Using fs As New FileStream(fileName, FileMode.Open, FileAccess.ReadWrite)
Return False
End Using
Catch ex As IOException
Return True
End Try
End Function
|