Live-Forum - Die aktuellen Beiträge
Datum
Titel
15.10.2025 13:31:47
WENN Formel mit zwei Bedingungen über 4 Spalten...
15.10.2025 13:24:59
Werte aller 4 Zeilen eintragen
15.10.2025 12:39:33
Summen zusammenzählen in Abhängigkeit einer Jahreszahl
15.10.2025 11:29:24
Algorhitmus, der kleinste Summe von Zahlen berechnet
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1132to1136
1132to1136
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

gleichzeitiger Zugriff auf Datei | Herbers Excel-Forum

Forumthread: gleichzeitiger Zugriff auf Datei

gleichzeitiger Zugriff auf Datei
28.01.2010 21:51:58
Armin

Hallo,
ich habe ein Excel-Programm entwickelt, welches u.a. Daten in ein Textfile schreibt, siehe folgenden Code:
Open iniDatei For Output As 1
Zaehler = 123
Print #1, Zaehler
Close #1

Dieser Code bewirkt, dass der Zähler bei jeder Ausführung um den Wert 1 erhöht wird.
Nun sollen mehrere User mit dem Programm arbeiten. Es besteht sicherlich die theoretische Möglichkeit, dass zur gleichen Zeit die Daten geschrieben werden, also zur gleichen Zeit der Zähler erhöht wird. Jede theoretische Möglichkeit kann aber natürlich auch in der Praxis eintreten. Trifft Excel, bzw. VBA selbst Vorkehrungen, dass dies nicht eintritt oder muss ich irgendetwas programmtechnisch unternehmen.
Kann mir mit hier jemand weiterhelfen?
Vielen DAnk für euere Tipps
Schöne Grüße
Armin

Anzeige

10
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: gleichzeitiger Zugriff auf Datei
28.01.2010 22:01:58
JDommi
Es kann immer nur einen Vollzugriff auf eine Excel-Datei geben.
Bei jedem weiteren Versuch die Datei zu öffnen kommt die Meldung, daß die datei bereits geöffnet ist.
Es erfolgt dann nur noch die Auswahl zwischen "Schreibgeschützt öffnen", "Meldung, wenn Datei frei" bzw. "Abbruch"
AW: gleichzeitiger Zugriff auf Datei
28.01.2010 22:11:16
Armin
Hallo,
nein, mit Print kann sogar in eine geöffnete Datei geschrieben werden. Wenn ich die txt-Datei mit dem Editor öffne, dann per VBA (bei geöffneter Datei) die Zählernummer erhöhe, dann ist die neue Zählernummer vorhanden.
Die Frage ist nun, was bei absolut gleichzeitigem Zugriff per VBA passiert.
Viele Grüße
Armin
Anzeige
AW: gleichzeitiger Zugriff auf Datei
28.01.2010 22:16:43
JDommi
Klar, dann liest du die Datei mit dem Editor aber auch nur ein: Öffne Datei - Lese Datei - Schließe Datei. Der Dateizugriff besteht nicht mehr!
Zweimal die gleiche Exceldatei mit Excel öffnen geht definitiv nicht.
AW: gleichzeitiger Zugriff auf Datei
28.01.2010 22:11:53
JDommi
By the way: Mit "On Error Goto Fehlerroutine" kannst du auch eine Meldung ausgeben und/oder die Mappe/Excel schliessen.
Sub DeineRoutine
On Error Goto Fehlerroutine
Open iniDatei For Output As 1
Zaehler = 123
Print #1, Zaehler
Close #1
Exit Sub
Fehlerroutine:
If Workbooks.Count > 1 Then
ThisWorkbook.Close savechanges:=False
Else
Application.Quit
End If
End Sub

