Supportnet Computer
Planet of Tech

Supportnet / Forum / Tabellenkalkulation

Laufzeitfehler 1004 bei Methode 'UpdateLink'





Frage

Hallo, per Button-Klick aktualisiere ich die Inhalte von verknüpften Excel-sheets. Sobald eine der Dateien geöffnet ist, erscheint die Fehlermeldung "Laufzeitfehler '1004': Die Methode 'UpdateLink' für das Objekt '_Workbook' ist fehlgeschlagen" Die entsprechende Code-Zeile heißt: ActiveWorkbook.UpdateLink Name:=ActiveWorkbook.LinkSources Hat hier jemand eine Lösung? Vielen Dank schon mal, Jojo

Antwort 1 von coros

Hallo Jojo,

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

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


Anstelle des Namens "Mappe1.xls" in der Zeile

If Workbooks(iBook).Name <> "Mappe1.xls" Then _


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.

Antwort 2 von jojo5

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

Ich möchte kostenlos eine Frage an die Mitglieder stellen:


Ähnliche Themen:


Suche in allen vorhandenen Beiträgen: