Forfatter |
Emne Søg Emne funktioner
|
kandersk
Forum Begynder
Medlem: 28.Dec.2010
Status: Offline
Point: 5
|
Emne: Sortere hold i fodboldturnering Sendt: 28.Dec.2010 kl. 02:45 |
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
|
|
|
|
|
andreas
Bronze bruger
Medlem: 22.Aug.2010
Land: Danmark
Status: Offline
Point: 35
|
Sendt: 28.Dec.2010 kl. 10:49 |
Du må meget gerne sende dit excel-ark
|
|
andreas
Bronze bruger
Medlem: 22.Aug.2010
Land: Danmark
Status: Offline
Point: 35
|
Sendt: 28.Dec.2010 kl. 11:52 |
/uploads/59/Fodboldt.xlsm" target="_blank">uploads/59/Fodboldt.xlsm
Er det noget ligende det her du søger?
|
|
kandersk
Forum Begynder
Medlem: 28.Dec.2010
Status: Offline
Point: 5
|
Sendt: 28.Dec.2010 kl. 12:39 |
|
|
andreas
Bronze bruger
Medlem: 22.Aug.2010
Land: Danmark
Status: Offline
Point: 35
|
Sendt: 29.Dec.2010 kl. 14:47 |
/uploads/59/Fodboldturnering_prøv_dette.xlsm" target="_blank">
Prøv om du kan bruge dette.
/uploads/59/Fodboldturnering_prøv_dette.xlsm" target="_blank">uploads/59/Fodboldturnering_prøv_dette.xlsm
|
|
kandersk
Forum Begynder
Medlem: 28.Dec.2010
Status: Offline
Point: 5
|
Sendt: 29.Dec.2010 kl. 16:38 |
Det ser meget godt ud! Det er dejligt med noget hjælp - tak for det.
Lige en enkelt ting: Er det muligt at få indbyrdes kampe med til bestemmelsen af placeringen?
|
|
andreas
Bronze bruger
Medlem: 22.Aug.2010
Land: Danmark
Status: Offline
Point: 35
|
Sendt: 29.Dec.2010 kl. 23:44 |
Hmm... Jeg kikker lige på det i morgen. Men mon ikke det er muligt :)
|
|
kandersk
Forum Begynder
Medlem: 28.Dec.2010
Status: Offline
Point: 5
|
Sendt: 31.Dec.2010 kl. 01:52 |
Det må vi håbe :)
Har du fundet ud af noget?
|
|
kandersk
Forum Begynder
Medlem: 28.Dec.2010
Status: Offline
Point: 5
|
Sendt: 31.Dec.2010 kl. 04:05 |
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...
|
|
andreas
Bronze bruger
Medlem: 22.Aug.2010
Land: Danmark
Status: Offline
Point: 35
|
Sendt: 03.Jan.2011 kl. 22:09 |
Jeg har prøvet at finde frem til en løsning med hensyn til at de indbyrdes opgør skal være i første priotet. men uden hæld. Du kan prøve at skrive en besked til Allan, han kan sikkert hjælpe dig.
Sub sorter2() ' ' sorter2 Makro
Sheets(Ark2).select Range("C6:L9").Select ' (her bestemmer du område på ark 2 hvor skemaet ligger) Selection.Copy Sheets("Ark1").Select
Range("j28").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
Med denne sorter kun
1 flest point
2 Målforskel
|
|
Allan
Forum Admin
Forum Admin
Medlem: 03.Feb.2010
Land: Danmark
Status: Offline
Point: 10330
|
Sendt: 04.Jan.2011 kl. 22:44 |
Hej Anders og Andreas,
I må undskylde jeg ikke har fulgt med, jeg vil gerne byde ind, hvis jeg kan.
Jeg er ikke så skarp i fodbold, så jeg skal lige ledes lidt
Hvis vi tager udgangspunkt i seneste ark, hvad skal funktionen udføre?
|
|
kandersk
Forum Begynder
Medlem: 28.Dec.2010
Status: Offline
Point: 5
|
Sendt: 05.Jan.2011 kl. 00:44 |
...
|
|
kandersk
Forum Begynder
Medlem: 28.Dec.2010
Status: Offline
Point: 5
|
Sendt: 12.Jan.2011 kl. 02:27 |
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.xlsmJeg 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.
|
|