今日代码

vba
Sub 成绩统计器()
    ' 使用变量、数组、条件语句、循环
End Sub

Sub 数据填充器()
    ' 使用Range、循环
End Sub

参考解答

1. 成绩统计器：使用数组存储分数，循环计算总分和平均分，用If判断评级。 2. 数据填充器：使用双层循环遍历行列，Cells(row, col).Value赋值。 3. 工作表处理器：For Each ws In Worksheets遍历，对每个工作表执行操作。

由在线工具箱(www.vba.net)整理制作