PPT教程_VBA_for_Office_简单教程.pdf_大学文库

0序言某圣贤说过,人和动物的最大之不同在于人知道怎么利用工具。VBA就是一种工具,一种可以创造工具的工具。VBA提供了给你充分的自由,做几乎任何其他编程语言或者环境能做的事情,避免重复的手动劳动。当然,有太多人对编程充满了敬畏,认为编程是类似周小川做金融决策,或者爱因斯坦在思考问题那样很玄幻、难以理解的事情,更不用说运用了。但其实,这更多的是误解(我觉得这些误解源自于国内的编程教科书上那些髙深莫测的概念和诘屈聱牙的讲解)。事实上,20多年来编程正朝着越来越人性化,越来越容易学的方向发展。VBA,确切的说是VB(我在下面会解释这个微妙的差别)是众多语言中最容易学的,正如其名字一样,又” Visua1”,又” Basic”。所以大可不必担心诸如“我没有编程基础”之类的心理障碍 VBA的全称是 Visual Basic for Applications的简称。其意思是开发环境被整合到了某个应用程序的 Visual basic语言。在本教程中特指整合在 MS Office 中的VBA。(其余的还有比如 VBA for Autocad, VBa for Coreldraw)我简单的将一门编程语言分为两个大的部分,第一部分是其语法。语法规定了编程指令执行的顺序和内存的使用方式。尽管如此,语法本身不能解决任何实际的问题,这就好比你知道了英语语法,但是不懂单词和短语,就不能正确沟通一样;另一个部分我称之为“库”,就是其他人写好了的,可以完成一定功能的东西。你可以调用库的某一个部分来完成自己想做的事情。语法和库在一起合作,最终可以完成复杂的任务。对于BA来讲,使用的是ⅦB的语法(确切的说是VB6的语法, 与目前的B.Net完全不同,如果你不知道我在说什么,那么就忽略这句话好了), 采用的是COM组件这种库,库的功能是让你能操作 Office的各种功能(VB也包含一个基本的库,以完成一些常见的操作,比如访问文件,字符串操作,数学运算等。这个库的形式是Func和Sub,而不是COM)。比如代码 For i= 1 To 100 ActiveWindow. Captain =i Next 完成的工作是让当前 Office组件的窗口标题在一瞬间从1变成2,3,…,100 F0R…NXT是B规定的语法,用于循环。这些词语被称为“关键字”,你不能将关键字用于其他用途。而 ActiveWindow是指当前活动的 Windows窗口, Captain 指窗口标题,这些就是提供0 Efice功能的COM组件。关于COM组件到底是怎么工作的我会在第1章进行更详细的介绍。你可以类似的写出如下的代码: sum =0 Fori=1 To 100 sum sum + l Next

序言 1 0. 序言某圣贤说过，人和动物的最大之不同在于人知道怎么利用工具。VBA 就是一种工具，一种可以创造工具的工具。VBA 提供了给你充分的自由，做几乎任何其他编程语言或者环境能做的事情，避免重复的手动劳动。当然，有太多人对编程充满了敬畏，认为编程是类似周小川做金融决策，或者爱因斯坦在思考问题那样很玄幻、难以理解的事情，更不用说运用了。但其实，这更多的是误解（我觉得这些误解源自于国内的编程教科书上那些高深莫测的概念和诘屈聱牙的讲解）。事实上，20 多年来编程正朝着越来越人性化，越来越容易学的方向发展。VBA，确切的说是 VB（我在下面会解释这个微妙的差别）是众多语言中最容易学的，正如其名字一样，又”Visual”，又”Basic”。所以大可不必担心诸如“我没有编程基础”之类的心理障碍。 VBA 的全称是 Visual Basic for Applications 的简称。其意思是开发环境被整合到了某个应用程序的 Visual Basic 语言。在本教程中特指整合在 MS Office 中的 VBA。（其余的还有比如 VBA for AutoCAD, VBA for CorelDraw）我简单的将一门编程语言分为两个大的部分，第一部分是其语法。语法规定了编程指令执行的顺序和内存的使用方式。尽管如此，语法本身不能解决任何实际的问题，这就好比你知道了英语语法，但是不懂单词和短语，就不能正确沟通一样；另一个部分我称之为“库”，就是其他人写好了的，可以完成一定功能的东西。你可以调用库的某一个部分来完成自己想做的事情。语法和库在一起合作，最终可以完成复杂的任务。对于 VBA 来讲，使用的是 VB 的语法（确切的说是 VB6 的语法，与目前的 VB.Net 完全不同，如果你不知道我在说什么，那么就忽略这句话好了），采用的是 COM 组件这种库，库的功能是让你能操作 Office 的各种功能（VB 也包含一个基本的库，以完成一些常见的操作，比如访问文件，字符串操作，数学运算等。这个库的形式是 Func 和 Sub，而不是 COM）。比如代码： For i = 1 To 100 ActiveWindow.Captain = i Next 完成的工作是让当前 Office 组件的窗口标题在一瞬间从 1 变成 2,3,…,100。 FOR…NEXT 是 VB 规定的语法，用于循环。这些词语被称为“关键字”，你不能将关键字用于其他用途。而ActiveWindow是指当前活动的Windows窗口，Captain 指窗口标题，这些就是提供 Office 功能的 COM 组件。关于 COM 组件到底是怎么工作的我会在第 1 章进行更详细的介绍。你可以类似的写出如下的代码： sum = 0 For i = 1 To 100 sum = sum + i Next