Anzeige
AW: gleichzeitiger Zugriff auf Datei
28.01.2010 22:21:25
MichaV
Hei Armin,
da kümmert sich das Betriebssystem drum. Du musst beim öffnen der Datei einen evtl. Fehler "kein Zugriff auf Datei" abfangen und es ggf. nach einem DoEvents nochmal versuchen.
Gruss- Micha
PS:JDommi, hier gehts um Textdateien.
AW: gleichzeitiger Zugriff auf Datei
28.01.2010 22:33:08
Armin
Hallo Micha,
vielen Dank. Hättest Du dafür ein paar Code-Zeilen parat?
Viele Grüße und vielen Dank
Armin
Anzeige
AW: gleichzeitiger Zugriff auf Datei
28.01.2010 22:51:59
MichaV
Hier mal was ohne Netzwerk. Kann sein das der Errorcode bei "Zugriff verweigert" ein anderer ist, musst Du mal ausprobieren. Hier wird versucht eine bereits offene Datei nochmal zu öffnen, und zwar 10 mal.
Option Explicit
Sub test()
Dim k As Integer
Open "versuch.txt" For Input As #1
On Error GoTo fehler_beim_oeffnen
versuchs_nochmal:
Open "versuch.txt" For Random As #2
Close
Exit Sub
fehler_beim_oeffnen:
If Err.Number = 55 And Not k = 10 Then
k = k + 1
Resume versuchs_nochmal
Else
MsgBox Err.Number & ":" & Err.Description
End If
End Sub
Es ist halt nur ne grundlegende Überlegung. Entweder Du öffnest die Datei als SHARED, dann können mehrere Benutzer darin schreiben, aber halt nur hintereinander (wenn zwei auf die ms gleichzeitig wollen dann muss einer warten bis der andere fertig ist). Da Du nur einen Wert speichern willst macht das denke ich keinen Sinn, also musst Du die Datei so öffnen das nur einer schreiben kann. Und gleich danach wieder zumachen. Wenn nun ein anderer die für wenige ms geöffnete Datei ebenfalls öffnen will dann gibts ne Fehlermeldung. Also muss der andere ne Weile warten und es nochmal probieren.
Gruss- Micha
Anzeige
AW: gleichzeitiger Zugriff auf Datei
28.01.2010 22:56:48
Josef Ehrensberger
Hallo Armin,
wenn du den Modus Shared verwendets, sollte es keine Probleme geben.
Sub txt()
  Dim strFile As String
  Dim ff As Integer
  Dim zaehler As String
  
  strFile = "E:\Temp\zugriff.txt"
  ff = FreeFile
  
  Open strFile For Input Shared As #ff
  Input #ff, zaehler
  Close #ff
  
  zaehler = CStr(Cint(zaehler + 1))
  
  ff = FreeFile
  
  Open strFile For Output Shared As #ff
  Print #ff, zaehler
  Close #ff
  
End Sub


Gruß Sepp
Anzeige
AW: gleichzeitiger Zugriff auf Datei
28.01.2010 22:59:11
MichaV
Hallo Sepp,
denke ich bei dem Einzeiler auch. Aber theoretisch könnten doch zwei Benutzer zur wirklich gleichen Zeit schreiben wollen. Oder nehmen wir mal an es werden 10.000 Zeilen geschrieben. Gibts dann nicht eine Fehlermeldung?
Gruss- Micha
AW: gleichzeitiger Zugriff auf Datei
28.01.2010 23:26:54
Josef Ehrensberger
Hallo Micha,
lässt sich ja schlecht testen, aber es dürfte keine Fehlermeldung kommen.
Gruß Sepp
Anzeige
;

Forumthreads zu verwandten Themen

Gültigkeitsprüfung in Bezug auf andere Zelle
Erwin

Geschätztes Forum!
Ich möchte in Zelle A1 eine Gültigkeitsprüfung einfügen.
Die Gültigkeit soll mir dort Eingaben bis zur Höchstzahl der in A2 vorhandenen Zahl erlauben.
zB. Wenn in A2 die Zahl 5 steht, soll die Eingabe in A1 bis höchstens bis zur Zahl 5 (also 1,2,3,4,5) erlaubt sei...
14.08.2008 14:06:00
Thread-ID: 1001854
5 Beiträge
Laufende Nummer aus anderer Datei ziehen
mtremer

