Hallo zusammen,
ich verwende momentan folgenden Code um aus verschiedene Exceldateien alle Tabellenblätter in eine Datei zusammenzuführen.
<pre>Sub TabellenblaetterZusammenfuehren()
Dim vntPfadUndDateiNamen As Variant
Dim strPfadUndDatei As String
Dim lngi As Long
...