Verknüpfte Dateien automatisch öffnen
Roland Jud
Ich habe ein Excel-Sheet welches über Verknüpfung sich aus 12 Dateien
die Daten zusammensucht. Wie kann ich beim öffnen dieser Datei
1. Verhindern, dass die Abfrage nach der Aktualisierung der
Verknüpfungen erscheint, ohne dass dabei automatisch die Verknüpfungen
aktualisiert werden.
2. Nach dem öffnen automatisch sämtliche verknüpften Dateien öffnen,
ohne dass dort eine Abfrage nach Aktualisierung der Verknüpfungen in
diesen Dateien durchgeführt wird.
Vielen Dank für eure Hilfe.
Roland
Bernd Held
dazu kann ich Dir folgendes Makro anbieten.
In der Entwicklungsumgebung den Eintrag DieseArbeitsmappe doppelt
anklicken und das Ereignis erfassen:
Private Sub Workbook_Open()
Dim Links
Dim i%
Links = ActiveWorkbook.LinkSources(xlExcelLinks)
If Not IsEmpty(Links) Then
For i = 1 To UBound(Links)
Workbooks.Open Links(i), 0
Next i
Else
End If
End Sub
Viele Grüße
Bernd
--------------------------------------------------------------------------
Die MacHero EXCEL/WORKS Homepage
http://members.aol.com/Machero
Das Excel-VBA-Kompendium - Die ersten 8 Leserstimmen zum Buch unter:
http://www.amazon.de/exec/obidos/ASIN/3827258154/qid%3D962263787/sr%3D1-7/028-1377235-0531764
----------------------------------------------------------------------------------------
Roland Jud schrieb:
Roland Jud
Vielen Dank für deine Hilfe. Das funktioniert bei mir in den meisten Fällen, aber bei einigen
Dateien ist der Pfad zu lange, sodass er die Datei nicht findet. Was kann ich dagegen tun?
Gruss
Roland
Bernd Held schrieb:
Bernd Held
ich kann das Problem bei mir leider nicht nachstellen. Wie lange darf denn bei Dir so ca. ein
Dateinamen inkl. Pfad sein?
Viele Grüße
Bernd
Roland Jud schrieb:
Roland Jud
Also mein Pfad kann schon mal mher als 70 Zeichen haben, wie nachstehendes Beispiel
zeigt:
C:\WINDOWS\Profiles\rj\Desktop\Aktenkoffer\1999Monthly\199912\GEXCH99.xls
Gibt es da überhaupt eine Lösung?
Gruss
Roland