excel制作透视表

场景描述:

有一张excel表,存在多条记录,现在需要把相同名称的商品的数量求和,放在一起展示

操作步骤:

请添加图片描述
请添加图片描述
请添加图片描述
删除最后一行数据
请添加图片描述
请添加图片描述
请添加图片描述
请添加图片描述
请添加图片描述
请添加图片描述
选中不显示分类汇总
请添加图片描述
以表格形式展示
请添加图片描述

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
以下是一个将Excel数据生成透视的示例BAT文件: @echo off setlocal enabledelayedexpansion rem 定义Excel文件路径 set excel_file=C:\Users\user\Desktop\data.xlsx rem 定义透视工作名称 set pivot_sheet_name=Pivot Table rem 定义数据源工作名称 set data_sheet_name=Data rem 定义透视列名称 set pivot_columns=Category,Region rem 定义透视值名称 set pivot_values=Sales rem 创建Excel应用程序对象 set excel_obj=createobject("Excel.Application") rem 设置Excel应用程序对象的Visible属性为true,以便能够看到Excel文件的操作 excel_obj.Visible=true rem 打开Excel文件 set excel_wb=excel_obj.Workbooks.Open(excel_file) rem 获取数据源工作对象 set data_sheet=excel_wb.Worksheets(data_sheet_name) rem 获取透视工作对象,如果不存在则创建 set pivot_sheet=excel_wb.Worksheets(pivot_sheet_name) if !pivot_sheet! == !Nothing! ( set pivot_sheet=excel_wb.Worksheets.Add() pivot_sheet.Name=pivot_sheet_name ) rem 获取数据源范围 set data_range=data_sheet.UsedRange rem 在透视工作中设置数据源 set pivot_range=pivot_sheet.Range("A1").Resize(!data_range.Rows.Count!,!data_range.Columns.Count!) data_range.Copy(pivot_range) rem 在透视工作中创建透视 set pivot_table=pivot_sheet.PivotTables.Add(PivotTableDestination:=pivot_sheet.Range("F1"), TableName:="MyPivotTable") rem 在透视中设置行字段 set pivot_columns_arr=!pivot_columns:~, -1! set pivot_columns_arr=!pivot_columns_arr: =,! set pivot_table.PivotFields(!pivot_columns_arr!).Orientation=xlRowField rem 在透视中设置值字段 set pivot_values_arr=!pivot_values:~, -1! set pivot_values_arr=!pivot_values_arr: =,! for %%i in (!pivot_values_arr!) do ( set pivot_value=%%i set pivot_table.AddDataField(pivot_table.PivotFields(!pivot_value!), !pivot_value!, xlSum) ) rem 保存Excel文件 excel_wb.Save rem 关闭Excel文件 excel_wb.Close rem 退出Excel应用程序 excel_obj.Quit endlocal echo Pivot Table created successfully. 在此示例中,我们首先定义了Excel文件路径、透视工作名称、数据源工作名称、透视列名称和透视值名称。然后,我们使用VBScript语法创建了Excel应用程序对象,并设置其Visible属性为true,以便能够看到Excel文件的操作。接下来,我们打开Excel文件,并获取数据源工作透视工作对象。然后,我们获取数据源范围,并在透视工作中设置数据源。接下来,我们创建透视,并在透视中设置行字段和值字段。最后,我们保存Excel文件,关闭Excel文件并退出Excel应用程序。

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值