Zufallsprinzip bei Teilnehmerauswahl

• Zufallsprinzip bei Teilnehmerauswahl von Marcel vom 13.10.2003 07:35:36
  • AW: Zufallsprinzip bei Teilnehmerauswahl - von Willie am 13.10.2003 08:11:16
    • AW: Zufallsprinzip bei Teilnehmerauswahl - von Marcel am 13.10.2003 09:02:11
      • Danke !!! o.T. - von Willie am 13.10.2003 09:22:09

Betrifft: Zufallsprinzip bei Teilnehmerauswahl
von: Marcel
Geschrieben am: 13.10.2003 07:35:36
Hallo Excel Spezis, ich habe folgendes Problem.
Ich möchte für meinen Verein ein Programm für Wettkämpfe schreiben. Wir haben bis zu 50 Teilnehmer.
Diese sollen jeweils in 6er Gruppen gegeneinander antreten. Aber die Auswahl der Gegner soll nach dem Zufallsprinzip erfolgen und es soll sich nicht die gleiche Konstellation wieder ergebn.
Wer kann mir dabei helfen?

Vielen Dank

Betrifft: AW: Zufallsprinzip bei Teilnehmerauswahl
von: Willie
Geschrieben am: 13.10.2003 08:11:16
Einfach in Spalte b1 die anzahl eingeben z.B. in deinem Fall 50 und es werden
die Zahlen in die Spalte A geschrieben ohne Doppelte Zahlen!
Gruß
Willie

Sub zufall()
Dim Wert1
Dim zufall As Variant
Randomize ' Zufallszahlengenerator initialisieren.
zufall = Cells(1, 2).Value
Wert1 = Cells(1, 2).Value
x = 0
Do
Do
drin = 0
Wert1 = Int((zufall * Rnd) + 1) ' Zufallszahlen im Bereich von 1 bis 6
For i = 1 To x
If Cells(i, 1) = Wert1 Then drin = 1
Next
Loop Until drin = 0
x = x + 1
Cells(x, 1) = Wert1
Loop Until x = zufall ' diese 6 wird im Orginal gänder durch eine
End Sub

Betrifft: AW: Zufallsprinzip bei Teilnehmerauswahl
von: Marcel
Geschrieben am: 13.10.2003 09:02:11
Vielen Dank. Hat super hingehauen.

Betrifft: Danke !!! o.T.
von: Willie
Geschrieben am: 13.10.2003 09:22:09
.

Excel-Beispiele zum Thema " Zufallsprinzip bei Teilnehmerauswahl"
Nach dem Zufallsprinzip umsortieren	Wertereihe nach dem Zufallsprinzip auf 4 Spalten verteilen
Namen nach dem Zufallsprinzip auswählen und eintragen	Sätze nach dem Zufallsprinzip bilden
Reihenfolge einer Zahlenreihe nach dem Zufallsprinzip variieren	Namen nach dem Zufallsprinzip in variable Gruppen aufteilen
Vorgegebene Anzahl Artikel nach dem Zufallsprinzip auswählen	Grafiken nach dem Zufallsprinzip anzeigen
Flaggen nach dem Zufallsprinzip vertauschen	Auswahl von Werten nach dem Zufallsprinzip