Tabellenkalkulation

Zufallszahlen

Diskussionsgruppen
Betriebsysteme: Windows 7; WindowsVista; WindowsXP; Linux; BS-Sonstige
Software: Textverarbeitung; Tabellenkalkulation; Datenbanken; Bildbearbeitung; Audio/mp3/Video; Security/Viren; E-Mail/Outlook; Internet Browser; SW-Sonstige
Hardware: Mainboard/CPU/RAM; Grafikkarten; Peripherie; HW Sonstiges
Netzwerk: DSL; W-Lan; Telekommunikation; NW-Sonstiges
Programmierung: Skripte(PHP,ASP,Perl...); Webseiten/HTML
Sonstiges: PC-Sonstiges; Plauderecke

Frage

Hallo und ein frohes neues Jahr, ich habe folgendes Problem: Ich möchte in der Spalte A ca. 150 Zufallszahlen erzeugen die in einem Bereich von 0,25 bis 0,28 liegen. Gut wäre auch noch wenn ich die Anzahl der benötigten Zufallszahlen eintragen könnte. Kann mir jemand helfen??? MfG Scotty

Antwort 1 von Hajo_Zi

Hallo Scotty,

such doch mal auf dieser Seite nach Zufallszahl

http://www.excelformeln.de/uberuns.html

Gruß Hajo

Antwort 2 von Scotty25

Hallo Hajo,

ich habe mich wohl etwas falsch ausgedrückt denn ich möchte die Zahlen über einen Button generieren lassen.

Gruß Scotty

Antwort 3 von Pistenschreck

Hallo Scotty

Versuch mal diesen Code. Er schreibt ab Zeile 2.

Sub ZufZahl()
Range(Cells(2, 1), Cells(Range("A65536").End(xlUp).Row + 1, 1)) = ""
ANZ = InputBox(Prompt:="Geben Sie die Anzahl Zufallszahlen ein!")
If ANZ = "" Then Exit Sub
For i = 2 To ANZ + 1
nochm:
x = Rnd()
If x < 0.25 Or x > 0.28 Then GoTo nochm
Cells(i, 1) = x
Next i
End Sub

Gruss Werner

Antwort 4 von Scotty25

Hallo Werner,

vielen Dank. Ist genau das was ich gebraucht habe!!!

MfG

Axel