Automatische Verknüpfungen
19.03.2008 23:48:00
Schallbach
Hab noch ein Problem! Ich Habe ein Macro mit dem ich die Verknüpfung zu einer Tabelle überprüfe.
Sub Verknüpfung()
ChDir "O:\QM Admin\QM Abrechnungen\Abrechnung"
ActiveWorkbook.ChangeLink Name:= _
"M:\QM Admin\QM Abrechnungen\Abrechnung\Bestand.xls", NewName _
:="O:\QM Admin\QM Abrechnungen\Abrechnung\Bestand.xls", Type _
:=xlExcelLinks
End Sub
Das funktioniert nur wenn alles so stimmt wie in dem Macro. Wenn aber z. B. bei der Prüfung nicht Laufwerk M steht sondern X dann gibts einen Fehler. Ich müsste vorher die Verknüpfung auslesen und dann die Werte übernehmen und dann ändern.
Ist das möglich? Kann mir jemand von Euch helfen!
Gruss
Schallbach