Supportnet / Forum / Tabellenkalkulation
Zufallsgenerator in Excel etwas anders...
Frage
Hallo Excel-Beherrscher!
Ich muss gestehen, dass ich keine Ahnung von Excel habe. Ich habe mir dennoch ein kleines Mini"Programm" zusammengestrickt. Soweit so gut.
Jetzt brauche ich folgendes:
Ich möchte eine Zahl auslesen, die die Anzahl von 6-seitigen Würfeln angibt, deren Ergebnisse dann jeweils einzeln zufallsgeneriert werden sollen.
Ist vermutlich nicht schwierig, aber als VollNoob kriege ich das leider nicht hin und der andere Beitrag zum Thema Zufallsgenerator unter Excel hilft mir leider auch nicht weiter.
Ich hoffe, ihr helft mir.
Schon mal vielen Dank im Voraus!
Schomby
Antwort 1 von Schomby
Hmmm...keiner...?
Antwort 2 von nighty
hi schomby :)
versuch es mal besser zu erklaeren,ich kann mich noch nicht reinversetzen ,am besten schrittweise.
gruss nighty
versuch es mal besser zu erklaeren,ich kann mich noch nicht reinversetzen ,am besten schrittweise.
gruss nighty
Antwort 3 von schomby
Klar, gerne.
Ich habe mir eine kleine "Eingabemaske" zusammengeschustert, die verschiedene Werte berrechnet (Verfügbarkeitswahrscheinlichkeiten usw.). Das ganze ist für ein Rollenspiel (Shadowrun um genauer zu sein) und es geht darum, ob ein sog. Schieber heiße Ware besorgen kann. Das hängt von verschiedenen Faktoren ab (Hausregel). Letztendlich spuckt mir dieses Mini"programm" die Anzahl an Würfeln aus, mit denen dann der Spielleiter anschließend per Hand würfeln müsste, um zu sehen, ob der Schieber es auch wirklich schafft, den gewünschten Gegenstand zu besorgen. Dabei ist eine 5 und 6 auf einem 6-seitigen Würfel ein "Erfolg", der Rest nicht. Die Erfolge werden aufaddiert und müssen festgelegte Schwellenwerte übertreffen (je schwieriger die Beschaffung, desto höher die Anzahl benötigter Erfolge).
Genau den letzten Schritt (manuelles Würfeln) möchte ich durch einen "Zufallsgenerator ersetzen. Es soll also die Zahl der Würfel, die meine Ausgabemaske schon auswirft, "ausgelesen" werden, um dann anschließend als Ausgabe die Gesamtzahl der Erfolge zu erhalten...
Bsp:
Meine Maske gibt an, dass der Spielleiter mit 10 Würfeln 8 Erfolge würfeln müsste.
Das Excelfile soll dann diese 10 Würfel nehmen, jeden der 10 einzeln per Zufall würfeln und anschließend die Anzahl der Erfolge verkünden ala "leider nur 5 Erfolge" oder so...
Ist das verständlicher?
Hoffe so ;)
Ich habe mir eine kleine "Eingabemaske" zusammengeschustert, die verschiedene Werte berrechnet (Verfügbarkeitswahrscheinlichkeiten usw.). Das ganze ist für ein Rollenspiel (Shadowrun um genauer zu sein) und es geht darum, ob ein sog. Schieber heiße Ware besorgen kann. Das hängt von verschiedenen Faktoren ab (Hausregel). Letztendlich spuckt mir dieses Mini"programm" die Anzahl an Würfeln aus, mit denen dann der Spielleiter anschließend per Hand würfeln müsste, um zu sehen, ob der Schieber es auch wirklich schafft, den gewünschten Gegenstand zu besorgen. Dabei ist eine 5 und 6 auf einem 6-seitigen Würfel ein "Erfolg", der Rest nicht. Die Erfolge werden aufaddiert und müssen festgelegte Schwellenwerte übertreffen (je schwieriger die Beschaffung, desto höher die Anzahl benötigter Erfolge).
Genau den letzten Schritt (manuelles Würfeln) möchte ich durch einen "Zufallsgenerator ersetzen. Es soll also die Zahl der Würfel, die meine Ausgabemaske schon auswirft, "ausgelesen" werden, um dann anschließend als Ausgabe die Gesamtzahl der Erfolge zu erhalten...
Bsp:
Meine Maske gibt an, dass der Spielleiter mit 10 Würfeln 8 Erfolge würfeln müsste.
Das Excelfile soll dann diese 10 Würfel nehmen, jeden der 10 einzeln per Zufall würfeln und anschließend die Anzahl der Erfolge verkünden ala "leider nur 5 Erfolge" oder so...
Ist das verständlicher?
Hoffe so ;)
Antwort 4 von Locke
Du willst eine Würfelzahl?
Number = Int(6 * Rnd) + 1
Gruß
Locke
Number = Int(6 * Rnd) + 1
Gruß
Locke
Antwort 5 von Locke
Würfel1= Int(6 * Rnd) + 1
Würfel2= Int(6 * Rnd) + 1
Würfel3 = Int(6 * Rnd) + 1
Würfel4= Int(6 * Rnd) + 1
Würfel5= Int(6 * Rnd) + 1
Würfel6= Int(6 * Rnd) + 1
Würfel7= Int(6 * Rnd) + 1
Würfel8= Int(6 * Rnd) + 1
Würfel9= Int(6 * Rnd) + 1
Würfel10= Int(6 * Rnd) + 1
X=0
If Würfel1>4 then
X=X+1
end if
If Würfel2>4 then
X=X+1
end if
If Würfel3>4 then
X=X+1
end if
If Würfel4>4 then
X=X+1
end if
If Würfel5>4 then
X=X+1
end if
If Würfel6>4 then
X=X+1
end if
If Würfel7>4 then
X=X+1
end if
If Würfel8>4 then
X=X+1
end if
If Würfel9>4 then
X=X+1
end if
If Würfel10>4 then
X=X+1
end if
txt="sie haben " & X & " Treffer!"
msgbox(txt)
So ähnlich (stark vereinfacht) könnte ein Teil Deiner Lösung aussehen
Gruß
locke
Würfel2= Int(6 * Rnd) + 1
Würfel3 = Int(6 * Rnd) + 1
Würfel4= Int(6 * Rnd) + 1
Würfel5= Int(6 * Rnd) + 1
Würfel6= Int(6 * Rnd) + 1
Würfel7= Int(6 * Rnd) + 1
Würfel8= Int(6 * Rnd) + 1
Würfel9= Int(6 * Rnd) + 1
Würfel10= Int(6 * Rnd) + 1
X=0
If Würfel1>4 then
X=X+1
end if
If Würfel2>4 then
X=X+1
end if
If Würfel3>4 then
X=X+1
end if
If Würfel4>4 then
X=X+1
end if
If Würfel5>4 then
X=X+1
end if
If Würfel6>4 then
X=X+1
end if
If Würfel7>4 then
X=X+1
end if
If Würfel8>4 then
X=X+1
end if
If Würfel9>4 then
X=X+1
end if
If Würfel10>4 then
X=X+1
end if
txt="sie haben " & X & " Treffer!"
msgbox(txt)
So ähnlich (stark vereinfacht) könnte ein Teil Deiner Lösung aussehen
Gruß
locke