ich habe da ein Problem welchen ja schon sehr häufig in den verschiedensten Foren diskutiert wurde. Leider habe ich noch keinen Lösungsansatz gefunden den ich so gut verstehe dass ich ihn an meine Gegebenheiten anpassen konnte.
Also erst einmal zu den Gegebenheiten.
Wir werten all unsere Produktionsaufträge nach Energieverbräuchen aus. Dazu wird von einem externen Programm der Verbrauch ermittelt und die Ergebnisse werden in eine CSV Datei gespeichert. Diese ist vom Aufbau her immer gleich. Ein Zellbezug ist also möglich.
Folgende Zellen der Datei werden benötigt A1;B5;B9
Der Dateiname ist allerdings immer unterschiedlich. All diese generierten Dateien liegen fest in einer immer gleichbleibenden Ordnerstruktur.
In meinem Fall ist das: N:\FKW\Produktion\Auftragsauswertung Energieverbrauch\Excel Data\
Mit jedem neuen Auftrag den wir erledigt haben kommt also in dieser Struktur eine CSV Datei hinzu.
Nun habe ich vor mit einer Excel Tabelle oben benannte Zellen aus allen CSV Dateien auszulesen um diese mit einander Vergleichen zu können.
In meiner Excel Datei habe ich mir ein Makro eingebaut welches in der ober beschriebenen Ordnerstruktur nach CSV Dateien sucht und mir alle gefundenen Dateinamen untereinander in meine Spalte A ab Zeile 7 einträgt.
Das funktioniert bisher auch super. In Spalte D,E und F zerlege ich die gefundenen Dateinamen und lasse mir nur bestimmte Bereiche des Namens anzeigen. (Um den Dateinamen zu entschlüsseln)
Nun möchte ich in den folgenden drei Spalten (G;H;I) jeweils einen Zellwert der CSV Datei die in Spalte A gelistet ist angezeigt bekommen. (In Spalte G den Wert der Zelle A1, in Spalte H den Wert der Zelle B5 und in Spalte I den Wert der Zellen B9)
Diese sind aber immer unterschiedlich im Namen wie auch in der Anzahl. (Momentan sind es noch 11 Dateien, in einem Monat können es aber auch schon 50 Dateien sein)
Da ich die Dateien natürlich nicht alle von Hand öffnen möchte, fällt die Funktion Indirekt ja schon mal aus. Mit allen VBA Lösungen die ich im Netz bisher gefunden habe bin ich noch nicht weiter gekommen, da ich sie schlichtweg nicht verstehe
Auch den nachfolgenden Vorschlag habe ich bereits versucht umzusetzen, allerdings ist dies nicht geglückt.
http://www.excelformeln.de/tips.html?welcher=107
Ich hoffe es ist trotz des vielen Texts noch zu verstehen welches Problem ich habe, ich bin über jeglichen Tipp und Hilfestellungen dankbar.
Gruß Rico