Hallo zusammen,
ich scheitere gerade daran, eine KKLEINSTE()Funktion mit 4 Bedingungen per VBA zu schreiben.
Als Formel sieht es so aus und funzt:
=KKLEINSTE(
WENN(($D$24:$D$967=$D$5)+("*"=$D$5);
WENN(($E$24:$E$967=$E$5)+("*"=$E$5);
WENN(($F$24:$F$967=$F$5)+("*"=$F$5);
WENN(($G$24:$G$967=$G$5)+("*"=$G$5); $C$24:$C$967))));C24)
Zeichne ich die Eingabe per VBA Editor auf, so sieht es so aus:
Range("H24").Select
Selection.FormulaArray = _
"=SMALL(
IF((R24C4:R967C4=R5C4)+(""*""=R5C4)," & Chr(10) & "
IF((R24C5:R967C5=R5C5)+(""*""=R5C5)," & Chr(10) & "
IF((R24C6:R967C6=R5C6)+(""*""=R5C6)," & Chr(10) & "
IF((R24C7:R967C7=R5C7)+(""*""=R5C7),
R24C3:R967C3)))),RC[-5])"
Lass ich den Code dann unverändert laufen, so kommt die Fehlermeldung: "Laufzeitfehler 1004: die FormulaArray-Eigenschaft des Range-Objektes kann nicht festgelegt werden".
Mit drei Bedingungen ist es kein Problem. Da läuft es als direkte Formeleingabe oder in der VBA Version. Aber mit vieren eben nicht! Gibt es hier Beschränkungen oder bin ich beschränkt?
Danke für Eure Hilfe!!
Gruß Georg