Guten Tag liebe Community,
ich habe in Excel ein Makro aufgezeichnet, was den Wert in einer Spalte bspw. um 10 verringert und in einer Spalte um 10 erhöht.
Diesen Vorgang möchte ich bei jedem Klick auf den Button wiederholen. Bin leider absoluter Neuling in Sachen VBA und finde im Internet nur relativ abstrakte Lösungen.
Untenstehend findet ihr den Code der in VBA angezeigt wird.
Sub PS_Heck()
'
' PS_Heck Makro
'
'
Range("E2").Select
Application.CutCopyMode = False
ActiveCell.FormulaR1C1 = "=+RC[-2]"
Range("E2").Select
Selection.AutoFill Destination:=Range("E2:E41"), Type:=xlFillDefault
Range("E2:E41").Select
Range("D2").Select
Application.CutCopyMode = False
ActiveCell.FormulaR1C1 = "=RC[-1]*15-RC[-1]"
Range("D2").Select
Selection.AutoFill Destination:=Range("D2:D41"), Type:=xlFillDefault
Range("D2:D41").Select
Range("F2:F41").Select
ActiveSheet.Shapes.Range(Array("Button 8")).Select
End Sub
Schonmal vielen Dank für eure Hilfe.
|