【东方瑞通】利用VBA一键完成多表数据汇总
Excel中有许多数据分析功能能够帮助我们对单表中的数据进行分类汇总。但如果面对几十张甚至几百张工作簿的数据，要提取指定数据到一张表中，那么仅仅依靠Excel自带的功能加上手工一张一张表的复制粘贴再计算，工作量可想而知。这时我们利用Excel VBA编写指定的代码，用户只需要单击一个按钮，几分钟后即可轻松获得汇总结果。如下图所示，我们需要对五百多份问卷进行数据汇总和分析。http://115.28.154.201:1089/Content/ueditor/net/upload/2015-05-07/9cd5e95b-a12f-4c2f-abb4-16d0a1fa19cd.png每一份问卷需要提取用户的姓名、部门等信息，以及用户报名了哪些课程、勾选了哪些知识点。http://115.28.154.201:1089/Content/ueditor/net/upload/2015-05-07/65469760-a789-44ad-9bc3-496a236107b5.pnghttp://115.28.154.201:1089/Content/ueditor/net/upload/2015-05-07/8547e514-a647-4fbc-85ec-beafe86e5d30.png首先新建一张总表，与问卷文件存放在同一路径下，然后打开总表，按快捷键Alt+F11进入VBE界面，即VBA代码存放的界面。在VBE界面中，单击“插入”菜单，选择“模块”，在模块中编辑VBA代码，此处省略一万字…大家如果有别人编好后的代码，直接复制到这个模块中即可。代码以Sub 宏名() 开头，宏名是自己命名的，只要没有特殊符号，非纯数字，不重名，总之形象命名就是了。我这里宏名以 Wksht1ToSht 命名。关闭VBE界面，回到工作表界面，在“插入”选项卡下，插入一张图片或形状，也可以直接用控件来作为运行代码的按钮。右击该按钮→指定宏，选择宏名为 Wksht1ToSht 即可。http://115.28.154.201:1089/Content/ueditor/net/upload/2015-05-07/26e39e86-adb2-4843-b971-f948bcc84881.png单击“开始运行”按钮后，电脑自动运行，几分钟后，VBA汇总结果就全部呈现在我们面前了。http://115.28.154.201:1089/Content/ueditor/net/upload/2015-05-07/e6f84a28-8b55-4904-879d-28807333b9e5.pnghttp://115.28.154.201:1089/Content/ueditor/net/upload/2015-05-07/d617be0f-6aa2-4787-b032-fa709843860a.png此文出自东方瑞通彭巽言老师，转载需注明出处。
页:
[1]