Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1952to1956
1952to1956
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Anzeige
Inhaltsverzeichnis

Gleichzeitigen Zugriff auf Datei feststellen

Forumthread: Gleichzeitigen Zugriff auf Datei feststellen

Gleichzeitigen Zugriff auf Datei feststellen
08.11.2023 00:24:34
Bernhard Tautz
Hallo Experten, lässt sich ermitteln, ob mehrere User gleichzeitig auf eine Datei zugreifen ? Die Datei befindet sich im Modus readonly.

Gruss Bernhard
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Gleichzeitigen Zugriff auf Datei feststellen
08.11.2023 00:55:11
Oberschlumpf
Hi Bernhard,

du könntest es so prüfen... 


Sub TestFileOpened()



    If IsFileOpen("c:\Book2.xls") Then 'Pfad + Dateinamen anpassen

            MsgBox "File already in use!"

        Else

            MsgBox "File not in use!"

            Workbooks.Open "c:\Book2.xls" 'Pfad + Dateinamen anpassen

    End If

    

End Sub



Function IsFileOpen(filename As String)



    Dim filenum As Integer, errnum As Integer

    

    On Error Resume Next

    filenum = FreeFile()

    

    Open filename For Input Lock Read As #filenum

    Close filenum

    errnum = Err

    On Error GoTo 0

    

        Select Case errnum

            Case 0

                IsFileOpen = False

            Case 70

                IsFileOpen = True

            Case Else

                Error errnum

        End Select



End Function


Hab ich hier gefunden... https://groups.google.com/g/microsoft.public.de.excel/c/o5iEAwdNijA

Hilfts?

Ciao
Thorsten
Anzeige
AW: Gleichzeitigen Zugriff auf Datei feststellen
08.11.2023 10:10:04
Bernhard Tautz
Hallo Thorsten,

das hilft sehr ! Vielen Dank !

LG Bernhard

Forumthreads zu verwandten Themen

Zugriff auf Daten anderer Arbeitsmappen?
Stefan

Hallo Profis
Habe mal eine Frage an euch.
Kann ich in einer geöffneten Arbeitsmappe auf eine andere Arbeitsmappe zugreifen und mir von dort Daten in meine aktuelle im Moment geöffneten Arbeitsmappe ansehen oder per Formel darauf zugreifen?
Mein Excel geht ständig in "Keine Rückmeldu...
17.12.2020 15:31:03
Thread-ID: 1800296
1 Beitrag
Zellen kopieren aus anderer Arbeitsmappe
ronforum

Hallo zusammen,
ich bin gerade dabei zwei Arbeitsmappen miteinander zu verknüpfen, weil ich gerne Werte aus einer in die andere Arbeitsmappe überspielen würde.
Mit einzelnen Werten klappt das soweit problemlos.
'Zugriff auf geschlossene Mappe Sub Zelle_auslesen() '** Dimensionierung...
21.07.2015 18:31:33
Thread-ID: 1437686
8 Beiträge
Anzeige
Zugriff auf geöffnete Mappe
Frank

Hallo zusammen,
möchte aus einer Arbeitsmappe(1) auf eine geöffnete andere Mappe (2) zugreifen und Werte aus (2) in (1) kopieren/übernehmen. Weiß nur, wie das mit dem Namen der Mappe geht, da diese aber immer einen anderen Namen haben ist das für mich nicht machbar. Gibt es einen Befehl, de...
21.11.2005 17:43:45
Thread-ID: 698998
4 Beiträge
Anzeige
gleichzeitiger Zugriff im Netzwerk
Gerold

Hallo Forum,
ich habe jetzt schon eine Weile gesucht aber noch keine Lösung gefunden.
Ich habe eine Datei die im Netzwerk liegt.
Auf diese Datei können zeitgleich mehrere Personen zugreifen und Daten per
Userform eingeben.
Ich habe versucht über Arbeitsmappe freigeben dieses...
19.08.2005 16:02:31
Thread-ID: 655078
2 Beiträge
sporadisch defekte Datei
Mike

Hallo zusammen,
ich habe ein für mich nicht nachvollziehbares Problem mit meinen Exceldateien.
Ich arbeite mit einer Masterdatei aus der ich über ein Userform weitere Exceldateien aufrufe, diese bearbeite und dann wieder schließe.
Jetzt ist es so, dass es immer wieder mal vorkommt,...
06.11.2019 10:39:48
Thread-ID: 1721534
4 Beiträge
Zwei Prozeduren, nur eine wird ausgeführt
Frank

Hallo zusammen,
ich habe in einer Datei beim Start dieser Datei folgenden Code laufen
Private Sub Workbook_Open() Application.ScreenUpdating = False Application.Run "Daten_aus_manueller_Steuerung_aktualisieren" Application.Run "alles_aktualisieren" Workbooks.Open Filename:="Q:\rz\bank21...
12.08.2015 10:21:56
Thread-ID: 1441815
10 Beiträge
Zwei Prozeduren, nur eine wird ausgeführt
Frank

Hallo zusammen,
ich habe in einer Datei beim Start dieser Datei folgenden Code laufen
Private Sub Workbook_Open() Application.ScreenUpdating = False Application.Run "Daten_aus_manueller_Steuerung_aktualisieren" Application.Run "alles_aktualisieren" Workbooks.Open Filename:="Q:\rz\bank21...
12.08.2015 10:22:13
Thread-ID: 1441816
2 Beiträge
Datenimport aus verschiedenen Ordnern
Florian

Guten Tag,
ich benutze derzeit ein VBA zum importieren mehrerer Dateien aus einem Ordner, welches auch sehr gut funktioniert.
Nun benötige ich aber ein VBA, mit dem ich Dateien aus unterschiedlichen Ordnern importieren kann.
In jedem Ordner sind drei Dateien, die immer den selben Na...
22.08.2019 15:48:42
Thread-ID: 1709057
2 Beiträge
Anzeige
Verknüpfungen von Eigensch. Zugr. auf andere Datei
Basti

Hi,habe folgenden Code:Sub copy()Dim Letzte_Zeile
Letzte_Zeile = Range("w65536").End(xlUp).Row
Letzte_Zeile_kopiertabelle = Range("A2").End(xlDown).RowSheets("Statistik").Range("A9:W" & Letzte_Zeile).Select
Selection.copy
Sheets("Kopiertabelle").Range("" & Letzte_Zeile_kopiertabelle...
05.03.2003 17:01:38
Thread-ID: 227806
3 Beiträge
Anbinden einer Symbolleiste
gio

Hallo Gemeinde,
ich entnehme im Forum
Anbinden einer Symbolleiste an eine Arbeitsmappe
Wenn Sie möchten, dass Ihre neue Symbolleiste auch anderen Anwendern auf anderen Rechnern zur Verfügung steht, können Sie diese an eine Arbeitsmappe anbinden. Mit der Arbeitsmappe wird auch die Sym...
30.03.2005 16:02:08
Thread-ID: 592086
4 Beiträge
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
Zeichen ausblenden
14.05.2026 09:50:42
Makro für MacOs
13.05.2026 19:14:18
Gleichheitszeichen
13.05.2026 14:24:56
VBA Projekt Passwort automatisch eingeben
13.05.2026 08:49:41
Reale Berechnung ohne Nachkommawerte
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum