Office: Mehrere Excel Dateien zu einer zusammenführen

Hallo drambeldier,aloys78 und werte Forenmitglieder,

Die Zieldatei befindet sich nicht dírekt im selben Ordner wie die Quelldateien.
Ich öffne die Zieldatei mit dem Makro und starte es, allerdings öffnet sich dann die erste Quelldatei, schließt sich, dann öffnet sich die zweite Quelldatei und diese bleibt geöffnet stehen.

Zieldatei: "C:\Users\Admin\Documents\ZielDatei_V1.2.xlsm"
Quelldateien: "C:\Users\Admin\Documents\Bautagesberichte\"

Genau so geh ich vor*rolleyes.gif*

Gruß
RookieVBA123

P.S.: Anbei eine neue Version, allerdings wurden nur die übernommenen Werte aus den Quellzellen optimiert.

 

Hallo Rookie,

Sorry, das kann ich nicht nachvollziehen; bei mir laufen die beiden Quelldateien durch.

Das Ergebnis siehst Du in der angehängten Datei. Ich habe dieses Ergebnis allerdings nicht auf Richtigkeit überprüft; die Gründe dafür habe ich Dir schon in einem früheren Beitrag mitgeteilt
Im Code habe ich zum Testen eine kleine Änderung vorgenommen, die für Dich aber nicht relevant ist.

Frage: Befinden sich im Quellordner noch andere Dateien ?

Gruß
Aloys

 

Hallo,

ich hab nun Folgendes festgestellt. Ich nutze hier Windows Excel 2007, wo es nicht funktioniert, aber an einem Rechner mit Windows Excel 2010 ist es gelaufen.

Dabei habe ich beachtet, die Quellpfade anzupassen. Daran scheitert es demnach nicht.
Daher hier die Frage, liegt es an Einstellungen in Excel 2007 bzw an Windows 7, die ich verändern muss?

Gruß
RookieVBA123

P.S.: If(Quelle.Cells(21, 37).Value = "Anzahl Beteiligte")
Hier vergleiche ich einen Wert in der Zelle(String) mit dem String "Anzahl Beteiligte". Muss ich für den Vergleich von Strings in VBA wie in Java eine spezielle Methode verwenden, damit verglichen wird, ob der String in der Zelle(21,37) == "Anzahl Beteiligte" ist?

 

Hallo Rookie,

ich kann nicht alle Anweisungen in Deinem Code nachvollziehen, aber diese ist mE für das Verhalten nicht verantwortlich.

Aber tausche doch mal die Anweisung
Code:

aus gegen
Code:

Gruß
Aloys

 

Hallo aloys78,

ich werde deinen Vorschlag nachher testen.
Grundlegend ist aber mein Problem, dass bei euch und an einem anderen PC das Programm grundsätzlich läuft und in die Zieldatei etwas schreibt. In meiner Zieldatei steht anschließend nichts und es ist derselbe Code. Bei mir in Excel 2007 und unter Win 7 öffnet sich der erste und zweite Bericht(Quelldateien) und bleibt dort dann geöffnet stehen, wenn ich von der Zieldatei mit Makro das VBA Programm ausführe. Das muss doch grundsätzlich an Excel liegen, wenns auf einem anderen PC mit z.B. Excel 2010 läuft, unabhängig von der nun inhaltlichen Richtigkeit

Gruß
RookieVBA123