Makro, um nur Werte zu kopieren/einfügen

PastEx - Geändert am 4. Januar 2019 um 14:34
 karinsamira - 24. April 2012 um 18:24
Hallo,

Ich möchte Werte per Makro von Tabelle 1 zu Tabelle 2 kopieren/einfügen:

Hier mein Versuch :Worksheets("Data").Range("J9:J400").Copy Worksheets("DB List").Range("J7")
Leider bekomme ich bei einigen Zellen statt Werte Formeln.

Habe versucht dies zu verbessern, leider wurde es nicht von Excel angenommen.

Worksheets("Data"). Range("J9:J400").Copy Worksheets("DB List").Range("J7").End(xlUp)(2).PasteSpecial Paste:=xlPasteValues

Kann jemand mir meinen Fehler zeigen und evtl. den richtigen Code geben?

Danke

2 Antworten

Hallo,

Hilft dir das hier weiter:


Sub xxx()
With Sheets(1)
Set Source = .Range("A1:A9")
ligs = Source.Rows.Count
Sheets(2).Range("A1").Resize(ligs, 1) = Source.Value
End With
End Sub


Gruß
3