序言 2.既然可以录制宏,为何还要手写代码?首先,宏录制的局限性很大,很多动作(比如鼠标行为)是录不下来的。另外宏只能录制顺序的多个指令如上面的比较复杂一点的循环就不可能录制。而且宏录制不能覆盖ⅤBA 的强大功能。例如ⅦBA可以直接读写文件系统中的任何文件。这些动作是录不下来的。最后,录制宏得到的代码非常死板,不灵活,而且很冗余, 如果你知道了怎么写,就会立刻抛掉这个宏录制功能。事实上 Powerpoint2007已经取消了宏录制。 3.VBA能干什么?如果你想避免重复劳动,或者需要多个文档协作,VBA是最好的选择。虽然默认下,VBA只可以操作VB自带的库和 Office的库, 但可以通过添加引用的方式来为其扩充功能。理论上VBA可以操作任何 WindOws api(代表你的 Windows能做的任意事情),和任意用COM封装的组件。比如像 Acrobat, EndNote等都是这么做的。它们可以使自身的功能和办公紧密结合。如果你高兴,大可以写一个Word用的聊天插件 4.VBA不能干什么?什么时候不适合使用VBA?VBA的功能取决于其库。如果没有库提供一个功能(比如让 Excel一个单元格显示一副图片),那么 VBA也不能帮你。此外,你还可以用VBA编写插件来完成普通 Office不能完成的功能。此外,如果你开发的项目过于庞大,则应该换一门更专业的编程平台(比如.Net),以便更好的组织代码和査错。VBA比较适合短小的,与工作任务很直接的问题。 5.VBA能访问某个文本文件么?当然可以。VBA直接提供OPEN关键字来访问文件。 VBA能模拟键盘输入么?当然可以。VBA直接提供 SendKeys函数来做到这 7.VBA会被保存在哪里?VBA是保存在 Office文档中的,具体可以是某一个文档,或者某一个文档的模板中。具体的位置需要在工程视图中选择(如上图)。如果你希望一批文档都能用到同一个功能,最好先写个模板,然后将ⅦBA写到模板里。然后利用此模板来生成多个文档。当然,VBA代码也可以单独导出保存。在工程视图中右键单击某一个模块然后点“导出文件”即可。 8.不同 Office组件可以互操作么?当然可以。VBA的功能是由COM库来添加的。默认情况下某一个 Office组件只引用了当前这个组件的库。但是你也可以手动添加其他库的引用。在VBA开发环境的“工具”菜单里点击 “引用”,就可以添加 Windows上安装的任意COM组件。这样,不光不同 Office组件可以互操作,你可以操作比如 Media Player,IE等程序。 9.VBA可以写图形界面么?当然可以。不然就说不上” Visua1”了。WB一向支持一种被称为 UserFor皿的模块。你可以在上面添加各种控件。 10.VBA还提供哪些其他的功能?VBA可以捕捉 Office的事件,于是可以编写如“当打开一个文档,要做某事”;“当 Excel计算发生了错误,则做某事”这样的程序。VBA还有定时器,让你可以做周期性的工作。 1.除了VBA,还有哪些开发平台可以操作0 ffice?实际上,任何可以使用 COM组件的语言都可以访问 Office的功能。在微软平台上的各种语言基本上都满足这个条件。不过有几个平台是专门针对0 ffice的。如.Net上的WST0( Visual studio Tools for Office Developers)。这是一个利用 Visual studio进行 Office开发的集合环境,适合大型项目。不过为

