Modalwert eines Arrays
28.10.2005 17:58:55
harry
sitze wieder einmal und komme alleine nicht weiter. ich such verzweifelt den modalwert für ein array:
Sub MODALWERT_Array()
Dim a() As Long
ReDim a(9)
For i = 1 To 9
If i Mod 2 <> 0 Then
a(i) = 1
Else
a(i) = 2
End If
Next i
MsgBox WorksheetFunction.Mode(?)
End Sub
hoffe, es kann mir jemand den knoten in meinem hirn lösen :-)))
danke + liebe grüße,
harry
Anzeige