Office: Freigabe eines Workbooks prüfen

Hallo zusammen!
Ich habe ein Workbook erstellt auf den bis zu 10 Mitarbeiter gleichzeitig zugreifen können. Jeder Mitarbeiter hat in dem Workbook ein eigenes Sheet, so dass eigentlich nicht viel schiefgehen kann, was das Überschreiben von Daten angeht... Die Eingabe der Daten erfolgt über VBA und entsprechenden Userforms. Soweit, so gut.

Nun existiert noch ein Sheet, welches per Mausklick alle 10 Tabellen zusammenfasst und auf doppelte Einträge überprüft. Eventuelle doppelte Einträge eines Users auf seinem Sheet, werden bereits bei Eingabe geprüft. Die Prüfung selbst ist nicht das Problem, sondern die Zusammenfassung. Diese sollte aus "Sicherheitsgründen" nur erfolgen, wenn kein anderer User gerade an der Tabelle arbeitet...
Wie kann ich das abfragen? Hat da jemand eine Idee??

Schöne Grüße
Costi

:)

 

Hallo! Code:

Diesen Code habe ich etwas abgewandelt, steht aber auch so ähnlich in der Mircosoft Hilfe.
Dir werden hier alle Anwender aufgelistet, die momentan das Workbook geöffnet haben. Wenn nun UBound(Users, 1) = 1 dann bist du allein in der Datei!

Grüße
rastrans

 

Hi rastrans!
Ich hatte zwar vorher im Forum nach einer Lösung gesucht, aber nicht an die naheliegende Hilfe gedacht..... Wald und Bäume, oder so ähnlich....

Habe Deinen Code zu einer Function leicht "umgebaut". Und funktioniert bestens!

Vielen Dank für die Hilfe!
Apropos Hilfe...Ich gelobe Besserung...

Schöne Grüße
Costi