序言 4 2. 既然可以录制宏，为何还要手写代码？首先，宏录制的局限性很大，很多动作（比如鼠标行为）是录不下来的。另外宏只能录制顺序的多个指令，如上面的比较复杂一点的循环就不可能录制。而且宏录制不能覆盖 VBA 的强大功能。例如 VBA 可以直接读写文件系统中的任何文件。这些动作是录不下来的。最后，录制宏得到的代码非常死板，不灵活，而且很冗余。如果你知道了怎么写，就会立刻抛掉这个宏录制功能。事实上 PowerPoint2007 已经取消了宏录制。 3. VBA 能干什么？如果你想避免重复劳动，或者需要多个文档协作，VBA 是最好的选择。虽然默认下，VBA 只可以操作 VB 自带的库和 Office 的库，但可以通过添加引用的方式来为其扩充功能。理论上 VBA 可以操作任何 Windows API（代表你的 Windows 能做的任意事情），和任意用 COM 封装的组件。比如像 Acrobat，EndNote 等都是这么做的。它们可以使自身的功能和办公紧密结合。如果你高兴，大可以写一个 Word 用的聊天插件:) 4. VBA 不能干什么？什么时候不适合使用 VBA？VBA 的功能取决于其库。如果没有库提供一个功能（比如让 Excel 一个单元格显示一副图片），那么 VBA 也不能帮你。此外，你还可以用 VBA 编写插件来完成普通 Office 不能完成的功能。此外，如果你开发的项目过于庞大，则应该换一门更专业的编程平台（比如.Net），以便更好的组织代码和查错。VBA 比较适合短小的，与工作任务很直接的问题。 5. VBA 能访问某个文本文件么？当然可以。VBA 直接提供 OPEN 关键字来访问文件。 6. VBA 能模拟键盘输入么？当然可以。VBA 直接提供 SendKeys 函数来做到这一点。 7. VBA 会被保存在哪里？VBA 是保存在 Office 文档中的，具体可以是某一个文档，或者某一个文档的模板中。具体的位置需要在工程视图中选择（如上图）。如果你希望一批文档都能用到同一个功能，最好先写个模板，然后将 VBA 写到模板里。然后利用此模板来生成多个文档。当然，VBA 代码也可以单独导出保存。在工程视图中右键单击某一个模块然后点“导出文件”即可。 8. 不同 Office 组件可以互操作么？当然可以。VBA 的功能是由 COM 库来添加的。默认情况下某一个 Office 组件只引用了当前这个组件的库。但是你也可以手动添加其他库的引用。在 VBA 开发环境的“工具”菜单里点击 “引用”，就可以添加 Windows 上安装的任意 COM 组件。这样，不光不同 Office 组件可以互操作，你可以操作比如 Media Player，IE 等程序。 9. VBA 可以写图形界面么？当然可以。不然就说不上”Visual”了。VB 一向支持一种被称为 UserForm 的模块。你可以在上面添加各种控件。 10.VBA 还提供哪些其他的功能？VBA 可以捕捉 Office 的事件，于是可以编写如“当打开一个文档，要做某事”；“当 Excel 计算发生了错误，则做某事”这样的程序。VBA 还有定时器，让你可以做周期性的工作。 11.除了 VBA，还有哪些开发平台可以操作 Office？实际上，任何可以使用 COM 组件的语言都可以访问 Office 的功能。在微软平台上的各种语言基本上都满足这个条件。不过有几个平台是专门针对 Office 的。如.Net 上的 VSTO（Visual Studio Tools for Office Developers)。这是一个利用 Visual Studio 进行 Office 开发的集合环境，适合大型项目。不过为

