Clever-Excel-Forum

Normale Version: Automatische sortierung der Tische
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Seiten: 1 2 3 4 5 6 7 8 9 10 11 12 13
Hallo Gast,

die anforderung war das:

1. man nie gegen einen spieler aus seinem Team spielt
2. nie gegen den selben spieler in runde eins bis vier spielt
3. man nie gegen eine zweite mannschaft spielt.

Wenn ich das richtig lese hast du noch ein viertes kreterium für ( für punkt 2 ) :  nie gegen einen spieler aus einem Team gegen das man schon gespielt hat !? ( Das wäre egal wenn es ein anderer Spieler aus dem Team ist )

Gruss
Rabe
kriterium natürlich Smile
Hallo Edgar,

Das Ziel diese Forums ist doch dem Fragesteller eine für ihn praktikable Lösung anzubieten.


da Rabe Fennek und mir nicht zu glauben scheint, kannst du ihm vielleicht schreiben ob Fennks Lösung die Kriterien erfüllt.

Ich bin auf jeden Fall hier raus.

Nochmals, ich bin erst bin erst seit kurzem in diesem Forum, schaue aber in alle neuen Anfragen mal kurz rein.
Ich bewundere die Lösungsvorschläge der regelmässigen Antwortgeber, wozu du ja auch gehörst.

Du kannst ja dann mit Rabe klären, ob du dein Priogramm erweiterst  so dass es alle Bedingungen erfüllt, oder ob er auch mit den Eischränkungen leben kann.
Hallo,

zuallererst möchte ich klarstellen, dass ich nicht behauptet habe, dass meine Lösung alle Anforderungen erfüllt. Ich glaube auch nicht, dass es mit einfachen Mitteln möglich ist, eine zufällige Anordnung über vier Runden zu erstellen, die alle Kriterien erfüllt. Für mich ist aber nur eine zufällige Zusammensetzung nicht manipulierbar. Die Lösung von Fennek ist zwar einfach, aber berechenbar und kann dazu führen, dass die Sortierung der Teilnehmer innerhalb der Mannschaften auf die Gegner abgestimmt wird. Trotzdem habe ich auch für die Variante von Fennek eine Zufallsversion erstellt, die in aller Regel auch funktioniert.
Ich habe eine Lösung erstellt, nein zwei, ob sie den Anforderungen genügen, kann nur Rabe79 entscheiden. Für mich ist das Thema erledigt.
Hi Edgar,

die erste lösung ist schon sehr gut !!! wie gesagt diese hilft mir schon sehr viel weiter.

Wie würde denn deine zweite lösung ausshen von der du sprichst.

Was wäre da besser als bei der ersten ? oder schlechter ?

Gruß

Rabe
Weil es manche Bedingungen gibt für eine 'richtige' Lösung, widersprichen die Bedingungen die Anwendung von 'rand()', 'rnd' (in VBA), usw.

Es ist schon ein sehr alte Mathematik Aufgabe.

De Lösung van Fennek ist in diesem Fall richtig (und auch schon sehr alt).
Hi snb

wie diese richtig ist.
würde diese auf alle bedingungen erfüllen ?

gruß

rabe
Hallo,

eigentlich wollte ich es vermeiden, ein eigenes Prüfprogramm zu schreiben, aber reines Interesse (und da ich niemals xlsm-Dateien von anderen öffne), hier ist mein Test-Code, passend für Blatt 2 meiner Datei:


Code:
Sub Testen()
For i = 2 To 20
   For j = 7 To 22
       Team = Int((Cells(i, j) - 1) / 4) + 1
       B = Chr(64 + Team)
       Cells(i + 24, j) = B & Cells(i, j)
   Next j
Next i
End Sub

Sub Farbtest()
Dim rng As Range
Set rng = Range("G26:V44")
For i = 65 To 83
rng.Interior.Color = xlNone
   For Each c In rng
       If Left(c, 1) = Chr(i) Or Left(c, 1) = Chr(i + 1) Then c.Interior.Color = vbYellow
   Next c
Stop
Next i
End Sub


Der erste Teil verbindet den Gruppen-Buchstaben mit der Spielernummer, der zweite Teil markiert alle Spieles eines Teams und das Team mit dem nächsten Buchstaben (selber Verein) mit einer Farbe. Es ist nötig, den Code im VBA-Fenster zu starten, und nach jeder Runde ("stop") erneut zu starten.

Nach meinem Eindruck sitzen niemals zwei Spieler eines Vereins zusammen.

@snb: Da ich nicht einmal weis, um welches Spiel es geht, kenne ich auch keine alten Lösungen

mfg
@Fennek,

Das sind mathematische Lösungen (unabhänglich von jeder konkrete Situation)..
Hey  "i bin wieder do"

@ Fennek  wenn du keine .xlsm Dateien öffnest kein Problem, ich habe alle Module als Text in eine Tabelle 
    kopiiert und alle Module gelöscht. Damit kannst du meine Prüfprogramme selbst nachprüfen.

@ Snb  ich mag eine Nervensaege sein, aber über fachliche Tatsachen kann man mit mir nicht diskutieren.
    Es gibt Dinge die eindeutig Beweisbar sind, und meine Staerke ist, das ich da sehr gründlich bin. Das ist 
    nicht böse gemeint! Ich schaue mir nur gerne an wo die technischen Grenzen sind. 

@  im Beispiel von Fennek habe ich vier Tische markiert wo immer wieder dieselben Personen zusammen sitzen.
      Das kann man auch mit Mathematik oder höhre Mathematik nicht weg diskutieren. Eine simple Tatsache.
      Das ganze Blatt ist grün ....   über 2500 Übereinstimmungen ...

Um bei dieser Datenmenge überhaupt einen praktischen Durchblick zu bekommen habe ich ja das Prüfprogramm
geschrieben. In der Teilnehmer Liste von Edgar über 4 Runden erkennt man vor lauter Namen den Wald nicht !! 

Es bleibt die Erkenntnis die wir alle schon hatten, so ein Programm, so simpel es erscheinen mag hat es in sich!
In drei Thread habe ich an dem Problem gearbeitet, und musste jedesmal das Handtuch schmeissen. Es haelt
mich aber nicht davon ab daran zu glauben das es eine Makro Lösung gibt.

Vielleicht muss bei Fennek seiner Idee die Verschiebung auf eine bestimmt Zahl eingestellt werden???
Es war mir zuviel Arbeit 140 Versatz Möglichkeiten durchzutesten. Ein Programm dafür gibt es ja.

mfg  Gast 123


PS   jetzt habe ich mal eine fachliche Frage an euch:   

Wie kann man bei mehreren Computern die vernetzt sind die Zugriffsberechtigung einschraenken ??
Ist eine konkrete Aufgabe hier im Forum, aber damit habe ich bisher noch nie gearbeitet.  "Einsatzplan"
Jede Abteilung soll aus Datenschutzgründen nur Zugriff auf bestimmte Mitarbeiter Daten haben.i

Das ist für mich Neuland!!  Hat da jemand eine gute Idee ??  Die PC Serien Nummer lesen ist schwierig
Wie ich erkenne welcher Computer zugreift und wie man nur begrenzte Daten für jede Abteilung freigibt ??
Seiten: 1 2 3 4 5 6 7 8 9 10 11 12 13