suche dringend ein Makro, der bei Betätigung einer Schaltfläche eine Formel berechnen soll.
Hier die Formel:
=wenn(b1-a1 > 20;c1*d1;c1*d2)
Danke für eure Hilfe.
Petra
Sub test1()
Range("W1").Select'Zellen nach eigenen Bedürfnissen angeben
ActiveCell.FormulaR1C1 = _
"=IF(RC[-21]-RC[-22] > 20,RC[-20]*RC[-19],RC[-20]*R[1]C[-19])"
Range("W2").Select
End Sub