kan man lave en lodtrækning i det ved hæfte ark hvis der er to hold på 1 og 2 pladsen har op nået de samme resultater men i det ved hæftede ark der lavet en beskrivelse af problemet i arket.
det skal lige siges at den indbyrdes kamp endte uafgjort. så det kan ikke bruges.


uploads/397/Kopi_af_7_holds_turnering_version_0.0.06_beta.xlsx

En lille tilføjelse til makro funktionen.

Tilfældige tal er ikke helt så lette, at lave, som vi går og tror, så derfor kan man tilføje et 'seed' for at gøre funktionerne mere rette mod, hvad man nu skal bruge...
...og, hvis man virkelig vil have meget tilfældige tal, kan man bruge den indbyggede timer som 'seed', da den, alt andet lige, vil være tilfældig i sig selv, hver gang man kalder funktionerne, da man jo ikke på forhånd kan vide præcist, hvilket sekund i døgnet, makroen kaldes.

Noget i denne stil:

Dim RndNum As Long       Randomize(Timer)       RndNum = Round(Rnd(Timer), 0)

Bemærk, at jeg har ændret variabel typen fra Integer til Long, da Integer ikke findes mere, og brugen af Integer vil rent faktisk gøre din kode langsommere, da variablen blot er beholdt for baglæns kompatibilitet, men i virkeligheden omdannes til Long inden variablen forsat benyttes - og, dette koster tid.
www.excelgaard.dk/Lib/Macros/GPP/Long/ www.excelgaard.dk/Lib/Macros/GPP/Long/

(Sjovt nok er Integer begrænsningen bibeholdt, selvom variablen nu bliver til en Long, men det er nok igen for baglæns kompatibilitet)

funktion skal først komme i brug hvis der i det ark jeg vedhæftede i CD3 til CD9 er 2 hold der får samme resultat som der vist i arket hvor der 2 der kunne får en første plads så er det imellem dem der skal trækkes lod men kunne også at hold1 og hold4 der begge fik en første plads så var det dem der skulle trækkes imellem.

hvordan skal jeg bruge subben...

kan man ikke lave en knap der kan køre lodtrækningen og en knap til at nul stille cellerne CP3-CP9?

Ser fornuftig ud
Jo flere betydende cifre du har i tallene jo mindre risiko for at ramme 2 ens tal