Excel会计信息化教学课件 作者 刘曜 第13章分类汇总.pptVIP

教学建议： 在介绍教材13.4节内容时，注意结合教材P126思考与练习题2，将代码分成三块，设置断点分段运行宏，观察任务完成情况。 这样，可以培养学生总体进行方案设计，分步完成任务的能力。 本章编程练习题： 编程练习题5。 这里x是由代码 Sheets(商品品种或分类合计).Select x = 1 Do While Not (IsEmpty(Cells(x, 1))) x = x + 1 Loop 决定的“商品品种或分类合计”工作表第1列（“商品品种或类别编号”栏）从第1行起到第1个空行的行数，它与商品品种或类别的编号数目相联系。 由于自动填充的数据库求和公式从第2个公式起都重复一次。所以，填充区域的末行数是2 * x加或减一个调整数。 在程序的调试过程中，可以估计一个调整数，如减10，观察运行结果。不符合要求再选择其它调整数。当填充区域的末行数确定为2 * x – 4时正好符合要求。 4．代码“Application.ScreenUpdating = False”的意义在宏的开头用代码Application.ScreenUpdating = False关闭了工作表切换时界面转换的显示。 不进行这项工作也可以，删去该代码不会影响宏的执行结果。只是在宏的执行过程中工作表切换比较频繁，界面转换时感觉有点不适。 5．记录及编号的自动更新 如果销售记录发生变化，只要重新执行宏，就可以立即反映新的数据。 在使用宏时，可以在“编号目录”工作表上编号目录的末尾或中间随时添加新的商品品种或类别编号（当然也可以删除旧的编号，不过应注意各编号之间不能有空行），添加之后再执行宏，就会显示出新编号的数据。 小结： 本章代码完成的任务较复杂。在程序设计时，遇到类似情况最好做一个全面计划。考虑要完成哪些任务，先做什么后做什么，各项任务之间的关系怎样。 建议读者边编码边执行，一步一步地观察任务完成情况。这样，再复杂的问题一旦分解就会变得简单。并且，每完成一项任务您会有一种成就感，因为我们离目标的实现越来越近。 另外，有一点应注意，编完程序后一定要回过头去，认真考虑两个问题：一是有没有特殊情况，如果有该怎样处理，如检验特定单元格值那样；二是优化程序，分析一下数据结构安排是否还可以改进，能不能简化代码。 * 第13章 分类汇总  13.1 Excel分类汇总功能 示例：教材P.123 假定在一张命名为“销售记录”的工作表上反映某商场商品的销售情况 ，对数据清单分类汇总。 步骤如下： （1）分别按商品类别和商品品种排序 （2）按商品类别汇总 （3）按商品品种汇总 13.2 按品种和类别对商品编号 首先，按品种和类别对所有商品编号。如用 A101 代表食品 A10101 代表食品中的奶粉A A10102 代表食品中的奶粉B等等。 注意编号要分级进行。如食品编号为A101，奶粉A属于食品，则奶粉A的编号在A101下增加号码01，即A10101。 另外，编号前要用字母开头，否则不能进行分级汇总。 13.3 确定某类商品的分级合计 以计算图13-11中食品销售合计为例。 选择一张工作表命名为“检索标准”，根据食品的商品品种和类别编号，如A101、A10101建立检索标准。 要在某单元格（如C7）反映全部食品销售合计数，只须在该单元格中输入公式=DSUM(销售记录!B1:C5,金额,检索标准!A1:A2) 回车后，即可见所求结果35。 如果要反映食品中奶粉A销售合计数，那么将C7中的公式换为=DSUM(销售记录!B1:C5,”金额“,检索标准!A3:A4) 回车后，就得到奶粉A销售合计数20了。 可以仿照上例方便地得到某类商品任一级的合计。 示例中，食品为第一级，奶粉A、奶粉B为第二级（最低级）。 13.4 确定所有商品的分级分类合计 示例：教材P.128，完全自动地生成所有商品销售金额的分级分类合计。  选定三张工作表，分别命名为“商品品种或分类合计”、“检索标准”和“数据过渡”，并在模块表上输入下面的宏： Sub 计算商品品种或分类合计() Application.ScreenUpdating = False …End Sub 13.5 关于“计算商品品种或分类合计”宏的说明 1．自动生成检索标准的循环方式自动生成检索标准代码 x = 1 Do While Not (IsEmpty(