Hej

Jeg er i gang med at lave et regneark til en fodboldturnering, men jeg har lige et problem, som jeg virkelig ikke aner, hvad jeg skal stille op med.

I turneringen er der 16 hold, som deles op i fire grupper med fire hold i hver. Fra hver gruppe skal de to bedste hold gå videre til knockout-slutspillet. Mit problem er, at jeg ikke ved, hvordan jeg skal få sorteret holdene i grupperne, så de kommer til at stå i den rette rækkefølge efter at resultaterne løbende bliver tastet ind. Derudover er det også vigtigt, at hele holdnavnets række med kampe, sejr, uafgjort, nederlag, mål og point følger med, hvis det bliver rokeret rundt omkring i gruppen under opdatering af resultater.

Først og fremmest er det holdets antal point, der bestemmer placeringen, men i tilfælde af pointlighed er der en række kriterier, der bestemmer placeringen.

1. Indbyrdes opgør
2. Målforskel
3. Mål scoret
4. Mål imod

Det er et større regnskab, man skal ud i, og jeg er ikke sikker på, at det vil lykkes, men jeg håber, at I kan hjælpe mig på en eller anden måde. Jeg kan godt uddybe det, hvis I ikke helt forstår, hvad jeg mener, og har I brug for at se mit excel-ark, skal jeg gerne sende det til jer. Det skal dog lige siges, at jeg er lidt af en rookie til Excel, da det er blot de ganske elementære formler, jeg kender godt til, så det kan måske være nødvendigt, at det skal skæres rimelig meget ud i pap - men nu må vi se :)

På forhånd mange, mange tak!

Glædelig jul og godt nytår.

Med venlig hilsen
Anders

/uploads/59/Fodboldt.xlsm" target="_blank">uploads/59/Fodboldt.xlsm Er det noget ligende det her du søger?

/uploads/59/Fodboldturnering_prøv_dette.xlsm" target="_blank">

Hmm... Jeg kikker lige på det i morgen. Men mon ikke det er muligt :)

Forresten:

Jeg har aldrig prøvet at bruge makroer før, så er i gang med at lære det stille og roligt. Lige nu prøver jeg at flytte skemaet, som du har lavet en skjule/vis-knap til, over i ark2, så jeg kan få gemt den hel væk, men det fungerer ikke helt. Kan du se, hvad jeg har gjort forkert?

Det første - Range("C6:L9"). Select -  er en kopiering fra tabellen, som jeg har flyttet over i ark2, men det er jeg ikke sikker på, at der er blevet registreret?

Sub sorter2()
'
' sorter2 Makro
'

'
    Range("C6:L9").Select
    Selection.Copy
    Sheets("Ark1").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Application.CutCopyMode = False
    ActiveWorkbook.Worksheets("Ark1").Sort.SortFields.Clear
    ActiveWorkbook.Worksheets("Ark1").Sort.SortFields.Add Key:=Range("S28:S31"), _
        SortOn:=xlSortOnValues, Order:=xlDescending, DataOption:=xlSortNormal
    ActiveWorkbook.Worksheets("Ark1").Sort.SortFields.Add Key:=Range("R28:R31"), _
        SortOn:=xlSortOnValues, Order:=xlDescending, DataOption:=xlSortNormal
    With ActiveWorkbook.Worksheets("Ark1").Sort
        .SetRange Range("J28:S31")
        .Header = xlGuess
        .MatchCase = False
        .Orientation = xlTopToBottom
        .SortMethod = xlPinYin
        .Apply
    End With
End Sub


Det er nemlig meningen, at min computer skal tilkobles en projekter, så alle i hallen kan følge med i resultaterne. Derfor er det vigtigt, at alle grupperne (5 stk) og kampprogrammet  bliver på "forsiden", så jeg er fri for at scrolle frem og tilbage for at det kommer op på lærredet. Hvis du forstår...

Hej Anders og Andreas,

Hej Andreas

Jeg har brug for lidt hjælp igen :)

Nu har jeg færdiggjort programmet, men jeg kan simpelthen ikke få gruppesorteringen til at virke. Vil du prøve at kigge på det?

Sorteringsrækkefølge:

1. P - point (største til mindste)
2. MF - målforskel (største til mindste)
3. MS - målscore, antal scorede mål (største til mindste)
4. MS - målscore, antal mål lukket ind (mindste til største)

uploads/144/Kampprogram_til_HarboøreCup_2011.xlsm

Jeg har indtastet nogle tilfældige resultater. Sådan som designet ser ud nu, skulle det gerne blive ved med at se ud. Det skal så være meningen, at man skal trykke på de små bokse med tal i for at opdatere grupperne, hvis du forstår :)

Håber du har tid til lige at kigge på det.