Hallo Excel-Freunde,
nun habe ich schon länger recherchiert, aber gefunden habe ich nichts :-(
Folgendes habe ich vor:
Ich befinde mich in einer Datei (Start.xls). Von dort aus möchte ich eine laufende Nummer aus einer anderen Datei (Sammlung.xls) ziehen. Diese Nummer befindet sich...
17.09.2008 11:55:00
Thread-ID: 1010315
4 Beiträge
Anzeige
Hyperlink soll je nach KW auf andere Datei verw.
Alex

Hallo,
gleich einmal vorweg, ich bin neu im Forum und hoffe, dass ihr mir bei meinem kleinen Hyperlink- Problem helfen könnt.
Folgende Aufgabe sollte gelöst werden.
Ich möchte einen Hyperlink einrichten, der automatisch je nach Kalenderwoche auf das entsprechende Bestellformular ve...
11.10.2008 12:37:00
Thread-ID: 1015732
3 Beiträge
sql-max-abfrage, accesszugriff auf xls-datei
Guenneisen

Hallo liebe Forumler,
ich muss von access auf mehrere xls-dateien zugreifen...funktioniert soweit auch alles, nur bei der SQL-Max-Abfrage scheitert es...
anbei mal der Code...mit der SQL-Abfrage würde natürlich der erste Datensatz im Direktfenster ausgewiesen...
es soll aber in dem...
08.11.2008 23:10:00
Thread-ID: 1023020
3 Beiträge
Zellbezug auf Datei
Domtsgi

Hallo zusammen.
Ich möchte mehrere Zellbezüge auf eine Datei in einem anderen Pfad machen. Der Pfad ändert sich laufend und so sollte ich diese Pad- Variabel (manuell) bestimmen können.
Zelle F2: "Angabe des Pfades" C:/Dateiablage/Adressen
Die Formeln müssten dann etwa so aussehen:<...
20.11.2008 10:01:17
Thread-ID: 1026325
2 Beiträge
Anzeige
Kopf- & Fußzeile auf andere Dateien übertragen?
Jessi

Hallo zusammen,
habe mal wieder eine Frage:
Habe 175 Dateien, die ich mit gleicher Kopf- & Fußzeile versehe muss. Die Dateien sind alle gleich nummeriert:
001.xlsm
002.xlsm
(...)
175.xlsm
Gibt es ggf. eine geschickte Möglichkeit z.B. das erste Tabellenblatt richt...
06.12.2008 18:56:00
Thread-ID: 1030728
9 Beiträge
Schneller Zugriff auf andere Dateien
Marco

Hallo zusammen,
ich möchte in einer Prozedur auf Daten in einem anderen Workbook zugreifen, welches zu diesem Zeitpunkt nicht geöffnet ist. Wie kann ich dies tun ohne das Programm zu langsam zu machen.
Gruß Marco
10.12.2008 10:13:00
Thread-ID: 1031590
5 Beiträge
Anzeige
Gültigkeit Liste mit Bezug auf eine andere Datei
Rafi

Hallo Zusammen,
ich habe ein Problem mit einer Gültigkeitsprüfung auf eine Liste die in einer anderen Datei steht.
Bislang hat das immer funktioniert, wenn ich die Liste der Externen Datei unter Namen definiert und bei der Gültigkeit/Liste mit Quelle="Name" angegeben habe. Geht aber nic...
16.12.2008 11:28:00
Thread-ID: 1033235
4 Beiträge
SVerweis - Zugriff auf ext. Tabellen ->Datei gross
sk

Hallo zusammen,
ich habe eine Preislistendatei die ich anhand von externen Tabellen mit SVerweis aktualisiere.
Ich suche anhand der der hinterlegten Artikelnummer in meiner Datei per SVerweis im jeweiligen
Datenbankextrakt der Artikelstammdaten(12MB) und Artikelpreise(1.5MB) die pas...
26.01.2009 14:43:35
Thread-ID: 1043902
3 Beiträge
Anzeige
Makro, Verweis auf andere xls Dateien
Diego

Guten Morgen an alle,
ich hätte ein kleines oder großes oder kleines Problem, weiss ich leider nicht so genau, da ich mich nicht so gut auskenne in Excel oder VBA =(
Also mal zu meinem Problemchen, ich hoff einfach mal ihr könnt euch unter meiner Beschreibung etwas vorstellen und mir da...
13.02.2009 09:21:00
Thread-ID: 1050345
6 Beiträge
Zugriff auf Tabellenblatt in anderer Datei
Ulrich

Hallo,
ich würde gerne in einer Datei eine Zusammenfassung darstellen, und gebe dazu einen Namen eines Tabellenblattes einer anderen Datei ein, aus der dann eine Zelle übernommen wird. Ziel ist es in der Zusammenfassung z.b. 2012 als Jahr (Name des Tabellenblattes) einzugeben und ich bekomm...
01.03.2009 18:03:43
Thread-ID: 1055274
2 Beiträge
Verweis von Word auf geöffnete Excel-Datei
Word

Hallo Ihr Spezialisten,
ich möchte von Word aus auf eine bereits geöffnete Excel-Datei zugreifen. Das ist wichtig: die Datei ist schon offen! Mein Versuch ein Workbook-Objekt auf die Datei zu setzen ist bisher gescheitert. Daher bitte ich hier um Unterstützung. Ich habe es mit dem folgenden...
04.03.2009 09:41:19
Thread-ID: 1056197
15 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige