VBA: Werte beibehalten-Formel kopieren
09.07.2016 11:09:18
jam
ich benötige eure Hilfe. Mit dem u.g.Code werden Formeln in die nächste frei Spalte kopiert. Klappt super. Wie kann man den Code noch so erweitern, dass in der "alten" Spalte nur die Werte beibehalten werden. Im Prinzip möchte ich, dass die Formel immer nur in die nächste,frein Spalte geschriebenen werden und in der Spalte vorher dann nur die Werte ohne Formel stehen. Ist das umsetzbar?
Sub Kopieren()
Dim lngLetzteSpalte As Long
lngLetzteSpalte = Sheets("Übersicht").Cells(4, Columns.Count).End(xlToLeft).Column
Sheets("Übersicht").Range("BG4:BG16").Copy Destination:=Sheets("Übersicht").Cells(4, _
lngLetzteSpalte + 1)
End Sub
Ich würde mich über Lösungsvorschläge freuen.
Danke und Gruß
Anzeige