question about opening an excel-file

[StefanH74]

Hello,

not quite sure if this is an excel-setting or something on our network.
I have an excel-file, and I only want that to be able to be opened if it is not already in use by someone else.
normally when you would try to open a file that somebody else is already using, you would get the option to open it read-only, but I want that disabled (in some way).
so that if you try to open this file, and somebody else is already working in it, it would display a message stating that the file is already in use, and that you cannot open it until the other person closes it.
Hope you understand what I mean, and that somebody can help me with this

Thanx

 

[revcanon]

Place this in your "ThisWorkbook" object

Private Sub Workbook_Open()

If ActiveWorkbook.ReadOnly Then 
Msgbox "Workbook is in use. Please try again later.", vbokonly
ActiveWorkbook.Close False
End If


End Sub