Dieses Forum nutzt Cookies
Dieses Forum verwendet Cookies, um deine Login-Informationen zu speichern, wenn du registriert bist, und deinen letzten Besuch, wenn du es nicht bist. Cookies sind kleine Textdokumente, die auf deinem Computer gespeichert werden. Die von diesem Forum gesetzten Cookies werden nur auf dieser Website verwendet und stellen kein Sicherheitsrisiko dar. Cookies aus diesem Forum speichern auch die spezifischen Themen, die du gelesen hast und wann du zum letzten Mal gelesen hast. Bitte bestätige, ob du diese Cookies akzeptierst oder ablehnst.

Ein Cookie wird in deinem Browser unabhängig von der Wahl gespeichert, um zu verhindern, dass dir diese Frage erneut gestellt wird. Du kannst deine Cookie-Einstellungen jederzeit über den Link in der Fußzeile ändern.

Dateiumbenennung und Verknüpfungen beibehalten
#1
Hallo zusammen,

konnte für mein Problem leider keinen direkten Eintrag finden, darum eröffne ich einen neuen.

Folgende Situation:

Ich habe eine bestehende Excel Datei aufgeteil in nun 2 Arbeitsblätter und diese beiden miteinander verknüpft. Nun ist es aber unabdingbar, das diese Dateien kopiert werden müssen und auch immer mit einem anderen Namen vershen werden. In meinem Beispielt geht es darum, das diese Datei ( en ) wöchtlich benutz werden zur Planung und somit heißt eine Datei z.B. C:\bla\sounso\soweiter\kw38

Die neue Datei heißt dann C:\bla\sounso\soweiter\kw39

in dieser sind dann aber alle Verknüpfungen der kw 38 enthalten was falsch ist, denn es muss sich auf KW39 umstellen, entsprechend der Neubenennung. Bisher musste ich den Bezug manuell ändern, was aufgrund der Größe schon ne Menge arbeit ist.

Gibt es eine Möglichkeit, die Dateien so zu kopieren, das die Bezüge direkt aktualisiert werden ??

Danke für Hilfe und Beste Wünsche
Antworten Top
#2
Hallo,

anbei mein Muster für diese Aufgabenstellung, die vor einiger Zeit in einem der Foren gezweigt wurde. Vielleicht schaffst du es, das anzupassen.


Code:
Sub linksource()

abc = ThisWorkbook.LinkSources(Type:=xlLinkTypeExcelLinks)
Debug.Print UBound(abc), abc(1)
ThisWorkbook.ChangeLink Name:=abc(1), newname:="c:\temp\WB-Merge2.xlsx", Type:=xlLinkTypeExcelLinks
Debug.Print
End Sub


mfg
Antworten Top
#3
Hallo, ähhhm damit kann ich nun leider null anfangen :(
Antworten Top
#4
Hallo kamamalo

wenn ich dich richtig verstanden habe benötigt deine Datei gar keine externen Verknüpfungen.
Anstatt jede Woche die externen Verknüpfungen zu aktualisieren (obwohl nach der Aktualisierung auf die gleiche Datei zugegriffen wird bleibt es für Excel ein externer Bezug, der bei einer Umbenennung nicht geändert werden darf) solltest du dir einmal die Mühe machen in der aktuellen Version aus allen Formeln mit diesen externen Verknüpfungen die Dateinamen zu entfernen.

Wahrscheinlich sind die externen Bezüge durch Blattweises kopieren in eine neue Datei entstanden.
helmut

Für mich ist die Möglichkeit in Excel an Zellen und Bereichen Namen zu vergeben die wichtigste Funktionalität.
Sie macht Formeln und den VBA-code verständlicher. Für Makros gilt die Regel: "Nur über benannte Bereiche auf den Inhalt der Zellen zugreifen."
Und wofür sind Regeln da? Um nachzudenken bevor man sie bricht.





Antworten Top
#5
Das mit dem löschen der Dateinamen ( dem Pfad ) hatte ich schon gemacht. Das Problem ist, das dies aber nach der Neuöffnung wieder vorhanden ist.

Wenn ich änder steht da als Beispiel dann nur noch !R4 -> speichern

mach ich wieder auf, dann erscheint C:\bla\sounso\sowieso\[blabla.xlsx]!r4 ( das darf so schon mal nicht sein )

auch habe ich nun noch ein weiteres Problem, das diese Datein mit verschiedenen Ecxelversionen geöffnet werden, was mir danach alles zerhaut. Ich weis par tout nicht weiter
Antworten Top
#6
Hallo,
(09.09.2016, 08:27)Kamamalo schrieb: Wenn ich änder steht da als Beispiel dann nur noch !R4 -> speichern
mach ich wieder auf, dann erscheint C:\bla\sounso\sowieso\[blabla.xlsx]!r4 ( das darf so schon mal nicht sein )
wo steht das drin?
Warum lässt Du das Ausrufezeichen stehen?
Nach Änderung müsste ja sowas stehen: =R4

Gruß Uwe
Antworten Top
#7
Hallöchen,

vielleicht könntest Du die Datei mal neu aufsetzen.
Öffne dazu eine neue Datei, kopiere die Daten (nicht die Blätter) und füge über Inhalte Einfügen erst die Formeln ein und dann die Formate. Beim Einfügen der Formeln kommen übrigens auch die Werte mit.

Schaue dann erst mal, ob damit das Problem beseitigt ist. Wenn ja, kannst Du damit weitermachen. Du musst eventuell noch z.B. die Spaltenbreiten anpassen.
.      \\\|///      Hoffe, geholfen zu haben.
       ( ô ô )      Grüße, André aus G in T  
  ooO-(_)-Ooo    (Excel 97-2019+365)
Antworten Top
#8
(09.09.2016, 08:41)Kuwer schrieb: Hallo,
wo steht das drin?
Warum lässt Du das Ausrufezeichen stehen?
Nach Änderung müsste ja sowas stehen: =R4

Gruß Uwe
Ich glaube das doch egal oder ?? nicht relevant ob da =r4 oder !r4 oder gar $R$4 steht hat mit meinem Problem nix zu tun ;)
Antworten Top
#9
Hallo kamamalo,

du hast geschrieben:

Zitat:Ich glaube das doch egal oder ?? nicht relevant ob da =r4 oder !r4 oder gar $R$4 steht hat mit meinem Problem nix zu tun

Ich glaube, das ist nicht egal.

Excel verwaltet die externen Bezüge bestimmt nicht, indem es in jeder Zelle den Namen der Datei schreibt.
Wenn man aber den Dateinamen nur teilweise löscht und das ! stehen läst, weis nur der Programmierer und jetzt auch du was geschieht.
Eine  Neueingabe von "=!R4" wird der Formelinterpreter nicht akzeptieren.
helmut

Für mich ist die Möglichkeit in Excel an Zellen und Bereichen Namen zu vergeben die wichtigste Funktionalität.
Sie macht Formeln und den VBA-code verständlicher. Für Makros gilt die Regel: "Nur über benannte Bereiche auf den Inhalt der Zellen zugreifen."
Und wofür sind Regeln da? Um nachzudenken bevor man sie bricht.





Antworten Top
#10
ja wie nun heißt das ich muss es so aussehen lassen [blabla.xlsx]soundsoR4 ??


Den Namen der Datei, bzw. den Pfad fügt Excel ja selber ein, nach erneutem Öffnem, was ja mist ist. Hat das vllt was mit Schreibschutz zu tun, oder aber vvlt auch damit, das die Zellen für die Formeln nicht gesperrt sind ???
Antworten Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste