Zufallszahlen
08.12.2005 20:41:54
Udo
ich habe ein Excel Tabellenblatt gebastelt, in welchem Zufallszahlen von 1 bis 36 untergebracht sind. Ich habe 60 Spalten a 8000 Reihen , also 480.000 Zufallszahlen. Hiervon sollen 900 zufällig ausgewählt werden, aber nur Zahlen von 1 bis 9. Habe bereits ein Makro , daß mir 8000 zufällig auswählt, aber nicht von 1 bis 9. Dieses sieht so aus:
Sub Zufallskopie2()
Dim ii&
Randomize
For ii = 1 To 8000
Cells(ii, 64) = Cells(Int(8000 * Rnd + 1), Int(60 * Rnd + 1))
Next ii
End Sub
Wie muss der Code aussehen, wenn ich nur Zahlen von 1 - 9 haben möchte?
Noch zu bemerken, daß die 480.000 keine generierten Zahlen sind, sondern physikalisch erzeugt.
Vielen Dank
Udo
Anzeige