excel宏处理魔法代码，实现按月份统计销售额和按产品统计销售额

前言

在日常办公中，我们经常会遇到统计数据的问题。
今天我来给大家介绍，一秒钟生成统计数据的方法。

第一步：打开文件

按ALT + F11 打开Excel的VBA编辑器

第二步：选中左侧任意一个sheet双击

第三步：粘贴 魔法代码

Sub ProcessSalesData()
    Dim ws As Worksheet
    Dim summaryWs As Worksheet
    Dim lastRow As Long
    Dim i As Long
    Dim monthSales As Object
    Dim productSales As Object
    Dim dateKey As String
    Dim product As String
    Dim summaryRow As Long
    Dim key As Variant

    ' 设置原始数据工作表为第一个工作表
    Set ws = ThisWorkbook.Sheets(1)
    lastRow = ws.Cells(ws.Rows.Count, "A").End