Das grosse Archiv mit 638
VBA-freien Formellösungen und Tips
 
   
 
 ÜBER UNS   NEWS   FORMELN   TIPPS   KONTAKT   FORUM   LINKS 
   
 
Sonstige (7) ->

Auf Zellwert mehrerer geschlossener Dateien zugreifen
 
 
Aufgabe
Du hast einen Ordner mit vielen Dateien, die alle den gleichen Aufbau haben. Nun willst Du aus jeder Datei den Wert einer immer gleichen Zelle abfragen ohne alle Dateien öffnen zu müssen.
In A1 steht die Pfadangabe (mit abschließendem Backslash), in A2 bis A100 die Dateinamen.

       A               B       
1 C:\Ordner-RG-2005\   
2 Rechnungen-Jan-05.xls  ='C:\Ordner-RG-2005\[Rechnungen-Jan-05.xls]Tabelle'!$A$1  
3 Rechnungen-Feb-05.xls  ='C:\Ordner-RG-2005\[Rechnungen-Feb-05.xls]Tabelle'!$A$1  
4 Rechnungen-Mrz-05.xls  ='C:\Ordner-RG-2005\[Rechnungen-Mrz-05.xls]Tabelle'!$A$1  
5 Rechnungen-Apr-05.xls  ='C:\Ordner-RG-2005\[Rechnungen-Apr-05.xls]Tabelle'!$A$1  
6 Rechnungen-Mai-05.xls  ='C:\Ordner-RG-2005\[Rechnungen-Mai-05.xls]Tabelle'!$A$1  
7 Rechnungen-Jun-05.xls  ='C:\Ordner-RG-2005\[Rechnungen-Jun-05.xls]Tabelle'!$A$1 

Lösung
Schreibe in B2 =" ='"&A$1&"["&A2&"]"&"Tabelle'!$A$1"
und kopiere die Formel nach unten.
Dann die Formeln von B2:B100 durch Werte ersetzen, mit
Bearbeiten>Kopieren; Bearbeiten>Inhalte Einfügen...Werte
Nun Selektiere B2:B100 und wähle
Bearbeiten>Ersetzen
Suchen nach:" ="(Leerzeichen & Gleichheitszeichen)
Ersetzen durch:"="(Nur Gleichheitszeichen)
(Nun werden die Zellen berechnet, wenn nichts schief läuft.)

Dann nochmal die Formeln durch Werte ersetzen und fertig.

Erläuterung
Lässt sich kombinieren mit dem Beitrag:
Dateien eines Verzeichnisses auflisten
 
    zurück


 
powered by telltarget