excelvba固定合格率随机生成成绩，ExcelVBA获取最高分及统计次数

excelvba固定合格率随机生成成绩，ExcelVBA获取最高分及统计次数8：9行~13行 遍历所有区域的数据，当数据等于最高值的时候，把单元格的底色设置为绿色。7：8行 在P列填入C列只N列等于最高值的次数；4：5行 清楚O列及P列的数据；5：6行 循环单元格；6：7行 在O列填入C列只N列的最高值（MAX调用最高值）；

Excel 里面的函数及公式是Excel的魅力所在。其实Excel vba里面也是可以调取Excel公式的，可以提高VBA代码的运行下利率。今天的例子，就是调用了Excel的公式

问题如下：

解决的思路如下：

代码运行的结果如下：

代码如下:

代码解析

1：2行 Dim定义变量；

2：3行 指定工作表；

3：4行 获取最后一行的行编号；

4：5行 清楚O列及P列的数据；

5：6行 循环单元格；

6：7行 在O列填入C列只N列的最高值（MAX调用最高值）；

7：8行 在P列填入C列只N列等于最高值的次数；

8：9行~13行 遍历所有区域的数据，当数据等于最高值的时候，把单元格的底色设置为绿色。

小结：

解决本问题，需要用的知识点：

1：MAX函数（获取单元格区域的最高值）

语法max（单元格区域）

2：Countif （统计单元格区域内，满足条件出现的次数）

Countif（单元格区域，条件）

私信 视频 可以获取54集VBA入门视频私信 VBA或 vba 可以获取文章中含VBA代码的Excle文件