Hallo Jojo,

ein Vorschlag wäre, über z.B. den nachfolgenden Code alle geöffneten Dateien außer die Eigene zu schließen.

[b]Dim iBook As Integer
For iBook = Workbooks.Count To 1 Step -1
If Workbooks(iBook).Name <> "Mappe1.xls" Then _
Workbooks(iBook).Close False
Next[/b]

Anstelle des Namens "Mappe1.xls" in der Zeile

[b]If Workbooks(iBook).Name <> "Mappe1.xls" Then _[/b]

muss dort der Name Deiner Datei hin, in der die Daten aktualisiert werden sollen.


MfG,
Oliver
_{Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du}
^{ein Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.}

Hallo Oliver,

danke für Deine Antwort.

Allerdings ist das Schließen der bereits geöffneten Dateien keine Option für mich. Ich dachte eher an einen Befehl, der bspw. den Status der verknüpften Dateien feststellen kann (z.B. "Quelle ist geöffnet") und davon abhängig den UpdateLink durchführt oder nicht (bei geöffneten Dateien werden die Verknüpfungen ja sowieso aktuell gehalten).

Trotzdem danke, Jojo