Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Kopieren und wieder einfügen

Forumthread: Kopieren und wieder einfügen

Kopieren und wieder einfügen
22.04.2003 19:16:55
Christian
Hi

mein Ansinnen scheint wahrscheinlich etwas ungewöhnlich, aber es soll nun mal so ausgeführt werden. Also zum Ansinnen:
Ich möchte, einen Spaltenbereich z.B.
Range("X6:Y100") Kopieren.
in diesem Spaltenbereich stehen lauter Summenformeln
Anschließent möchte ich in den selben Bereich nur die entsprechenden Werte wieder einfügen.
Mein Code:

Range(Cells(7, EnSp) & ":" & Cells(LZ - 15, EnSp + 1)).Select
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False

EnSp=Vorher gesuchte Spalten Nummer
LZ=Vorher ermittelte letzte Belegte Zeile

Leider steigt die Anwendung ber der Range-Anweisung aus.

Kann mir jemand Helfen???



Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Kopieren und wieder einfügen
22.04.2003 20:11:46
Florian Meyer

Hallo, Christian,

probiere einmal folgendes:

bereich=Cells(7, EnSp) & ":" & Cells(LZ - 15, EnSp + 1)
Range(bereich).Select

Gruß,

Florian.


Re: Kopieren und wieder einfügen
22.04.2003 20:15:43
Christian

Hab den Fehler gefunden. Was son Abendbrot alles Bewirkt.

Es lag am blöden Komma zw. Cells

Range(Cells(7, EnSp), Cells(LZ - 15, EnSp + 1)).Select
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False

So funtkioniert es.

Ciao Christian

Anzeige
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige