2017-08-07 8 views
0

Ich verwende ein Makro zum Kopieren und Einfügen. Bis zu diesem Punkt läuft es wie ein Traum. Es sieht nun wie folgt:Einfügen als Wert Fehler 1004

WsComp.Range("A2:A" & LastRow).Copy WsCBlad.Range("B2") 

Allerdings würde ich als Wert einfügen möchten. Ich nahm an dem Code aussehen muss, wie dies zu erreichen folgt:

WsComp.Range("A2:A" & LastRow).Copy WsCBlad.Range("B2").PasteSpecial(xlPasteValues) 

Wenn ich es laufen, es gibt Fehler 1004, Pasteklassenbereich.

Jede Eingabe wird sehr geschätzt!

Antwort

0

kann u den letzten Wert in der nächsten Zeile versuchen, wie

WsComp.Range("A2:A" & LastRow).Copy 
WsCBlad.Range("B2").PasteSpecial(xlPasteValues) 
+0

ich mit Aufspalten der Betrieb in zwei Linien übereinstimmen, wird dies dazu beitragen, die Diagnose-Klausel das Problem ist. –

+0

Splitting hat den Trick gemacht. Ich drückte Enter und die (xlpastevalues) übersprang automatisch ein Leerzeichen nach rechts und das war es. – MyName