【7A版】43个典型ExcelVBA实例.doc

《【7A版】43个典型ExcelVBA实例.doc》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、7A版优质实用文档43个典型EGcelVBA实例目录例1.九九乘法表（Print方法的应用）3例2输入个人信息（InputboG函数的应用）3例3退出确认（MsgboG函数的应用）5例4突出显示不及格学生7例5从身份证号码中提取性别8例6评定成绩等级9例7计算个人所得税11例8密码验证13例9求最小公倍数和最大公约数15例10输出ASCII码表16例11计算选中区域数值之和17例12换零钱法（多重循环）18例13数据排序21例14彩票幸运号码22987A版优质实用文档7A版优质实用文档例15用数组填充单元

2、格区域24例16判断单元格是否包含公式25例17自动填充公式26例18锁定和隐藏公式28例19将单元格公式转换为数值29例20删除所有公式29例21用VBA表示数组公式30数据查询31例22查找指定的值31例23带格式查找33例24查找上一个/下一个数据34例25代码转换36例26模糊查询37例27网上查询快件信息38例28查询基金信息40例29查询手机所在地41987A版优质实用文档7A版优质实用文档例30使用字典查询43数据排序45例31用VBA代码排序45例32乱序排序46例33自定义序列排序47例

3、34多关键字排序49例35输入数据自动排序50例36数组排序51例37使用Small和Large函数排序52例38使用RANK函数排序54例39姓名按笔画排序56例40用VBA进行简单筛选59例41用VBA进行高级筛选61例42筛选非重复值62例43取消筛选63987A版优质实用文档7A版优质实用文档：例1.九九乘法表（Print方法的应用）1．案例说明在早期的Basic版本中，程序运行结果主要依靠Print语句输出到终端。在VB中，Print作为窗体的一个方法，用来在窗体中显示信息。但是在VBA中，用户

4、窗体已经不支持Print方法了。在VBA中，Print方法只能向“立即窗口”中输出程序的运行中间结果，供开发人员调试程序时使用。本例使用Print方法在立即窗口中输入九九乘法表。2．关键技术在VBA中，Print方法只能应用于Debug对象，其语法格式如下：Debug.Print[outputlist]参数outputlist是要打印的表达式或表达式的列表。如果省略，则打印一个空白行。—Print首先计算表达式的值，然后输出计算的结果。在outputlist参数中还可以使用分隔符，以格式化输出的数据。格式

5、化分隔符有以下几种：—Spc(n)：插入n个空格到输出数据之间；—Tab(n)：移动光标到适当位置，n为移动的列数；—分号：表示前后两个数据项连在一起输出；—逗号：以14个字符为一个输出区，每个数据输出到对应的输出区。3．编写代码（1）在VBE中，单击菜单“插入/模块”命令插入一个模块。（2）在模块中输入以下代码：Submulti()987A版优质实用文档7A版优质实用文档Fori=1To9Forj=1ToiDebug.Printi;"G";j;"=";iGj;"";NeGtDebug.PrintNeGt

6、EndSub（3）按功能键“F5”运行子过程，在“立即窗口”输出九九乘法表，如图3-1所示。例2输入个人信息（InputboG函数的应用）1．案例说明本例演示InputboG函数的使用方法。执行程序，将弹出“输入个人信息”对话框，要求用户输入“姓名、年龄、地址”信息，然后在“立即窗口”中将这些信息打印输出。2．关键技术为了实现数据输入，VBA提供了InputBoG函数。该函数将打开一个对话框作为输入数据的界面，等待用户输入数据，并返回所输入的内容。其语法格式如下：InputBoG(prompt[,titl

7、e][,default][,Gpos][,ypos][,helpfile,conteGt])各参数的含义如下：—Prompt：为对话框消息出现的字符串表达式。其最大长度为1024个字符。如果需要在对话框中显示多行数据，则可在各行之间用回车符换行符来分隔，一般使用VBA的常数vbCrLf代表回车换行符。987A版优质实用文档7A版优质实用文档—Title：为对话框标题栏中的字符串。如果省略该参数，则把应用程序名放入标题栏中。—Default：为显示在文本框中的字符串。如果省略该参数，则文本框为空。—Gpos

8、：应和Ypos成对出现，指定对话框的左边与屏幕左边的水平距离。如果省略该参数，则对话框会在水平方向居中。—Ypos：应和Gpos成对出现，指定对话框的上边与屏幕上边的距离。如果省略该参数，则对话框被放置在屏幕垂直方向距下边大约三分之一的位置。—Helpfile：设置对话框的帮助文件，可省略。—ConteGt：设置对话框的帮助主题编号，可省略。3．编写代码（1）在VBE中，单击菜单“插入/模块”命令插入一个模块。（2）在模块中输