VBA nur werte kopieren keine Formeln
10.10.2024 15:46:52
bustue
ich hoffe es kann mir jemand helfen.
Bestimmte Spalten einer Tabelle sollen an die Stelle bestimmter Spalten einer anderen Tabelle kopiert werden.
folgender Code funktioniert eigentlich, aber es werden Formeln mit kopiert, ich möchte aber nur die Werte haben. Was muß ich änderen.
Sub_UBK_kopieren()
Dim wksQ As Worksheet, wksZ As Worksheet
Dim lngLast As Long
Set wksQ = Sheets("UBK")
Set wksZ = Sheets("PUBK")
lngLast = wksQ.Cells(wksQ.Rows.Count, 1).End(xlUp).Row
wksQ.Range("C3:C" & lngLast).Copy wksZ.Range("A2")
wksQ.Range("BS3:BS" & lngLast).Copy wksZ.Range("B2")
wksQ.Range("L3:L" & lngLast).Copy wksZ.Range("C2")
wksQ.Range("BR3:BR" & lngLast).Copy wksZ.Range("G2")
wksQ.Range("BP3:BP" & lngLast).Copy wksZ.Range("H2")
End SubVielen Dank für Eure Hilfe im Voraus.
Anzeige