Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
392to396
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
392to396
392to396
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Pruefen ob Datei geoffnet ist

Pruefen ob Datei geoffnet ist
04.03.2004 09:41:44
Alexej
Guten Morgen Forum,
Ich moechte testen, ob eine Datei bereits geoeffnet ist. Diese befindet sich im Netz und wenn diese von mir geoffnet ist, dann soll er halt mit der Arbeit weitermachen und wenn die Datei von einer anderen Person geoffnet ist, dann soll eine Msgbox ausgegeben werden, in dem perfekten Fall mit dem Namen der Person, die die Datei z.Z. geoffnet hat.
Weiss jemand, wie man dies loesen koennte?
Viele Gruesse,
Alexej

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Pruefen ob Datei geoffnet ist
04.03.2004 18:57:15
Dieter Klemke
Hallo Alexej,
vielleicht hilft dir diese Funktion weiter. Habe ich irgendwann mal aus diesem Forum bekommen. In "Datei" gibst du den Netzwerkpfad an z.B. "\\Server03\D\VBA_Test\Mappe.xls":

Function DateiWirdBenutzt(Datei As String) _
As Boolean
' = True: Datei ist bereits von einem
'         anderen Benutzer geöffnet worden
On Error GoTo ErrHandler
Name Datei As Datei
Exit Function
ErrHandler:
Select Case Err.Number
Case 75
DateiWirdBenutzt = True
Case Else
Err.Raise Err.Number
End Select
End Function

Mit dem Benutzernamen kann ich leider nicht dienen.
MfG
Dieter
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige