Plotting list with possibilty numbers for football betting, 13 matches.

I?m unsuer exactly where i should upload this question.

In sweden we have a game for every saturday where you will bet on 13 games, you will bett either 1 (home victory, x (draw) or 2(away victory). I want to create a fromula that will give me a list but the rules are that 5 games shall be "1", 4 games shall be "X", 4 games shall be "2". I thought this should be possible with VBA, but maybe there is a easy way?
Example of plotting should look like.

1. 11111xxxx2222
2. 1111x1xxx2222
3. 111121xxx2221

Any tips are appreciate =)

No I was not stating for one result,
enough clear with your original « the rules are that 5 games shall be "1", 4 games shall be "X", 4 games shall be "2" ».
The question was according to how many draws you need but maybe you want a single draw ?
What exact layout do you need according to Excel ?

The point with the excelfile its that it shall give me all posibility in form of a list.
witch should look like this:

S,1,X,2,1,X,2,1,X,2,1,X,2,1

S,1,1,2,1,X,X,2,2,2,1,1,1,1

And my main rule is 5 homevictory (1), 4 draw (X), 4 away victory (2).
additional rule should be 4 games are uniqe. Unique games are: 2-X; 4-1; 12-1;13-1.

IMO listing all combinations has no sense except for some student homework …
I was thinking of some draws to fill some grids like when playing some lottery game.
As bsalv already well done the job and shared with you the way how to reduce combinations according to your new rules
so this thread is solved !

Thank you bsalv,

Thanks all for the help and have a nice day =)

Originally Posted by bsalv

hello,
with every match in another column, you can use autofilter to apply more rules

Hello,

I was searching football VBA and found this thread interesting I have a question when I run the code it inform error 13 and highlight following line in yellow please tell me what I am doing wrong.

Please Login or Register  to view this content.

Regards,
Moti

Originally Posted by bsalv

hello, how many keys do you have in that Dictionary

you can find it by adding 1 of this lines

Please Login or Register  to view this content.

It's in an excel2000, I'm not sure but those files already have more then 65K lines per sheet (your example is okay with +1.048K lines) ?

Hello bsalv, I apologies my bad typo error I am using Excel 2010; I tried line (MsgBox Dict.Count) it says 90090.

Please see the image attached it give me error13 and when I press debug (Depurar) it highlight line in yellow. May be I guess this line is not compatible with Excel 2010.

Kind Regards,
Moti

Originally Posted by bsalv

i have no problems in excel365

Hello bsalv, sorry I am troubling you I appreciate your help I think there is some compatibility problem with excel 2010 version really it is giving me lot of problem.

Here is the 3 screen shot after I run the code it show as follow first, second and third.

Kind Regards,
Moti

Originally Posted by bsalv

another trial

Hello bsalv, I am happy this runs 100% perfectly. I am grateful to you for your kind help.

Have a good start of the week. Good Luck!

My Best Regards,
Moti