Thema Datum  Von Nutzer Rating
Antwort
Rot Kopieren von einer Blatt auf die andere ohne Blattwechsel
15.07.2015 10:39:39 ZK
NotSolved
15.07.2015 10:41:26 ZK
NotSolved
15.07.2015 10:49:26 ZK
Solved

Ansicht des Beitrags:
Von:
ZK
Datum:
15.07.2015 10:39:39
Views:
1144
Rating: Antwort:
  Ja
Thema:
Kopieren von einer Blatt auf die andere ohne Blattwechsel

Hallo, 

ich habe zwei Arbeitsblätter in einer Arbeitsmappe, seien sie A und B. 

Ich möchte von Arbeitsblatt A in die Arbeitsblatt B einen Zellenbereich kopieren, ohne Blattwächsel. Das Problem ist, dass der Bereich nicht fest ist, der wird vorab ermittelt. Und bei kopieren sollen keine Funktionen kopiert werden, sondern nur die Werte. 

Ich wollte das Problem folgenderweise lösen:

Dim lastRow As Int
Dim lastColumn As Int
 
lastRow = Worksheets("A").UsedRange.SpecialCells(xlCellTypeLastCell).Row
lastColumn = Worksheets("A").UsedRange.SpecialCells(xlCellTypeLastCell).Column
 
Worksheets("A").Range(Cells(34, 30), Cells(lastRow, lastColumn)).Copy
Worksheets("A").Range("A18").PasteSpecial xlPasteValues
 
 
Das funktioniert aber nicht, weil hier man die Arbeitsblätter wächseln muss .
 
Hat jemand eine Idee?
 

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 einer Blatt auf die andere ohne Blattwechsel
15.07.2015 10:39:39 ZK
NotSolved
15.07.2015 10:41:26 ZK
NotSolved
15.07.2015 10:49:26 ZK
Solved