Userabfrage
09.05.2006 18:36:00
Tino
ich habe eine Excel-Datei, auf diese wird von verschiedenen Rechnern
aus zugegriffen. Ist die Datei bereits auf einem anderen Rechner gestartet,
kommt eine Meldung von wem diese verwendet wird und es wird gefragt ob die Datei Schreibgeschützt geöffnet werden soll.
Nun wird diese Datei von einer Präsentation aus einem Makro gestartet
und dadurch wird diese Meldung nicht mehr angezeigt.
Meine Frage kann ich in diese Excel Datei eine abfrage beim öffnen einbinden
die mir den aktuellen Benutzer der Datei wiedergeben kann.
Bsp. ? soll der User sein der diese Datei verwendet
Private Sub Workbook_Open()
If ActiveWorkbook.ReadOnly Then 'Schreibschutzabfrage?
MsgBox "Datei wird von ? verwendet!", vbCritical, "Schreibgeschützt!"
End If
End Sub
Danke für Eure Hilfe
Gruss
Tino