VBA案例：多张表成绩一起汇总，多个for循环嵌套

最新推荐文章于 2025-04-02 15:11:08 发布

学习使我快乐……

最新推荐文章于 2025-04-02 15:11:08 发布

阅读量1.8k

点赞数 1

分类专栏： vba

本文链接：https://blog.youkuaiyun.com/qq_34755115/article/details/117635912

版权

本文通过VBA演示如何高效地将多张表格的成绩数据进行整合汇总，详细讲解了利用多个For循环嵌套实现数据处理的过程，帮助读者掌握VBA在实际工作中的应用技巧。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

Sub 多张工作表中成绩汇总()
    Dim Z, H2, B            'Z总分；H2行;B工作表
    Dim C1 As Worksheet     'C1为新的工作表
    For B = 1 To Worksheets.Count 'B代表工作表，每一张工作表循环一次。
        Set C1 = Worksheets(B)
        Z = 0                   '在第一次执行前总分为0
        For H2 = 2 To 11