Import aus geschlossener Datei & dynamischem Pfad
15.12.2014 21:05:45
Toni_R
Ich stehe vor folgendem Problem:
Ausgangslage:
Jeder Mitarbeiter führt ein Excel-File mit seinen täglichen Verkaufszahlen.
Die Zahlen sollen in einem weiteren Excel-File beim Teamleiter zusammengezogen werden (real-time, da die Eingaben des Mitarbeiters fortlaufend gemacht werden).
Ich brauche also eine Lösung, um etliche Bezüge aus geschlossenen Excel-Files zu machen.
Dies wäre soweit noch kein Problem, jedoch müssen die Bezüge (Dateipfad und Dateiname) dynamisch sein.
Somit fällt INDIREKT weg. INDIREKT.EXE (Add-in) ist ebenfalls keine Option, da ich im Geschäft keine Add-ins installieren kann.
Nachdem ich etliche Foren nach Lösungen durchstöbert habe, komme ich zum Schluss, dass wohl eine VBA Lösung der einzige Weg ist. Ich würde die Zahlen der Mitarbeiter ins Teamleiter-File importieren und dort auswerten.
Zum Import hab ich folgendes Makro gefunden:
Sub Makro1()
Range("A1:E2200").FormulaArray = "='[mappe" & Range("F1") _
& ".xls]Tabelle1'!RC:R[2199]C[4]"
Range("A1:E2200") = Range("A1:E2200").Value
End Sub
Nun möchte ich gerne im Feld A1 den Dateipfad und im Feld A2 den Dateinamen haben.
Durch Aktivierung des Makros soll der Import aus dem File gemäss Pfad und Name in A1 und A2 vorgenommen werden und so die Inhalte aus dem Mitarbeiterfile C4:R300 ins Teamleiter-File A4:P300 importiert werden.
Durch wiederholte Aktivierung des Makros würde man dann die Daten aktualisieren.
Könnt ihr mir hierbei helfen?
Hab nun etliche Stunden mit Lösungsfindung und "Try & Error" verbracht. - Leider ohne Erfolg.
Vielen Dank im Voraus für Eure Hilfe!
Grüsse,
Toni