Excel-Makro öffnet Datei schreibgeschützt ohne Mitteilung

Hallo,

ich habe folgendes Problem:
Es soll über ein Excel-Makro eine weitere Excel-Datei geöffnet, Daten eingetragen und wieder gespeichert werden.
Ist diese Datei jedoch schon von einem anderen User geöffnet, wird ohne Mitteilung die Datei schreibgeschützt geöffnet. Beim Speichern taucht ebenfalls keine Fehlermeldung auf und die Daten werden nur scheinbar gespeichert sind jedoch später in der Datei nicht vorhanden.
Hier die Frage: Was kann man tun, damit in der Ausführung des Makros angezeigt wird, das die Datei bereits geöffnet ist und schreibgeschützt geöffnet wird?

Vielen Dank für Eure Unterstützung

Gruß
VoFri

Hi,

nach dem Befehl für das Öffnen der 2. Datei gibst Du folgende Befehlszeilen ein

If ActiveWorkbook.ReadOnly Then
MsgBox An der Datei-Kopie wird z. Zt. gearbeitet., 16
ActiveWorkbook.Close savechanges:=false
exit sub
end if

Gruß
PiPi

Vielen Dank 

Das Problem ist somit gelöst.