勤哲内部培训资料vba.docVIP

创建时间： CREATEDATE 2006-9-12 18:18 销售、市场人员周业务学习指南 通过VBA程序新填报表（6.6.8） VBA接口函数 newReport(报表名称) 参数：字符串，为要新填的报表名称 功能：新填指定名称的报表示例，等同于在我的工作台中选中名称后，按[新建] 应用场合 填报过程中发现缺少基础数据，需要即时补充。（可利用按钮的click事件，或worksheet的doubleClick事件） 希望一张表单保存后自动开始填报某种特定种类的表单。（可写在workbook_beforeSave事件处理程序中） 操作练习 打开示例数据库中的“订单”模板。 增加一个按钮，修改其属性：caption为“增添新客户”，name为“cmdNewCust” 打开vba编辑器，修改按钮的click事件处理程序： 保存模板。 尝试填报一张订单，当从客户名称树中找不到想要的客户名称时，可以点击此按钮，填报一个新的客户登记表。 用户自己写的vba程序执行时遇到锁定问题。 练习 在示例数据库中打开“客户分布”模板 重新设锁定口令为“123” 在模板上增加两个按钮，上面的命名为“cmdErr”，下面的命名为“cmdRight” 输入两个按钮的click事件处理程序： 保存模板 填报“客户分布”，分别点两个按钮，看看效果 打开Excel的帮助，在目录中展开“编程信息?Microsoft Excel Visual Basic参考?方法?P-Q?Protect方法”，看关于此方法的详细说明 一个利用VBA程序连续打印的例子 原始做法 小宋的客户，做周计划表，共46条生产线，每个生产线要一张周计划表，在模板上定义了一个主表和46个一模一样的明细表，以及46条一样的表间公式。称，这样做的目的是：1）所有生产线的周计划可以一次看全。2）所有生产新的周计划可以一次完整打印。 此原始模板在小宋处，要求大家都拿来导入到自己的机器上看看。 原始做法的弊端 模板太大，速度慢 虽然都显示在一张表上，但是当要具体查看某条生产线的周计划时，需要上下滚屏，不方便。 一旦周计划表的格式要调整，或增加字段，设计者的修改工作量巨大： 46个数据表需调整 46个表间公式需调整 改进的思路 模板上作两个sheet，sheet1上是46条生产线的名称，sheet2上是一张周计划表 当在sheet1上双击某条生产线时，跳到sheet2，显示该生产线的周计划内容。 周计划表只定义一次，表间公式也只定义一条。 上述做法的关键是在2）条要写vba程序 练习 在示例数据库中建立一个模板，有两个sheet（要求做的一样，包括批注） 定义数据表 定义两条表间公式 写sheet1的事件处理程序： 写Workbook的事件处理程序 保存模板 填报 双击每个大区，看反应。 打印预览，看反应。