Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
512to516
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
512to516
512to516
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Spielplan

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Glaskugel?
Uduuh
Hallo,
und wie soll der vervollständigt werden?
Gruß aus'm Pott
Udo

AW: Glaskugel?
09.11.2004 12:43:13
marc
Hallo Udo,
so das jedes Team gegen jedes einmal spielt, so wie bei einer Fussball WM in einer Gruppe.
AW: Glaskugel?
09.11.2004 13:02:52
Georg
Hallo,
ist hier aus dem Forum. Kannst Du sicherlich anpassen.
folgende Voraussetzungen:
Die Spielernamen/Mannschaftsnamen stehen in den Zellen A1:A6
Die Paarungen sollen in die Zellen B1:C3
Folgendes Makro bei XL5/7 in ein englischsprachiges, bei XL8 ein allgemeines
Modulblatt einfügen und starten:

Sub Zufall()
Dim Bereich As Range, C As Range, F As Range
Dim n%
Set Bereich = Range("b1:c3")
Bereich.ClearContents
For Each C In Bereich.Cells
Set F = Range("A1")
While Not F Is Nothing
n = Int((6 * Rnd) + 1)
Set F = Bereich.Find(Cells(n, 1))
Wend
C = Cells(n, 1)
Next C
End Sub

Grüße
Georg
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige