Excel 2010 VBA 入门 089 数据处理之按指定列分拆工作表

最新推荐文章于 2024-08-19 11:42:00 发布

ngbshzhn

最新推荐文章于 2024-08-19 11:42:00 发布

阅读量790

点赞数 1

分类专栏： # Excel 2010 VBA 入门

本文链接：https://blog.csdn.net/ngbshzhn/article/details/116597650

版权

本文介绍了如何使用Excel 2010 VBA进行数据处理，通过循环遍历销售记录，根据部门字段动态创建或更新工作表，实现将不同部门的数据分拆到单独的工作表中。

摘要由CSDN通过智能技术生成

示例

如图示，该工作表为某公司销售记录，现需要将该表按照部门进行拆分，将不同部门的销售记录存放于不同的工作表中，该如何使用VBA实现？

出货日期	发票号码	部门	规格型号	单位	数量	单价（USD）	金额（USD）
2010/9/4	W-0086-0020	三部	3D7A	台	3	9.29	27.87
2010/9/15	W-0086-0021	一部	3D7A	台	7	9.29	65.03
2010/9/17	W-0086-0022	二部	3D7A	台	22	9.29	2

最低0.47元/天解锁文章

确定要放弃本次机会？

福利倒计时

: :

立减 ¥

普通VIP年卡可用

立即使用

ngbshzhn

关注关注

1
点赞
踩
3

收藏

觉得还不错? 一键收藏
打赏
2
评论
复制链接

分享到 QQ

分享到新浪微博

扫一扫

专栏目录

Excel 2010 VBA 入门 090 数据处理之动态汇总的数据查询表

复行数十步

05-11

284

示例如图所示，该工作表是某公司的销售记录。现希望建立一个查询表，能够让用户选择某一个或者两个汇总字段，当用户单击“汇总”按钮后，则按照该一列或者两列进行数量和金额的汇总。该如何实现？日期销售经理客户分类区域分配业务员回款地所属公司产品分类客户名称销售数量单价销售金额送货单号 2010/10/2 李泉二线客户天河区何月中山海天建材 HT15MM..

VBA 按照某一列进行筛选拆分数据，拆分成多个表或多个Sheet，按某列检查重复生成新的Sheet，删除除本表外的所有表

05-21

VBA 按照某一列进行筛选拆分数据，拆分成多个表或多个Sheet，按某列检查重复生成新的Sheet，删除除本表外的所有表

2 条评论您还未登录，请先登录后发表或查看评论

Excel·VBA按整列拆分工作表、工作簿

hhhhh_51的博客

11-27

2580

1，工作表按固定列数，整列拆分为工作簿；2，工作簿按单行值，整列拆分为工作簿

【VBA宏】excel按照某列分组，进行同表sheet页拆分

热门推荐

hhhhh_51的博客

01-10

1万+

1，工作表按列拆分为工作表；2，工作表按列拆分为工作簿；3，工作簿按列拆分；4，工作表按列拆分，支持多列关键值；5，工作表按列拆分，先拆分为工作簿再拆分为工作表

【Office】【VBA宏】使用宏实现表格中根据一列分类拆分到对应的sheet表中

qq_42285057的博客

04-24

1322

VBA宏实现表格拆分（根据列分类拆分到对应的sheet表中）

实用VBA：4.按列拆分工作表

周公笃行的博客

10-12

1110

公司发放奖金，仅在部门内部公示，需要将奖金发放表按部门分隔为若干个分表，分别发给各部门。表格小了还好办，手动选择、复制、粘贴、另存一遍即可解决，如果表格大、部门多、数据未按部门排序的话，手动处理工作量就会很大，通过VBA可以一键完成。

Excel 2010 VBA 入门 096 数据处理之用数组提取不重复值

复行数十步

06-29

3588

示例如图所示，该表为某公司在某月的销售数据。现希望统计该月中销售的产品类别的个数。如何利用VBA数组提取该列不重复的值，并存放于新表中？日期销售经理客户分类区域分配业务员回款地所属公司产品分类客户名称销售数量单价销售金额送货单号 2010/10/2 李泉二线客户天河区何月中山海天建材 HT15MM 金虎 1280 65 ..

Excel 2010 VBA 入门 093 数据处理之建立数组

复行数十步

05-12

687

目录示例代码数组的基本概念数组的声明数组的赋值与数组数据的读取 Ubound和Lbound函数获取数组的上下限 ForEach---Next循环遍历数组的注意事项计算程序运行的时间数组处理的极限示例如图所示，该表为某公司的产品销售记录。现需要根据规格型号建立汇总表，并根据单元格G2所示的规格型号汇总数量及金额，然后将结果存入H2和I2中。由于该表数据超过10万条，如何利用数组加快该查询？规格型号数量单价金额 ...

Excel 2010 VBA 入门 063 跨表数据录入

复行数十步

04-20

2285

目录示例实现代码 ListObject对象 ListObject对象的表示方法 1．序号表示法 2．名称表示法 ListColumn对象向ListObject中添加新数据使用VBA添加ListObject对象 Excel中数据存储的结构 (1)用输入界面的表格或者汇总形式的表格直接代替数据库存储。 (2)使用多维表（交叉表）记录数据。示例如图所示，该表为某公司供应商信息录入表以及供应商数据表。现希望在“数据输入”表中输入各个数据，然后添加至“数据表”中，如何用..

将Excel工作表按列拆分成多个Excel文件小工具

03-03

按列将表拆分成单独的Excel文件将Excel表按照指定的列分组拆分并另存为单独的Excel文件例如：A列有10条数据，汇总后是三个员工，使用小工具可以将表按照每个员工拆分成单独的Excel文件关键点： 1、小工具要与Excel文件放在同一个文件夹下； 2、标题行唯一，不能跨行； 3、以某列为的数据为标准值进行拆分，该列不能有合并单元格，可以自己选择需要拆分的列； 4、拆分完成后会按拆分列，分组生成对应的Excel文件 5、压缩文件内涵使用方法

将excel表格按A列拆分为多个文件VBA代码

02-06

使用方法： 1、将需要拆分的EXCEL文件放在一个单独的文件夹，打开这个EXCEL文件，并关闭其他打开的EXCEL文件； 2、excel表格保留一行标题行，并把第一列数据填写为拆分项（文件拆分时将按第一列的内容进行归类合并为一个文件），整个表格不要合并单元格； 3、在打开的EXCEL工作表名称上点右键选择查看代码； 4、选择菜单栏：插入-模块，将以下代码复制到右边的代码框中，点击菜单：运行-运行子过程/用户窗体,直到弹出处理完毕对话框； 5、在文件夹中将生成拆分好的文件，可关闭这个EXCEL文件，选择不保存。

工作表根据条件拆分成多个工作表

04-04

本例介绍在excel中如何将一个工作表根据条件拆分成多个工作表。

EXCEL宏将一个工作簿拆分为多个工作簿

12-26

本EXCEL宏的功能是将一个EXCEL工作簿拆分为多个EXCEL工作簿。

指定列_Excel VBA 7.48按照任意指定列拆分工作表，5秒钟解决帮你解决

weixin_32081489的博客

01-13

993

前景提要今天我们正式开始分享一些关于工作表的拆分的一些知识，前面我们已经陆陆续续的学习了很多关于工作表的合并的操作，现在我们开始进入工作表的合并的对立面-工作表的拆分，将总表按照各种要求进行花式拆分，小伙伴们准备好了，准备开车了今天我们来分享下如何按照指定列进行拆分工作表场景说明假设我们现在有一个工作表，是所有的班级的学生的考试成绩的汇总表，我们现在希望按照班级来进行分析，分析每个班级的最高分和平...

使用VBA对指定列进行拆分工作表并将工作表保存为工作簿

weixin_48155970的博客

10-27

1660

使用说明本人为初学者，根据大神的写法弄的精简版，中间出现空格可正常统计。未进行序号填充点击取消会报错其他BUG后续后继续完善 Sub 表格关键词拆分() Application.ScreenUpdating = False Dim x As Integer, y As Integer, w As Worksheet inputcol = InputBox("请输入拆分列所在序号") x = 2 y = inputcol Set w = Worksheets(1) Do While w.Ce

Excel VBA 将工作表按列拆分且生成新工作表（同个工作簿内）

zylfish的博客

01-31

1043

1. 每一行都添加了注释，因为是帮同事写的，便于不懂任何代码的人理解。需求：现在有一张工作表，需要按业务员姓名分成小的工作表，放在同一个工作簿里。2.额外写了计算程序运行时间的代码，不需要的可以删掉。

vba利用自动筛选按任意列拆分成多工作表

qq_42678477的博客

11-10

1134

Option Explicit Sub main() Dim colNo As Integer, sht As Worksheet, lastRow As Long, i As Long, flag As Boolean colNo = InputBox("col no:") Excel.Application.DisplayAlerts = Fals...

vba 利用数据透视表按指定列拆分工作表

05-27

您可以按照以下步骤使用 VBA 利用数据透视表按指定列拆分工作表： 1. 创建一个名为“PivotTable”的数据透视表，将需要拆分的列放到行区域中，需要保留的列放到值区域中。 2. 在 VBA 编辑器中，打开需要拆分的工作...