43个典型excelvba实例

43个典型excelvba实例

ID:26761548

大小:310.50 KB

页数:64页

时间:2018-11-29

43个典型excelvba实例_第1页
43个典型excelvba实例_第2页
43个典型excelvba实例_第3页
43个典型excelvba实例_第4页
43个典型excelvba实例_第5页
资源描述:

《43个典型excelvba实例》由会员上传分享,免费在线阅读,更多相关内容在工程资料-天天文库

1、WORD完美资料编辑43个典型ExcelVBA实例目录例1.九九乘法表(Print方法的应用)3例2 输入个人信息(Inputbox函数的应用)3例3 退出确认(Msgbox函数的应用)5例4突出显示不及格学生7例5 从身份证号码中提取性别8例6 评定成绩等级9例7 计算个人所得税11例8 密码验证13例9 求最小公倍数和最大公约数15例10 输出ASCII码表16例11 计算选中区域数值之和17例12 换零钱法(多重循环)18例13 数据排序21例14 彩票幸运号码22例15 用数组填充单元格区域24例16判断单元格是否包含公式25例17自动填充公式26例18锁定和隐藏公式28例19

2、将单元格公式转换为数值29例20 删除所有公式29例21 用VBA表示数组公式30专业整理分享WORD完美资料编辑数据查询31例22 查找指定的值31例23 带格式查找33例24查找上一个/下一个数据34例25代码转换36例26 模糊查询37例27 网上查询快件信息38例28 查询基金信息40例29 查询手机所在地41例30 使用字典查询43数据排序45例31 用VBA代码排序45例32 乱序排序46例33 自定义序列排序47例34 多关键字排序49例35 输入数据自动排序50例36数组排序51例37使用Small和Large函数排序52例38使用RANK函数排序54例39 姓名按笔画

3、排序56例40 用VBA进行简单筛选59例41 用VBA进行高级筛选61例42筛选非重复值62例43 取消筛选63专业整理分享WORD完美资料编辑:例1.九九乘法表(Print方法的应用)1.案例说明在早期的Basic版本中,程序运行结果主要依靠Print语句输出到终端。在VB中,Print作为窗体的一个方法,用来在窗体中显示信息。但是在VBA中,用户窗体已经不支持Print方法了。在VBA中,Print方法只能向“立即窗口”中输出程序的运行中间结果,供开发人员调试程序时使用。本例使用Print方法在立即窗口中输入九九乘法表。2.关键技术在VBA中,Print方法只能应用于Debug对

4、象,其语法格式如下:Debug.Print[outputlist]参数outputlist是要打印的表达式或表达式的列表。如果省略,则打印一个空白行。—   Print首先计算表达式的值,然后输出计算的结果。在outputlist参数中还可以使用分隔符,以格式化输出的数据。格式化分隔符有以下几种:—   Spc(n):插入n个空格到输出数据之间;—   Tab(n):移动光标到适当位置,n为移动的列数;—   分号:表示前后两个数据项连在一起输出;—   逗号:以14个字符为一个输出区,每个数据输出到对应的输出区。3.编写代码(1)在VBE中,单击菜单“插入/模块”命令插入一个模块。(

5、2)在模块中输入以下代码:Submulti()   Fori=1To9       Forj=1Toi           Debug.Printi;"x";j;"=";i*j;" ";       Next       Debug.Print                                         NextEndSub(3)按功能键“F5”运行子过程,在“立即窗口”输出九九乘法表,如图3-1所示。例2 输入个人信息(Inputbox函数的应用)1.案例说明本例演示Inputbox函数的使用方法。执行程序,将弹出“输入个人信息”对话框,要求用户输入“姓名、年龄、

6、地址”信息,然后在“立即窗口”中将这些信息打印输出。专业整理分享WORD完美资料编辑2.关键技术为了实现数据输入,VBA提供了InputBox函数。该函数将打开一个对话框作为输入数据的界面,等待用户输入数据,并返回所输入的内容。其语法格式如下:InputBox(prompt[,title][,default][,xpos][,ypos][,helpfile,context])各参数的含义如下:—   Prompt:为对话框消息出现的字符串表达式。其最大长度为1024个字符。如果需要在对话框中显示多行数据,则可在各行之间用回车符换行符来分隔,一般使用VBA的常数vbCrLf代表回车换行符

7、。—   Title:为对话框标题栏中的字符串。如果省略该参数,则把应用程序名放入标题栏中。—   Default:为显示在文本框中的字符串。如果省略该参数,则文本框为空。—   Xpos:应和Ypos成对出现,指定对话框的左边与屏幕左边的水平距离。如果省略该参数,则对话框会在水平方向居中。—   Ypos:应和Xpos成对出现,指定对话框的上边与屏幕上边的距离。如果省略该参数,则对话框被放置在屏幕垂直方向距下边大约三分之一的位置。—   He

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。