up to 20 teams each play each other only once?

[tonylpcs@yahoo.co.uk]

hi everyone,

i have a chess competion and im trying to get a way to create the compation list for each week.

the max number for person taking part will be 20 but this could be less (but will be an even number)

now one game is to be played each week until everyone has played each other!

the problem ive go is creating a way to create a week by week compation list so each person plays the other only once but takes into acount the number of players taking place?

i.e. when the competion starts if only 6 people have entred then i need to do it so each of the 6 play each other but if 20 enter the it goes on for more weeks and all 20 need to play each other.

any idea how i can do this?

tony

 

[MickG]

This may or may not help !!
This code gives you an array of numbers as you will see when you run the code, that can be added to without disturbing the original numbers.
Change total where shown in code.

[COLOR="Navy"]Sub[/COLOR] MG16Jul20
[COLOR="Navy"]Dim[/COLOR] c       [COLOR="Navy"]As[/COLOR] [COLOR="Navy"]Integer[/COLOR]
[COLOR="Navy"]Dim[/COLOR] ac      [COLOR="Navy"]As[/COLOR] [COLOR="Navy"]Integer[/COLOR]
[COLOR="Navy"]Dim[/COLOR] rw      [COLOR="Navy"]As[/COLOR] [COLOR="Navy"]Integer[/COLOR]
[COLOR="Navy"]Dim[/COLOR] p       [COLOR="Navy"]As[/COLOR] [COLOR="Navy"]Integer[/COLOR]
[COLOR="Navy"]Dim[/COLOR] tot     [COLOR="Navy"]As[/COLOR] [COLOR="Navy"]Integer[/COLOR]
c = 1
tot = 10 '[COLOR="Green"][B] Change Total Numbers of players here !![/B][/COLOR]
[COLOR="Navy"]For[/COLOR] ac = 1 To tot - 1
    Cells(c, 1).Resize(, tot - ac) = ac
        c = c + 1
        [COLOR="Navy"]For[/COLOR] rw = 1 To tot
            [COLOR="Navy"]If[/COLOR] Not rw = ac And rw > ac [COLOR="Navy"]Then[/COLOR]
                p = p + 1
                Range("A" & c)(, p) = rw
            [COLOR="Navy"]End[/COLOR] If
        [COLOR="Navy"]Next[/COLOR] rw
            c = c + 2
            p = 0
[COLOR="Navy"]Next[/COLOR] ac
[COLOR="Navy"]End[/COLOR] [COLOR="Navy"]Sub[/COLOR]

Regards Mick

 

[sezuh]

Hi,
I'm sorry for the intrusion,but what would be the matrix if there are 3 people in each table (playing Card game) and the total of 21,or what line in the code to be amended to accomodate the change?
Thanks

 

[tonylpcs@yahoo.co.uk]

thank you,

that will ackualy help me with somthing else im doing so thanks

tony