Clever-Excel-Forum

Normale Version: Tabellenimport mit wechselndem Name
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Guten Abend,

ich versuche den Inhalt eines Blattes von einer schreibgeschüßen Exceltdatei in eine neue Exceldatei zu importieren. Dies funktioniert zwar über externe Daten abrufen, aber das Problem ist, dass sich der Dateiname der Importdatei wöchentlich ändert ( zb. Projektplan_20190427 zu Projektplan_20190430) und sich der Import nicht mehr aktualisieren lässt, da der Pfad nicht mehr gefunden wird bzw. die Datei.

meine Frage wäre, ob man dies so über ein VBA-Makro bewerkstelligen kann, dass die Datei trotz Änderung findet, importiert und dabei den aktuellen Status in die neue Datei überträgt?

Vielen Dank für eure HilfeSmile
Grüße Jonas
Moin

Das lässt sich auch mit PQ bewerkstelligen.
Hi Detlef,

könntest du eventuell vorab einen kleinen Abriss deines Vorschlags darstellen? Ich wollte vor einiger Zeit im Zuge einer aufgetauchten Frage im Forum eine PQ-Lösung ausprobieren, bin aber immer und immer wieder kläglich daran gescheitert, dass der Dateiname sich verändert hatte. Ich gehe daher von einem ähnlichen Problem aus, zumal der TE schreibt:
Zitat:aber das Problem ist, dass sich der Dateiname der Importdatei wöchentlich ändert ( zb. Projektplan_20190427 zu Projektplan_20190430) und sich der Import nicht mehr aktualisieren lässt, da der Pfad nicht mehr gefunden wird bzw. die Datei.
Wenn man über -> aus Datei -> aus Ordner kommt dann hat man zunächst eine Liste der Dateien mit Metadaten.
Die lässt sich dann passend filtern (Name, Endung, Datum).
Hallo Günter,

auch wenn eine VBA-Lösung gesucht wird, erst mal der Hinweis, dass auf der Seite von Deinem Namensvetter gmg-cc zumindest für die manuelle Anpassung eine Verfahrensweise erläutert ist.
Dann ändere die Dateinamein eine Standardname
Dann brauchst du den Linkz zur Standarddatie nicht mehr anzupassen


Code:
Sub M_snb()
   c00=dir("G:\OF\Projektplan_")
   if c00<>"" then  name "G:\OF\" & c00 As "G:\OF\Standardplan.xlsx"
End Sub
Hallo,

es sind viele Varianten denkbar, damit VBA diese Datei öffnen kann:

- die neueste Datei (beginnt mit der aktuellen Jahreszahl)
- falls die selbe Datei umbenannt wird, kann man eine eindeutige "Document.Property" vergeben
- andere Ansätze

mfg