Ich hab da ein Problem ich muss Zufallszahlen generieren. Das ist nicht das Problem die formel bekomme ich hin. Es gibt nur ein Problem ich muss Zahlen zwischen 1-20 generieren ohne die 14 geht das? wenn ja wie?
bye thomas
Function Zufall() As Integer
Dim z As Integer
z = Int((Rnd() * 19)) + 1
If z = 14 Then z = 20
Zufall = z
End Function
=WENN(GANZZAHL(ZUFALLSZAHL()*19)+1=14;20;GANZZAHL(ZUFALLSZAHL()*19)+1)
Aber im Sonst-Zweig wird ja wieder neu generiert und dann erfolgt wiederum keine Prüfung.in A1:=GANZZAHL(ZUFALLSZAHL()*19)+1 (als Hilfszelle)
in B1:=WENN(A1=14;20;A1)
Gruß MatthiasDie erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen