Thema Datum  Von Nutzer Rating
Antwort
Rot Datei öffnen bestimmte Zellen kopieren
12.12.2017 15:23:23 Arthek
NotSolved

Ansicht des Beitrags:
Von:
Arthek
Datum:
12.12.2017 15:23:23
Views:
323
Rating: Antwort:
  Ja
Thema:
Datei öffnen bestimmte Zellen kopieren

Hallo Zusammen, 

 

ich versuche schon länger folgendes Problem mit einem Makro zu lösen. 

 

Ich möchte eine Datei öffnen, aus dieser Datei mehrere Sheets kopieren und in eine neue Datei als Values einfügen. Ich habe hier mal ein Makro aufgenomme wie es ungefähr aussehen könnte, da ist nur das problem, dass die Datei variable sein soll und das bekomme ich über makro aufnahme ja nicht hin.

 

    Windows("Datei name").Activate
    Sheets("Kalk-Cl5").Select
    Cells.Select
    Selection.copy
    Windows("EH 5.1.xlsm").Activate
    Sheets("Cl 5").Select
    Range("A1").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Windows("Datei name").Activate
    Sheets("Kalk-Cl8").Select
    Cells.Select
    Selection.copy
    Windows("EH 5.1.xlsm").Activate
    Sheets("Cl 8").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Windows("Datei name").Activate
    Sheets("Kalk-Cl10").Select
    Cells.Select
    Selection.copy
    Windows("EH 5.1.xlsm").Activate
    Sheets("Cl 10").Select
    Range("A1").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False

 

kann mir da jemand weiter helfen ? 

 

Schon mal vielen dank.

 

Gruß Arthek


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst genau und ausführlich
  • 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
  • Bitte markieren Sie Ihre Anfrage als erledigt wenn Ihnen geholfen wurde
Thema: Name: Email:

 
 

Thema Datum  Von Nutzer Rating
Antwort
Rot Datei öffnen bestimmte Zellen kopieren
12.12.2017 15:23:23 Arthek
NotSolved