Thema Datum  Von Nutzer Rating
Antwort
Rot Kopieren von Spalten aus mehreren Dateien in eine Datei
 22.02.2018 12:30:41 BarisT
NotSolved
22.02.2018 13:18:34 Gast56905
NotSolved

Ansicht des Beitrags:
Von:
BarisT		 Datum:
22.02.2018 12:30:41		 Views:
1296		 Rating:
     
Antwort:
  Ja
Thema:
Kopieren von Spalten aus mehreren Dateien in eine Datei
Hallo! Ich habe folgende Problematik die ich mittels eines Makros lösen möchte: In einem Ordner Namens Statusmatrix befindet sich meine Zieldatei (eben die Statusmatrix) und auch noch ein Ordner "Statuslisten" der wiederum gleichnamige Excel-Dateien enthält. Nun soll das Makro aus jeder dieser Dateien zwei bis drei Spalten eines Sheets 1zu1 in die Zieldatei kopieren. Bis hier hin komme ich auch mit dem Code ganz gut zurecht, jedoch gibt es eben mehrere Dateien, d.h. wenn der erste Bereich in bspw. Spalten E-F kopiert wurde, soll das Makro die Daten aus der nächsten Datei eben in G-H kopieren usw. Was ich bereits habe ist: Sub ErgebnisseKopieren() Dim pfad As String datei As String blatt As String bereich As Range pfad = "...\Statuslists+Matrix\Statuslists" datei = Dir(CStr(sPfad & "*.xl*")) blatt = "Status Telematic Functions" Set bereich = Range("E1:E1029,H1:H1029") Do While datei <> "" Set oSourceBook = Workbooks.Open(pfad & datei, False, True) Worksheet("Status Telematic Functions").Range("bereich").Copy Destination:=oTargetSheet("Statusmatrix Functions").Range("bereich") oSourceBook.Close False sDatei = Dir() 'Ab hier weiß ich eben auch nicht weiter. bereich = bereich + 1 Loop Set oTargetSheet = Nothing Set oSourceBook = Nothing End Sub Vielen Dank im Voraus.

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Kopieren von Spalten aus mehreren Dateien in eine Datei
 22.02.2018 12:30:41 BarisT
NotSolved
22.02.2018 13:18:34 Gast56905
NotSolved