Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1680to1684
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

PasteSpecial-Probleme

PasteSpecial-Probleme
21.03.2019 11:39:35
Robert
Hallo, leider werten bei mir Werte korrekt kopiert.
Ich lasse in einem Excelarbeitsblatt einen Gesamtpreis Kalkulieren und möchte das Ergebnis in ein anderes Übertragen. Das Kopieren funktioniert soweit, nur leider überträgt es die Formel wodurch in der Zelle eine Fehlermeldung auftritt.
Sub Kopieren_Gesamt()
Dim wksQ As Worksheet, wksZ_Rechnungen As Worksheet
Dim lngLast As Long
Set wksQ = Sheets("Kalkulation")
Set wksZ_Rechnungen = Sheets("Rechnungen")
lngLast = wksQ.Cells(wksQ.Rows.Count, 1).End(xlUp).Row
wksQ.Range("I12:I" & lngLast).Copy wksZ_Rechnungen.Range("E13").PasteSpecial(xlPasteValues)
End Sub
VG Robert

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: PasteSpecial-Probleme
21.03.2019 12:26:00
Daniel
Hi
PasteSpecial ist eine eigenständige Funktion.
dh du musst das kopieren und einfügen in zwei getrennten Programmschritten ausführen:
Quellbereich.Copy
Zielzelle.PasteSpecial xlpastevalues
das Kopieren und Einfügen in einem Programmschritt funktioniert nur für das vollständige Einfügen aller Aspekte.
Quellbereich.Copy Destination:=Zielbereich
Gruß Daniel

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige