🎯开篇引入：数据批量分组，咋一看是不是有点头大？

各位表格小伙伴们，大家好，我是 小名 呀！

你是不是经常遇到这种情况——一堆杂乱无章的数据，老板一句“按部门分一下”、“每月统计都整理出来”，咱们就得一行行复制粘贴，手头还得瞎折腾半天？

其实，用好 Excel宏功能 ，这些琐碎的分组整理任务，全都能一键搞定！

今天，小名就带你从零学会—— 用宏批量分组和整理数据 ，轻松提升效率，老板点赞就在前方等着你！

🧐1. 规划思路指导

你有没有发现，数据分组整理，往往是做报表、分析、汇总的第一步。

比如：销售流水表，咱们得按部门、产品、月份分组统计。

那问题来了，怎么规划？

• 先明确“分组字段”是什么（比如部门、日期、品类）.
• 再想想，整理的“结果”要长啥样（比如每组新建一个表单？还是在原表后面加汇总？）.
• 思考数据量大不大，手动还是自动更合适.

🗂️2. 数据表结构和分组目标

一般来说，原始表结构大致长这样：

目标 ：根据“部门”分组，分别新建表单存放每个部门的数据.

💡3. 实用建议

别一上来就瞎折腾图表，先把数据源理顺，后面才省心。

如果数据量大，建议： 全部用表格格式（Ctrl + T） ，方便后续操作。

小技巧提醒

宏操作前，记得备份原始数据，防止误操作！

📌1. 应用场景

是不是有时候，几十个部门/品类/日期，手点鼠标都能点晕？

用 宏 ，咱们一遍操作录下来，后面直接批量自动执行，分分钟搞定。

📝2. 操作步骤

步骤一：开启宏录制

1. 打开你的Excel文件.
2. 找到菜单栏上的“开发工具”——如果没显示，记得手动添加哦.
3. 点击“录制宏”按钮，给宏起个名字，比如“批量分组”.
4. 选择“存储在当前工作簿”，点确定开始录制.

步骤二：手动演示一次分组过程

1. 选中你的原始数据表.
2. 使用 数据→筛选 ，选取第一个部门的数据.
3. 复制筛选后的内容，新建一个表单，粘贴进去，并给表单命名（比如：市场部）.
4. 回到原表，清除筛选.

步骤三：停止录制宏

1. 回到“开发工具”菜单，点“停止录制”.
2. 这时候，你刚刚的所有操作都被记录下来了.

步骤四：进入VBA编辑宏代码（可选优化）

1. 按Alt + F11，进入VBA编辑界面.
2. 找到“模块”，双击刚刚录制的宏.
3. 根据需要， 用循环批量处理所有部门.

示例代码： （简化版，供参考）

'批量分组并新建表单
Sub 批量分组()
    Dim 部门集合 As Object
    Set 部门集合 = CreateObject(“Scripting.Dictionary”)
    Dim i As Long
    Dim ws As Worksheet
    Set ws = ThisWorkbook.Sheets(“原始数据”) '假设原始数据表叫这个名

    '提取所有部门
    For i = 2 To ws.Cells(ws.Rows.Count， 2).End(xlUp).Row
        If Not 部门集合.Exists(ws.Cells(i， 2).Value) Then
            部门集合.Add ws.Cells(i， 2).Value， 1
        End If
    Next i

    '为每个部门新建表单并复制数据
    Dim 部门名 As Variant
    For Each 部门名 In 部门集合.Keys
        Dim 新表 As Worksheet
        Set 新表 = ThisWorkbook.Sheets.Add(After：=ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count))
        新表.Name = 部门名
        '复制表头
        ws.Rows(1).Copy 新表.Rows(1)
        '复制该部门所有数据
        For i = 2 To ws.Cells(ws.Rows.Count， 2).End(xlUp).Row
            If ws.Cells(i， 2).Value = 部门名 Then
                ws.Rows(i).Copy 新表.Rows(新表.Cells(Rows.Count， 1).End(xlUp).Row + 1)
            End If
        Next i
    Next
End Sub

代码说明：

• 按部门批量新建表单.
• 每个表单只放自己的数据.
• 适合“分部门分表”这种业务需求.

🌈3. 最终效果

一键运行宏，所有部门都各自拥有独立表单，数据自动分好，老板再也不担心咱们“低效”啦！

小技巧提醒

宏可以反复用，下次有新数据，直接点一下就OK！

🧩1. 宏与数据透视表联动

有时候，分组只是第一步，后续还得统计汇总。

你可以把 分组宏 和 数据透视表 结合起来，实现“分组+汇总”一条龙服务。

🛠️2. 具体操作步骤

1. 按前面方法分好部门表单.
2. 在每个部门表单里，插入数据透视表，用于汇总销售额、笔数等.
3. 如果想偷懒，也可以录制一个“批量插入数据透视表”的宏.

小技巧提醒

宏的操作都可以录制出来，复杂的地方可以直接复制粘贴代码，别怕出错！

💬3. 实用技巧

• 宏可以设置快捷键，比如Ctrl + Shift + G，一键执行.
• 如果部门非常多，建议用 数组 或 字典 变量，提升效率.
• 分组字段变动时，记得同步修改宏代码里的字段列号.

📐1. 布局安排

• 原始数据建议单独放一个表单.
• 每个部门、品类单独表单，命名要规范（别让老板找半天）.
• 汇总统计可以做个总览页，方便快速查阅.

🎨2. 美化建议

• 各表单配色统一，表头加粗、居中，视觉更舒服.
• 重要数据用条件格式高亮（比如业绩低于目标的标红）.
• 汇总页可以加个小型仪表板，数据一目了然.

小技巧提醒

千万别让仪表盘太花哨，简洁大方才“高大上”！

🏅3. 实际效果

老板点开文件，每个部门数据清清楚楚，汇总结果一眼看明白。

你是不是也觉得，自己效率高了不止一点点？

重点梳理

• 明确分组字段和整理目标，提前规划，事半功倍.
• 学会用“录制宏”快速自动化分组操作，VBA代码批量更高效.
• 宏+数据透视表，批量分组和汇总两不误.
• 美化和布局要兼顾，别让数据变成“迷宫”.

练习任务

1. 用你自己的销售数据表，尝试用宏批量按“部门”分组，新建表单.
2. 在每个新表单里插入数据透视表，汇总部门销售额.
3. 给每个表单设置统一样式，加粗表头并居中.
4. 分享你的成果截图给同事，看看大家的反馈！

别再因为重复搬砖而苦恼啦！

会用宏，你就是团队里最懂自动化的“表格达人”！

记得多练多用，碰到不会的地方，留言问小名，咱们一起进步！

下次见，别忘了， 加油，老板的赞赏就在前方等着你！