[终稿]《excelvba程序开发自学宝典(第2版)》

《[终稿]《excelvba程序开发自学宝典(第2版)》》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、第06章编写SUB过程及开发函数VBA的主体结构就是过程。VBA包括子过程、函数过程和属性过程三种，木书主要介绍子过程（也称Sub过程）和函数过程（也称Function过程）。本章要点♦认识过程♦Sub过程♦Function过程♦关于过程参数♦开发口定义函数♦编写函数帮助6.1认识过程VBA中每一个程序都包含过程。录制的宏是一个过程，一个自定义函数也是一个过程。掌握好单个过程的编写思路，就可以纟R合成一个人屮型插件或者专业程序。6.1.1ii程的分类与调用方武过程主要分为三类：了过程、函数过程和属性过程。这三

2、类过程的格式如下。Sub子过程()EndSubFunction函数过程(mgAsRange)EndFunctionPropertyGet属性过程()AsVariantEndProperty本书主要讲述Sub子过程和Function两数过程的开发。Sub过程是VBA屮应用最广的过程，录制宏所产生的过程就是Sub过程。Sub过程的执行方式包括五种。1.【Alt+F8］执行如呆在工作表命令窗口、ThisWorkBook命令窗口或者标准模块窗口中存在Sub过程，那么在工作表界面可以通过快捷键【Alt+F8】來执行该过

3、程。假设在VBE界面中的Sheet1R码窗口中有一个Sub过程“汇总”，在模块1中有一个名为“新建菜单”的Sub过程，那么通过快捷键［Alt+F8］打开“宏”对话框后，将在对话框中产生两个町执行程序名，其中工作表命令窗口的Sub过程会连同工作表名一起出现在宏名列表中，而模块中的过程则仅仅列出过程名。用户选择目标程序并单击【执行】按钮即可启动Sub子过程。2.快捷键执行Sub过程可以与某个快捷键进行关联，在后续的使用中就可以利用这个快捷键來调用对应的过程。设置Sub过程的快捷键主要有两种方式：利用宏对话框设置及

4、用VBA代码指定。后者在本书其他章节将会讲述，在此演示一下“宏”对话框设程宏的快捷键的方法：假设VB工程中有两个名为“汇总”和“新建菜单”的Sub过程，在工作表界面中按下快捷键【Alt+F8】调岀图6」所示对话框，然后选择“新建菜单”，并单击“选项”按钮，在弹出的“宏选项”对话粧中指定快捷键，如图6.2所示。图中设计宏程序“新建菜单”的快捷键是［Ctrl+q］o图6.1''宏”对话框图6.2设置Sub过程的快捷键1.按钮执行在工作表中建一个按钮，并将按钮与Sub过程关联，从而实现单击按钮执行程序。将按钮关联到

5、Sub过程的步骤为：1•单击菜单【开发工具】一【表单控件】-＞【按钮】；2.在工作表中按下左键并向右下方拖动，从而绘制一个控件按钮；3.在弹出的对话框中选择“新建菜单”，如图6.3所示；4.返回工作表后即可单击名为“按钮1”的按钮来执行程序“新建菜单”。位所有打开的工作簿说明宏名個）:图6.3关联过程与按钮2.菜单调用最常见的是编写一个H定义菜单或者工具条來调用Sub过程。菜单与工具条的设计方法参见本书笫19章及笫20章。3.事件引发对于部分需耍口启动的程序，通常利用事件引发，不需耍人工干预。例如丄作簿开启时

6、就B动执行某程序，或者关掉窗体、鼠标移过窗体时执行某程序……对于事件过程的运用参见木书第8章。6.工作表中使用公式调用Function过程即自定义函数，可以像使川内置的工作表函数一样在公式中使川。调用Function过程的步骤如下：1.单击菜单【插入】〜【模块】;2.在模块中录入以下代码：Function成绩(rng)成绩=IIF(rng>=60,”及格"，”不及格”)EndFunction3.返回工作表中，在A1输入数值50,在B1输入公式：=成绩(A1)可以发现公式可以像内置两数一样运行，它返回“不及格”

7、，正是期望的结果。6.1.2插入过程的方式编写过程时可以手工录入代码，也可以让利用VBA提供的列表自动产牛程序外壳。-个Sub过程分为程序外壳部分和主体部分。如图6.4所示。OptionExplicitSub新逹菜单0CommandBars("cell/').Controls新菜单Delete主WithCommandBars(^cell^).Controls.Add(,1,,,True)体.Caption="新来单"部.OnAction="我苗宏"3・Style=msoButtonlconAndCaptio

8、n刀.Faceld=11EndWithEndSub图6.4Subit程的外壳与主体部分示意图具屮外売部分可以手工录入，也可以利用VBE提供的方式完成。1•非事件过程对于非事件的Sub过程，VBA提供了一个专用窗体来选择性录入过程的外壳。具体步骤如下：1.在VBE界面中单击菜单【插入】一【模块】；2.单击菜单【插入】一【过程】打开“添加过程”对话框；3.在“名称”框屮录入“汇总”，并将“类型”选择“了