基本编程元素 1.基本编程元素这一期就是要介绍在ⅦBA环境下你能使用什么东西。一般来讲,新手往往对到底写什么会引起什么结果感到比较混乱。比如写 MsgBox可以出现对话框,但写 MessageBox为什么就不可以。在VBA中,直接写代码,而不是在Sub里写就会报错?为何是Sub,而不是Suc,不是Sud?等等。我会将最常见的做概要性的讲解。但是我不会深入去介绍每个细节的语法。精简够用就好。如果有必要,你可以查任何的关于VB的参考手册。 Sub与 Function 最基本的问题是:如果你写了很多模块,每个模块有很多代码,那么你的程序代码是从哪一句开始执行?答案是,VB将代码组成一段一段的,每段从头到尾执行(当然,这是粗略的说,因为代码还可能有跳转和循环)。每一段叫做一个 Sub或着一个 Function。Sub是子过程“ Subroutine”的简称。比如像如下的代码就定义了一个Sub Sub Testo MsgBox Hello"Show Hello with a messagebox End Sub 其中”Sub”这个关键字标志着Sub的开始, End Sub则表示其结束。其中的Sub 和 End Sub是关键字。所谓关键字就是VB定义好的,有特殊意义的词汇。在写代码时不可以写错一个字母,否则就不被程序解释器接受(但是你可以不区分大小写,VBA开发环境会自动帮你调整)。如果你在开发环境中写了这段代码就会发现关键字都被表为蓝色。其他的,如For,Next,If,Then, While等都是关键字。以上代码中的Test是一个名称,即这个Sub的名称。你可以随意定义这个名称,只要其不包含一些特别的符号,并且不和关键字重名(注意:绝对不能包含空白字符,如空格或制表符)。写完这段代码后,在 Office的“宏”对话框列表里就能看到一项“Test”了。代码中的括号是用于定义参数的。如果想在 Sub/ Function上加输入参数,都是在括号中写一个列表,即参数名1As类型1,参数名2As类型2,… 参数和类型在下面的“变量与类型”一节更详细的介绍。即使没有参数也要写个空括号来占位置。这是VB的要求。之后,当你将键盘光标放在这个Sub里,并点击上面的绿色箭头;或者到“宏”对话框执行Test,这个Sub就被执行了。另外值得注意的是单引号后边的文字,称为注释。VB中所有写在单引号后边的文字都会被解释器忽略掉,它们仅仅是给人看的。所以你可以在写代码时加上注释,方便其他人看懂你的程序

基本编程元素 6 1. 基本编程元素这一期就是要介绍在 VBA 环境下你能使用什么东西。一般来讲，新手往往对到底写什么会引起什么结果感到比较混乱。比如写 MsgBox 可以出现对话框，但写 MessageBox 为什么就不可以。在 VBA 中，直接写代码，而不是在 Sub 里写就会报错？为何是 Sub，而不是 Suc，不是 Sud？等等。我会将最常见的做概要性的讲解。但是我不会深入去介绍每个细节的语法。精简够用就好。如果有必要，你可以查任何的关于 VB 的参考手册。  Sub 与 Function 最基本的问题是:如果你写了很多模块，每个模块有很多代码，那么你的程序代码是从哪一句开始执行？答案是，VB 将代码组成一段一段的，每段从头到尾执行（当然，这是粗略的说，因为代码还可能有跳转和循环）。每一段叫做一个 Sub 或着一个 Function。Sub 是子过程“Subroutine”的简称。比如像如下的代码就定义了一个 Sub。 Sub Test() MsgBox "Hello" 'Show Hello with a messagebox End Sub 其中”Sub”这个关键字标志着 Sub 的开始，End Sub 则表示其结束。其中的 Sub 和 End Sub 是关键字。所谓关键字就是 VB 定义好的，有特殊意义的词汇。在写代码时不可以写错一个字母，否则就不被程序解释器接受（但是你可以不区分大小写，VBA 开发环境会自动帮你调整）。如果你在开发环境中写了这段代码就会发现关键字都被表为蓝色。其他的，如 For，Next，If，Then，While 等都是关键字。以上代码中的 Test 是一个名称，即这个 Sub 的名称。你可以随意定义这个名称，只要其不包含一些特别的符号，并且不和关键字重名（注意：绝对不能包含空白字符，如空格或制表符）。写完这段代码后，在 Office 的“宏”对话框列表里就能看到一项“Test”了。代码中的括号是用于定义参数的。如果想在 Sub/Function 上加输入参数，都是在括号中写一个列表，即参数名 1 As 类型 1，参数名 2 As 类型 2，... 参数和类型在下面的“变量与类型”一节更详细的介绍。即使没有参数也要写个空括号来占位置。这是 VB 的要求。之后，当你将键盘光标放在这个 Sub 里，并点击上面的绿色箭头；或者到“宏”对话框执行 Test，这个 Sub 就被执行了。另外值得注意的是单引号后边的文字，称为注释。VB 中所有写在单引号后边的文字都会被解释器忽略掉，它们仅仅是给人看的。所以你可以在写代码时加上注释，方便其他人看懂你的程序

