《vba应用案例教程——第一章》由会员分享，可在线阅读，更多相关《vba应用案例教程——第一章（29页珍藏版）》请在金锄头文库上搜索。
1、第第 1 1 章章 VBAVBA 基础知识基础知识1.11.1 VBAVBA 及其特点及其特点一、什么是一、什么是 VBAVBA ? ?VBA（Visual Basic for Applications）是 Microsoft Office 系列的内置编程语言，即应用程序中的 VB(Visual Basic)。它“寄生于”Office 应用程序，是 Office 套装软件的一个重要组件。它面向对象（OOP） ，可视化，容易入门，可以实现日常工作的自动化。二、二、VBAVBA 编程优点编程优点1程序只起辅助作用，大部分功能用 Office 的，因此简化了程序设计。打印、文件处理、格式化和文本编辑
2、等功能不必另行设计。2通过宏录制，可以部分地实现程序设计的自动化，大大提高软件开发效率。3发行方便，只要发行含有 VBA 代码的文档或模板即可，属于绿色软件。Office 界面熟悉，便于软件推广应用。4. Office 界面对于广大计算机应用人员来说比较熟悉，符合一般操作人员的使用习惯，便于软件推广应用。5用 VBA 编程非常简单，即使非计算机专业人员，也可以很快编出自己的软件。三、三、VBAVBA 应用前景应用前景Bill Gates 说过：VBA 已经不再是单纯的技术了，它正快速地朝着一个标准化的程序开发平台的目标前进，就好像现在的Windows、Internet 的角色一样。VBA 是即
3、将兴起的、很有前途的编程语言，在 Office 环境下用VBA 开发应用软件，将成为软件开发人员和计算机应用人员首选方式。目前在众多的 Office 应用人员当中，80%以上的人，仅仅在使用这些软件 20%左右的基本功能，真正精彩的部分VBA 编程，没有被开发和使用。四、四、VBAVBA 和和 VBVB 的主要区别的主要区别1. VB 用于创建标准的应用程序，VBA 是使已有的应用程序(Office)自动化。2. VB 具有自己的开发环境，VBA 寄生于已有的应用程序(Office)。3. VB 开发出的应用程序可以是可执行文件(*.EXE)，VBA 开发的程序必须依赖于它的“父”应用程序(O
4、ffice)。1.21.2 宏宏宏（Macro） 子程序一、宏的安全性为了防止“宏病毒” ，Office 提供了一种安全保护机制，就是设置“宏”的安全性。当我们需要频繁使用带有 VBA 代码的应用软件时，完全可以把“宏”的安全性设置为“低” ，而把宏病毒与其他成千上万种病毒同样对待，用统一的防护方式和防毒工具进行防毒。二、宏的录制与执行1 1录制录制进入 Excel。在“工具|宏”菜单中选“录制新宏”项。在“录制新宏”对话框中输入宏名，单击“确定”按钮。进行需要的操作。单击“停止录制”工具栏按钮，或选择“工具|宏|停止录制”菜单结束宏录制。2 2执行执行“工具|宏|宏”菜单三、宏的编辑1.1.
5、进入编辑状态进入编辑状态“工具|宏|宏”菜单选择宏名2 2代码说明代码说明Sub、End Sub 子程序开始、结束单引号 注释With、End With 结构语句圆点 对象之间，或者对象及其属性、事件、方法、事件之间的分隔符。表示隶属关系。3 3代码修改代码修改删除注释和无关语句加入循环结构“&” 字符串连接运算符4 4编码方法编码方法录制改编四、指定宏保存的位置Excel：当前工作簿、新工作簿、个人宏工作簿。保存在当前工作簿或新工作簿 只有该工作簿打开时，相应的宏才可以用。保存在个人宏工作簿 在当前机器上多个工作簿都能使用。Word： Normal 模板、当前文档中。保存在当前文档 只有该文
6、档打开时，相应的宏才可以用。保存在 Normal 模板 在当前机器上都能使用。五、为宏指定快捷键1 1创建宏时指定快捷键创建宏时指定快捷键2 2录制宏后指定快捷键录制宏后指定快捷键“工具|宏|宏”菜单选择宏单击“选项”按钮【例 1.1】利用 Word 宏快速录入上角标。六、将宏指定给按钮在 Excel 中打开“窗体”工具栏（Word 的窗体工具栏没有“按钮” ）在工作表添加按钮为它指定宏按钮属性设置 右击七、将宏指定给图片或工具栏按钮1 1指定宏到图片指定宏到图片用“插入|图片”菜单工作表中放置图片右击图片，在快捷菜单中选“指定宏”2 2指定给指定给“工具栏按钮工具栏按钮”选择“工具|自定义”
7、菜单。在“命令”卡中，从“类别”列表框中选择“宏” ，从“命令”列表框中将“自定义按钮”拖动到任意一个工具栏上。右击该按钮，选择“指定宏” 。选择需要的宏名并单击“确定”按钮。单击“关闭”按钮。3 3从工具栏中删除自定义按钮从工具栏中删除自定义按钮选择“工具|自定义”菜单用鼠标将按钮从工具栏中拖出4 4创建新的工具栏创建新的工具栏在“自定义”对话框的“工具栏”卡中，单击“新建”按钮。输入工具栏名，单击“确定”按钮。范例范例 1-11-1 在在 WordWord 当前文档中插入多个文件的内容当前文档中插入多个文件的内容1要求将从中央电视台网站下载的 1 至 8 套节目时间表合并到一个文档中，并进
8、行格式控制。2实现步骤语句、函数的选用和程序初稿的形成录制宏 设置 3 号字、居中，输入“中央 1 套” ，回车。设置 5 号字，两端对齐” 。插入文件（01.txt） 。加工初稿得到需要的程序设置路径循环使用变量运行程序。定义快捷健、工具栏。范例范例 1-21-2 设计一个名片制作模板设计一个名片制作模板1. 页面及图文框设置进入 Word，在“页面设置”对话框中设置“纸张”宽度和高度分别为 19.5 厘米和 29.5 厘米， “页边距”上、下、左、右边距均为0.7 厘米。“插入”“文本框|横排”将“文本框”转换为“图文框”设置图文框固定宽度、高度值分别为 8.6 厘米和 5.4 厘米，无边
9、框。2. 定义“复制排版”工具按钮并进行宏录制在“录制新宏”对话框中： 指定一个宏名“复制排版” 。 指定将宏保存在当前文档。 新建工具栏“名片” ，将宏“Project.NewMacros.复制排版”拖动到新建工具栏。改名为“复制排版” 。进行宏录制：按 Ctrl+X，剪切选定的图文框。然后按十次 Ctrl+V 快捷键，将图文框粘贴十份。按 Alt+键，选中一个图文框，设置水平位置为“左侧” ，相对于“页边距” 。设置垂直位置为“底端” ，相对于“页边距” 。再按 Alt+键，选中下一个图文框，用类似的方式设置水平位置为“右侧” ，相对于“页边距” 。垂直位置为“底端” ，相对于“页边距”
10、，停止宏录制。3. 对代码进行加工和优化去掉一些用于进行默认设置的不必要语句，添加循环语句，得到“复制排版”子程序。4. 使用方法 直接用鼠标双击“名片模板”或进入 Word 2003 后，打开“名片模板” 。 在图文框中输入名片的具体内容、设置字体字号、进行排版，也可以插入图片和进行艺术加工，设计出一张名片样板。 选中名片样板图文框。 单击“名片”工具栏上的“复制排版” 按钮，Word 便自动将设计好的名片样板复制 10 份并均匀地排列在整张名片纸上。 用“文件”菜单中的“打印”命令将整联名片打印输出。1.31.3 VBAVBA 语法基础语法基础一、注释、连写和断行两种注释方式：两种注释方式
11、：(1) 使用 Rem 语句。(2) 用单引号（）号。连写：连写：在一行写几个语句，用“：”分隔。断行：断行：一个语句分开写成几行，用空白加下划线(_)。二、变量和常量1 1常用的变量数据类型常用的变量数据类型数据类型数据类型存储空间存储空间数值范围数值范围Boolean(布尔)2 字节True 或 FalseInteger(整型)2 字节-3276832767Long(长整型)4 字节-21474836482147483647Single(单精度)4 字节负值范围：-3.402823E38 -1.401298E-45 正值范围：1.401298E-45 3.402823E38Double(双
12、精度)8 字节负值范围： -1.79769313486232E308 -4.94065645841247E-324 正值范围： 4.94065645841247E-324 1.79769313486232E308Date(日期时间)8 字节日期：100 年 1 月 1 日 9999 年 12 月 31 日 时间：00:00:0023:59:59Object(对象)4 字节任何引用对象String(字符串)字符串 的长度变长字符串：0 20 亿个字符 定长字符串：1 64K 个字符2 2声明变量声明变量变量可以不经声明直接使用，但占用存储空间较大，效率较低。Dim 语句声明局部变量 声明语句放到
13、过程中，变量在过程内有效；声明语句放到模块的声明部分，变量在模块中有效。Public 语句用来声明公共变量。公共变量可用于工程中的任何过程。3 3声明数组声明数组通常用 Dim 或 Public 语句来声明。默认的下标下限是 0，用 Option Base 语句可设置为 1。例：Dim MyArray(10,10) As Integer声明了一个 11 行乘以 11 列的 Integer 型二维数组。Dim sngArray() As Single声明的是一个动态数组。4 4常量常量声明常量用 const 语句。例：Const PI As Single = 3.1415926Public Co
14、nst E As Single = 2.7182三、运算符1 1算术运算符算术运算符符号符号作用作用示例示例+加法3+5=8-减法、一元减11-6=5、-6*3=-18*乘法6*3=18/除法10/4=2.5整除196=3mod取模19 mod 6=1指数32=92 2比较运算符比较运算符符号符号名称名称用法用法大于表达式 1表达式 2=大于或等于表达式 1=表达式 2=等于表达式 1=表达式 2表达式 2Is同引用对象 1Is对象 2Like匹配于字符串 1Like字符串 2Is 运算符用来比较两个对象引用。如果两者引用的对象相同，结果为 True，否则为 False。假如 MyObject
15、、OtherObject 是两个不同的对象，执行语句Set YourObject = MyObjectSet ThisObject = MyObjectSet ThatObject = OtherObjectMyCheck1 = YourObject Is ThisObjectMyCheck2 = ThatObject Is ThisObject后，MyCheck1 返回 True，MyCheck2 返回 False。Like 运算符做字符串的方式比较。如果字符串 1 与字符串 2 匹配，则返回 True，否则返回 False。可以使用通配符、字符串列表或字符区间的任何组合匹配字符串。通配符：“?”代表任意一个字符“*”代表任意多个字符“#”代表任何一个数字（09）“charlist”代表 charlist 中任何一个字符“!charlist”代表任何一个不在 charlist 中的字符例如：MyCheck = “aBBBa“ Like “a*a“ 返回 True。MyCheck = “F“ Like “A-Z“ 返回 True。MyCheck = “F“ Like “!A-Z“ 返回 False。MyCheck = “a2a“ Like “a#a“ 返回 True。MyCheck
