深夜迷茫求助，改改公式，大展宏兔！

球世俗

表中有些稍复杂的公式，现在不能准确进行统计。请高手帮助一下！
表有点大，我把没用的数据清了清，需要修改的地方在am80：bj108这个地方。麻烦大牛打开后拉一拉就能看到。
有数据的地方都有公式，麻烦看看问题出在什么地方。涉及到的表述不较多，我直接写在表里面了。
在此先行谢过！

山菊花

提供一个VBA方案，供参考。
编辑了E:I数据，自动更新统计结果。
只是结果与原公式不一致，不知是对还是错：

球世俗

山菊花 发表于 2023-1-21 21:32
提供一个VBA方案，供参考。
编辑了E:I数据，自动更新统计结果。
只是结果与原公式不一致，不知是对还是错 ...

班主威武，感谢厚爱！只是对VBA不太懂。然后刚才运行的时候，出现图中界面便无从下手，这是自己太小白了了。感谢付出！顺祝兔年大吉，大展宏图！

山菊花

不用你懂VBA，你只需要在打开文件时选择“启用宏”，然后每当G:H输入或修改数值时，程序自动执行，输出统计结果。
如下图，在所示单元格输入数值后，自动更新“纽卡斯尔喷气机、西悉尼流浪者”两队的成绩。
楼上附件有更新，请重新下载。

球世俗

山菊花 发表于 2023-1-22 09:53
不用你懂VBA，你只需要在打开文件时选择“启用宏”，然后每当G:H输入或修改数值时，程序自动执行，输出统计 ...

非常感谢大神的耐心付出和指导，可以完美解决我的需求。还有两个小问题需要指导一下：1.表中黄色区域，我写了说明的地方，也是将来需要统计数据的地方。因为有的赛事球队很多，不知道本宏是否在am82:by108的这些统计区域是否都能按照球队进行统计。2.我通过

球世俗

山菊花 发表于 2023-1-22 09:53
不用你懂VBA，你只需要在打开文件时选择“启用宏”，然后每当G:H输入或修改数值时，程序自动执行，输出统计 ...

2.我通过查看代码的方式，找到代码后，怎样能运行到其他工作簿？复制代码后，想新建一个，发现原工作簿有个其他的宏，卡在这里运行不了……

球世俗

山菊花 发表于 2023-1-22 09:53
不用你懂VBA，你只需要在打开文件时选择“启用宏”，然后每当G:H输入或修改数值时，程序自动执行，输出统计 ...

当遇到球队比较多的联赛的时候，写了说明的这个区域对应的位置，也需要统计数据，想问一下，am82：ay108区域是否都能自动统计？

山菊花

球世俗 发表于 2023-1-24 10:17
当遇到球队比较多的联赛的时候，写了说明的这个区域对应的位置，也需要统计数据，想问一下，am82：ay108 ...

能自动统计。

球世俗

山菊花 发表于 2023-1-25 15:11
能自动统计。

首先谢谢大神。经过几天的探索和实验，版主的代码很强大，还有点小麻烦需要指点一下：
1.要想实现自动统计，需要每轮比赛手动填入比分，我试了一下，复制粘贴过来不统计，能否改成只要有数据，不管是手动输入还是粘贴都能及时统计最近比赛结果？
2.数据更新后，会自动把表中附近单元格内的公式清除，实际上表中蓝色区域这一块每个单元格都有很多数据公式，能否只在原表中红色区域的地方统计而不改变其他地方的数据和公式？
非常感谢版主，打扰您了！实际上我也请了别人来研究，但是他们看不懂你的代码

山菊花

把下面一行删去，即可实现第1条要求：
    If Target.Row = 1 Or Target.Column < 7 Or Target.Column > 8 Then Exit Sub

蓝色区域是什么公式？可以把它改用VBA统计。