Thema Datum  Von Nutzer Rating
Antwort
17.09.2015 07:34:53 Jens
NotSolved
17.09.2015 17:20:29 Bythom
NotSolved
Rot Bereich Kopieren und in eine andere Mappe einfügen
 18.09.2015 08:26:18 Gast58044
NotSolved

Ansicht des Beitrags:
Von:
Gast58044		 Datum:
18.09.2015 08:26:18		 Views:
1191		 Rating:
     
Antwort:
  Ja
Thema:
Bereich Kopieren und in eine andere Mappe einfügen		 
Hallo zusammen, 

mein Code sieht bis jetzt so aus:  


  ChDir "Z:\Testumgebung\Hauptmontage"
    Workbooks.Open Filename:= _
        "Z:\Testumgebung\Hauptmontage\" & Range("J2") & ".xlsm"
    
    Range("A1:H138").Select
    
    Selection.Copy
    Windows("Test import.xlsm").Activate
    Sheets("Tabelle2").Select
    Range("A10").Select
        
    ActiveSheet.Paste
    Application.CutCopyMode = False
    
    
    Workbooks("3001700.xlsm").Close SaveChanges:=False          <<<<<<<<<<<<<<<Problem<<<


Funktioniert soweit auch gut ABER wie ihr sehen könnt, muss ich im letzten Schritt das "Workbook schließen". Dieses mache ich momentan
indem ich den Namen der Datei direkt angebe. Das möchte ich aber nicht. Der Grund dafür ist, dass der Name sich ständig ändert. 
Ich möchte das der Name aus der Spalte (J2) entnommen wird. Also mit anderen Worten..Die datei die zu Anfang geöffnet wird, soll am Ende
auch wieder geschlossen werden.

Ich hoffe das Beantwortet die Frage im Großen und ganzen. 

Schön wäre es wenn die Formatierung der kopierten Datei 100%ig beibehalten wird.

Dann gibt es ja auch die Möglichkeit das Fenster, aus dem Kopiert wird, gar nicht erst geöffnet wird (Application.ScreenUpdating=False).
Mit dieser Funktion werden dann
die Bilder nicht kopiert.. Warum bzw was kann man dagegen unternehmen?

Grüße 
Jens

 

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
17.09.2015 07:34:53 Jens
NotSolved
17.09.2015 17:20:29 Bythom
NotSolved
Rot Bereich Kopieren und in eine andere Mappe einfügen
 18.09.2015 08:26:18 Gast58044
NotSolved