基本编程元素比如上面的Sub“Test”调用了VB已经定义好的 MsgBox这个 Function来完成工作(是不是觉得 MsgBox应该是一个Sub?实际上 MsgBox会返回一个整数值表示用户是按哪个键关闭对话框的,比如“确定”,“取消”,“重试”等。只不过在最简单的情况下我们不关心这个返回值罢了)。另外,我们也可以写一个程序让Test调用Add Sub Testo sum Add(3, 4) MsgBox sum End Sub 这样就能用对话框显示3与4的和了。在实践当中,Sub一般用于执行某个动作; 而 Function则在 Excel自定义函数中特别有用。VB为开发者提供了一个很大的库,即你可以直接使用许许多多的Sub和 Function来完成常见的任务(这和 Office库无关),比如字符串操作的 Substr,Trim,Len:;文件操作的Dir, Write; 数学运算的Log,Sqr等。完整的清单可以在任何一本VB的参考手册上找到。 ●变量与类型我们在算数的时候需要草稿纸,将计算的中间结果记录下来。计算机算数也不例外,也得需要在内存中开辟一些空间来记录这些内容。定义一块空间的方法的代码是 Dim var 或者 Dim var As Type 或者就像上文Test中的sⅧ那样不经定义直接使用。其中Dim和As是关键字, 而var就是变量名。你可以随意定义变量名称,只要其不包含一些特别的符号, 并且不和关键字重名。既然是分配一块内存空间,那么分配空间有多大呢,又是怎么使用的呢?这就由类型来定义了。一个类型规定了要分配的空间的大小和内部结构,比如 Integer整数就分配2个Byte(所以其范围是-3276832767) 而Long长整型数分配4Byte; Double双精浮点数(小数)就分配8个Byte; String 字符串的长度就是其存储字符串长度+一块用于存放字符串的长度的额外空间。以上这些类型由VB定义,被称为基本类型(还有其它几个基本类型可以使用) VB会尽可能在你混用这些基本类型时进行自动转换。比如: Dim str As String Dim n As Integer str= 12 now str is 12 n=34now n is 34 n= 23. 45 ' now n is 23

基本编程元素 8 比如上面的 Sub “Test” 调用了 VB 已经定义好的 MsgBox 这个 Function 来完成工作(是不是觉得 MsgBox 应该是一个 Sub？实际上 MsgBox 会返回一个整数值表示用户是按哪个键关闭对话框的，比如“确定”，“取消”，“重试”等。只不过在最简单的情况下我们不关心这个返回值罢了）。另外，我们也可以写一个程序让 Test 调用 Add。 Sub Test() sum = Add(3,4) MsgBox sum End Sub 这样就能用对话框显示 3 与 4 的和了。在实践当中，Sub 一般用于执行某个动作；而 Function 则在 Excel 自定义函数中特别有用。VB 为开发者提供了一个很大的库，即你可以直接使用许许多多的 Sub 和 Function 来完成常见的任务（这和 Office 库无关），比如字符串操作的 Substr，Trim，Len；文件操作的 Dir，Write；数学运算的 Log，Sqr 等。完整的清单可以在任何一本 VB 的参考手册上找到。  变量与类型我们在算数的时候需要草稿纸，将计算的中间结果记录下来。计算机算数也不例外，也得需要在内存中开辟一些空间来记录这些内容。定义一块空间的方法的代码是： Dim var 或者 Dim var As Type 或者就像上文 Test 中的 sum 那样不经定义直接使用。其中 Dim 和 As 是关键字，而 var 就是变量名。你可以随意定义变量名称，只要其不包含一些特别的符号，并且不和关键字重名。既然是分配一块内存空间，那么分配空间有多大呢，又是怎么使用的呢？这就由类型来定义了。一个类型规定了要分配的空间的大小和内部结构，比如 Integer 整数就分配 2 个 Byte（所以其范围是-32768 ~ 32767）；而 Long 长整型数分配 4Byte；Double 双精浮点数（小数）就分配 8 个 Byte；String 字符串的长度就是其存储字符串长度+一块用于存放字符串的长度的额外空间。以上这些类型由 VB 定义，被称为基本类型（还有其它几个基本类型可以使用）。 VB 会尽可能在你混用这些基本类型时进行自动转换。比如： Dim str As String Dim n As Integer str = 12 'now str is "12" n = "34" 'now n is 34 n = 23.45 'now n is 23