ich öffne eine xl-Datei mit folgendem Makro
Sub Datei_oeffnen()
blnOffen = False
For Each wkb In Workbooks
If wkb.Name = "Datei.xlsx" Then
blnOffen = True
Exit For
End If
Next wkb
If blnOffen = False Then Workbooks.Open Filename:="K:\Datei.xlsx"
End Sub
Falls ein Kollege die Datei geöffnet hat, wird diese bei mir schreibgeschützt geöffnet.
Die Meldung "Dokument wird verwendet" wird nicht angezeigt.
Woran liegt das ? Kann ich die Meldung im Code erzwingen ?
Wenn ich die Datei aus dem Explorer mit Doppelklick öffne, erscheint die Meldung.
Danke und Gruß
Mars