Monster-Bug bei Zufallszahlen?!?
09.09.2007 19:41:44
{Boris}
ich habe gerade mal wieder mit Zufallszahlen rumgespielt und dabei 10 Zufallszahlen in A1:A10 zwischen 18 und 65 erzeugt. Dabei wollte ich überprüfen, wie oft irgendein Doppler vorkommt.
In Zelle C7 steht dafür die Arrayformel:
{=SUMME(1/ZÄHLENWENN(A1:A10;A1:A10)) Jetzt hab ich folgenden Minicode gestartet:
Sub test2()
Dim x, y
For x = 1 To 20000
Calculate
If [c7] Then y = y + 1
Next x
MsgBox Format(y / 20000, "0.00%")
End Sub
Am Ende traute ich meinen Augen nicht, als ich auf die Zelle A4 blickte, denn dort steht eine 2?!?!?!?
Iteration ist nicht aktiv, die Berechnung steht auch auf automatisch, das Zellformat ist Standard.
Hab´s jetzt noch nicht versucht, zu reproduzieren. Was geht hier vor? (das ist mit Sicherheit keine Scherzfrage!)
Grüße Boris