excel宏专项学习24[学习].pdfVIP

下载 第24学时 运 行 过 程 在任何时候当打开或者关闭某个特定的工作簿时，如果想要运行某个特定的过程，那么 该怎么办呢？在用户激活工作簿中的工作表时，想要运行某个过程，又该怎么办呢？ E x c e l提 供了实现这些任务和其他任务的方法，这个学时就重点介绍这方面的内容。 这个学时的重点包括： • 使用E x c e l 的A u t o _ O p e n和A u t o _ C l o s e过程 • 实现事件过程 • 创建加载宏 24.1 自动运行过程 当用户打开或者关闭工作簿时，可能需要某些过程能够自动运行。 E x c e l提供的方法使得 这项任务实现起来非常简单。如果想要某个过程在工作簿打开时运行，那么把这个过程命名 为A u t o _ O p e n就可以了。 A u t o _ O p e n对于很多任务来说都非常有用： • 初始化变量的值。 • 添加菜单和工具栏按钮。 • 初始化工作表上的值。 • 显示应用程序的欢迎界面。 • 改变某些选项，比如选择网格线显示还是直接显示的选项等。 • 插入工作表。 • 执行格式设置任务。 • 从工作簿删除不需要的数据。 如果在关闭工作簿时需要运行某个过程，那么可以把这个过程命名为 A u t o _ C l o s e ，需要 在A u t o _ C l o s e过程中执行的动作的可能类型包括： • 删除不需要的工作表。 • 把工作簿以其他名称保存，以进行备份。 • 返回到已经关闭的一些显示设置，比如状态栏、网格线、工具栏等等。 每个工作簿只能够有一个 A u t o _ O p e n过程和一个A u t o _ C l o s e过程。 这两个过程的名称不区分大小写。 如果从V B A 打开工作簿，那么工作簿的两个自动过程（ A u t o _ O p e n和 A u t o _ C l o s e ）不会运行。如果想要运行这两个自动过程，请使用 R u n A u t o M a c r o s方法。 要看使用自动过程示例，请创建一个新工作簿，在新模块中创建名为 A u t o _ O p e n 的过程。 在这个自动过程中输入程序清单 2 4 - 1 中所给出的代码。 1 / 5 196使用中文Excel 2000 编程 2 4学时教程 下载 程序清单24-1 Auto_Open过程示例 1: Sub Auto_Open () 2: Range("A1").Value = "Date:" 3 : 4: Range("B1").FormulaR1C1 ="=NOW()" 5: Columns("B:B").EntireColumn.AutoFit 6 : 7: With ActiveWi n d o w 8: .DisplayHorizontalScrollBar = False 9: .DisplayVerticalScrollBar = False 10: End Wi t h 11: With Application 12: .DisplayFormulaBar = False 13: .DisplayStatusBar = False 14: End Wi t h 15: End Sub 这个过程将输入日期，关闭滚动条、公式编辑栏和状态栏。当退出工作簿时，应该把这 些初始设置恢复过来。创建A u t o _ C l o s e过程，它的代码在程序清单 2 4 - 2