Ich verstehe nicht, warum es bei folgenem Code immer zur Fehlermeldung kommt.
Ich würde gerne einfach eine WENN Formel in eine Zelle schreiben lassen:
Auf dem Blatt "Eingabemaske" in O133 ist eine Checkbox mit WAHR und FALSCH verlinkt.
Sprachlich: Wenn Checkbox markiert, mache diese Berechnung, sonst schreib x rein:
Range("S7").Formula = "WENN(Eingabemaske!O133 = "WAHR";((F7*D7)+(F8*D8)+(F9*D9)+(F10*D10)+(F11*D11)+(F12*D12)+(F13*D13))/D15/Eingabemaske!C150;"x")"
|