羽毛球循环小组赛自动排名

apoul119

YZC51 发表于 2019-5-18 20:45
楼上附件增加重名次提醒！

感谢大神 费心了

apoul119

zopey 发表于 2019-5-18 20:38
现有的规则，无法区分 两人的名次。并列第2、3名 ，用“2|3”分开 这样子 。

"小组循环赛通过计算胜次排定名次。
如遇两队胜次相同，相互间胜者名次列前。
如遇三队或三队以上胜次相同，则按各队在小组赛中的净胜（盘、局、分）决定名次，净胜多者列前。
如三队或以上净胜一样，则通过抽签决定名次。"
只有两队胜次相同的时候，按相互间胜者名次靠前，
当3队或3队以上胜次相同的时候，按净胜决定名次，净胜多者靠前，


这样是可以区分开名次的啊

YZC51

请参考
羽毛球循环小组赛自动排名计算.rar (10.5 KB, 下载次数: 22)

2019-5-18 21:02 上传

点击文件名下载附件

zopey

我记得附件没有 3个并列的举例，规则也没加（懒）。
是你后面 添加的吧 。

apoul119

zopey 发表于 2019-5-18 21:11
我记得附件没有 3个并列的举例，规则也没加（懒）。
是你后面 添加的吧 。

大神已经很厉害了，虽然要手动调整下，但是比之前的工作量少了好多，感谢大神。

apoul119

YZC51 发表于 2019-5-18 21:07
请参考

大神，B组这个排名跟我手动算的不一致，B1 B2胜次一样，都胜了2场，根据规则，在两场相同胜次的情况下，看二者胜负关系，B1 2：1赢了B2 所以应该是B1第3名，B2第4名，表格中刚好相反，因为比分是每天更新的，当出现3个队及3队以上的胜次相同，则看净胜，谁多则谁排名靠前。求大神解惑。

apoul119

zopey 发表于 2019-5-18 21:11
我记得附件没有 3个并列的举例，规则也没加（懒）。
是你后面 添加的吧 。

大神说的对，仓促间可能有所疏忽，愧疚万分，因为比分是每天更新的，当时确实在例子中给出3队相同的情况，附件中列举了5天的赛果进程以及手算的结果做参考，比赛规则在文字中有描述，两队胜次相同，看胜负关系；仅当出现3个队及3队以上的胜次相同，则看净胜，谁多则谁排名靠前。望大神抽空看看，指点一二，感谢大神。

zopey

apoul119 发表于 2019-5-19 10:37
大神说的对，仓促间可能有所疏忽，愧疚万分，因为比分是每天更新的，当时确实在例子中给出3队相同的情况 ...

3个同排名的 ，添加了规则 ，
4个排名相同的 ，自己想办法吧 。

自动排名2.rar (18.09 KB, 下载次数: 30)

2019-5-19 12:04 上传

点击文件名下载附件

zopey

1.        a = Left(crr(i, 2), 1): b = Mid(crr(i, 2), 2, 1): c = Right(crr(i, 2), 1)
   
2.            
   
3.        If brr(a, 2) > brr(b, 2) Then
   
4.           If brr(b, 2) > brr(c, 2) Then
   
5.              brr(a, 3) = k + 1: brr(b, 3) = k + 2: brr(c, 3) = k + 3: k = k + 3
   
6.           ElseIf brr(b, 2) < brr(c, 2) Then
   
7.              brr(b, 3) = k + 3
   
8.              If brr(a, 2) > brr(c, 2) Then
   
9.                 brr(a, 3) = k + 1: brr(c, 3) = k + 2: k = k + 3
   
10.              ElseIf brr(a, 2) < brr(c, 2) Then
    
11.                 brr(a, 3) = k + 2: brr(c, 3) = k + 1: k = k + 3
    
12.              End If
    
13.           End If
    
14.        ElseIf brr(a, 2) < brr(b, 2) Then
    
15.           If brr(b, 2) < brr(c, 2) Then
    
16.              brr(a, 3) = k + 3: brr(b, 3) = k + 2: brr(c, 3) = k + 1: k = k + 3
    
17.           ElseIf brr(b, 2) > brr(c, 2) Then
    
18.              brr(b, 3) = k + 1
    
19.              If brr(a, 2) > brr(c, 2) Then
    
20.                 brr(a, 3) = k + 2: brr(c, 3) = k + 3: k = k + 3
    
21.              ElseIf brr(a, 2) < brr(c, 2) Then
    
22.                 brr(a, 3) = k + 3: brr(c, 3) = k + 2: k = k + 3
    
23.              End If
    
24.           End If
    
25.        End If
    
26.       
    
27.       
    
28.        If brr(a, 2) = brr(b, 2) Or brr(a, 2) = brr(c, 2) Or brr(b, 2) = brr(c, 2) Then
    
29.           brr(a, 3) = k + 1 & "|" & k + 2 & "|" & k + 3
    
30.           brr(b, 3) = k + 1 & "|" & k + 2 & "|" & k + 3
    
31.           brr(c, 3) = k + 1 & "|" & k + 2 & "|" & k + 3
    
32.           k = k + 3
    
33.        End If

复制代码

YZC51

apoul119 发表于 2019-5-19 10:29
大神，B组这个排名跟我手动算的不一致，B1 B2胜次一样，都胜了2场，根据规则，在两场相同胜次的情况下， ...

N16=21
试试