Excel VBA 快速入门.docx

1、Excel VBA 快速入门 目 录 第一章 Excel VBA 简明语言之基础 第一节 标识符 第二节 运算符 第三节 数据类型 第四节 变量与常量 第五节 数组使用 第六节 注释和赋值语句 第七节 书写规范 第八节 条件语句 第九节 循环语句 第十节 其他类语句和错误语句处理 第十一节 过程和函数 第十二节 内部函数 第二章 Excel VBA常用对象之使用 第一节 文件的操作 1) Excel文件 2) 文本文件 3) Access文件 4) 文件其它操作 第二节 工作表操作 1) 新建与删除 2) 隐藏与显示 3) 锁定与保护 第三节 单元格操作 1) 如何引用单元格和区域 2) 如何

2、处理单元格和区域 3) 单元格和区域的定位 4）单元格和区域的保护与锁定 第四节 图表的操作 1) 新建及类型 2) 设置图表的数据 3) 图表格式设置 4) 散点图增加系列和文字 5) 实例 第三章 Excel VBA高级使用 第一节 Win API的使用 1) 堀明API函数 2) 使用API函数 3) 堀明补充说明 4) 实例 第二节 Excel VBA程序的保密 1) 使用动态连接库DLL 2) 获得硬盘物理地址 3) 加密与注册 第四章 Excel VBA优化及结束语 第一节 Excel VBA优化 第二节 结束语 附录I Excel VBA对象框架图 第一章 VBA语言基础 第一节

3、 标识符 一定义 标识符是一种标识变量、常量、过程、函数、类等语言构成单位的符号，利用它可以完成对变量、常 量、过程、函数、类等的引用。 二命名规则 1） 字母打头，由字母、数字和下划线组成，如 A987b_23Abc 2） 字符长度小于 40，（Excel2002以上中文版等，可以用汉字且长度可达 254个字符） 3） 不能与 VB保留关键字重名，如 public, private, dim, goto, next, with, integer, single等 第二节 运算符 定义：运算符是代表 VB某种运算功能的符号。 1）赋值运算符 = 2）数学运算符 &、 + (字符连接符 )、 +

4、(加)、-（减）、 Mod（取余）、 （整除）、*（乘）、/（除）、-（负号）、（指数） 3）逻辑运算符 Not（非）、 And（与）、 Or（或）、 Xor（异或）、 Eqv（相等）、 Imp（隐含） 4）关系运算符 = （相同）、 （不等）、（大于）、=（不小于）、 B And C250 Then x=x-100 或者，可以使用块形式的语法： If condition Then statements ElseIf condition-n Then elseifstatements . Else elsestatements End If 如 1: If Number 10 Then Dig

5、its = 1 ElseIf Number 100 Then Digits = 2 Else Digits = 3 End If 2） Select CaseCaseEnd Case语句 如1： Select Case Pid Case “A101” Price=200 Case “A102” Price=300 Case Else Price=900 End Case 3）Choose 函数 choose(index, choce-1,choice-2,choice-n)，可以用来选择自变量串列中的一个值，并将其返回， index 必要参数，数值表达式或字段，它的运算结果是一个数值，且界于

6、1 和可选择的项目数之间。choice 必 要参数， Variant表达式，包含可选择项目的其中之一。如： GetChoice = Choose(Ind, Speedy, United, Federal) 4） Switch函数 Switch(expr-1, value-1, expr-2, value-2 _ , expr-n,value-n) switch函数和 Choose函数类似，但它是以两个一组的方式返回所要的值，在串列中，最先为 TRUE的值 会被返回。 expr 必要参数，要加以计算的 Variant 表达式。value 必要参数。如果相关的表达式为 True， 则返回此部分的数

7、值或表达式，没有一个表达式为 True， Switch 会返回一个 Null值。 第九节 循环语句 1） For Next语句 以指定次数来重复执行一组语句 For counter = start To end Step step step 缺省值为 1 statements Exit For statements Next counter 如1： For Words = 10 To 1 Step -1 建立 10 次循环 For Chars = 0 To 9 建立 10 次循环 MyString = MyString & Chars 将数字添加到字符串中 Next Chars Increme

8、nt counter MyString = MyString & 添加一个空格 Next Words 2） For EachNext语句 主要功能是对一个数组或集合对象进行，让所有元素重复执行一次语句 For Each element In group Statements Exit for Statements Next element 如1： For Each rang2 In range1 With range2.interior .colorindex=6 .pattern=xlSolid End with Next 这上面一例中用到了 WithEnd With 语句，目的是省去对象多

9、次调用，加快速度；语法为： With object statements End With 3）Doloop语句 在条件为 true时，重复执行区块命令 Do while |until condition while 为当型循环， until为直到型循环，顾名思义，不多说啦 Statements Exit do Statements Loop 或者使用下面语法 Do 先 do 再判断，即不论如何先干一次再说 Statements Exit do Statements Loop while |until condition 第十节 其他类语句和错误语句处理 一其他循环语句 结构化程序使用以上判断和循环语句已经足够，建议不要轻易使用下面的语句，虽然 VBA还支持。 1) Goto line 该语句为跳转到line语句行 2) On expression gosub destinatioinlist 或者 on expression goto destinationl