funktioniert als excel Formel ..wie aber als Makro
16.11.2003 17:51:38
Martin H.
Range("A8").Select
ActiveCell.FormulaR1C1 = _
"=+IF(AND(RC[9]=R[-1]C[9],RC[10]=R[-1]C[10]),R[-1]C+1,""1"")"
Range("A8").Select
Sheets("Werte-M+D").Select
Selection.AutoFill Destination:=Range("A8:A258"), Type:=xlFillDefault
Dabei entspricht:
"=+IF(AND(RC[9]=R[-1]C[9],RC[10]=R[-1]C[10]),R[-1]C+1,""1"")"
der Formel: =+WENN(UND(J8=J7;K8=K7);A7+1;"1")
Kann mir jemand die Syntax für =+WENN(AX8=0;"-"; schreiben?
Unten stehende Formel funktioniert. Nur ich brauche sie im Macro.
=+WENN(AX8=0;"-";WENN(UND(J8=J7;K8=K7);A7+1;"1"))
Danke
Anzeige