excel-vba-编程教程.docx

《excel-vba-编程教程.docx》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

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

2、运算符&、+(字符连接符)、+(加)、-（减）、Mod（取余）、（整除）、*（乘）、/（除）、-（负号）、^（指数）（3）逻辑运算符Not（非）、And（与）、Or(或)、Xor(异或)、Eqv(相等)、Imp(蕴涵)（4）关系运算符=（相同）、<>（不等）、>（大于）、<（小于）、>=（不小于）、<=（不大于）、Like、Is（5）位运算符 Not（逻辑非）、And（逻辑与）、Or（逻辑或）、Xor（逻辑异或）、Eqv（逻辑等）、Imp（隐含）第三节：数据类型VBA共有12种数据类型，具体见下表，此外用户还可以根据以下类型用Type

3、自定义数据类型。数据类型类型标识符字节字符串型String$字符长度（0-65400）字节型Byte无1布尔型Boolean无2整数型Integer%2长整数型Long&4单精度型Single！4双精度型Double#8日期型Date无8公元100/1/1-99/12/31货币型Currency@8小数点型Decimal无14变体型Variant无以上任意类型，可变对象型Object无4第四节：变量与常量（1）VBA允许使用未定义的变量，默认是变体变量（2）在模块通用说明部分，加入OptionExplicit语句可以强迫用户进行变量定义

4、（3）变量定义语句及变量作用域Dim变量as类型’定义为局部变量，如DimxyzasintegerPrivate变量as类型’定义为私有变量，如PrivatexyzasbytePublic变量as类型’定义为公有变量，如PublicxyzassingleGlobal变量as类型’定义为全局变量，如GlobalxyzasdateStatic变量as类型’定义为静态变量，如Staticxyzasdouble一般变量作用域的原则是，那部分定义就在那部分起作用，模块中定义则在该模块那作用。（4）常量为变量的一种特例，用Const定义，且定义时赋

5、值，程序中不能改变值，作用域也如同变量作用域。如下定义：ConstPi=3.1415926assingle第五节：数组数组是包含相同数据类型的一组变量的集合，对数组中的单个变量引用通过数组索引下标进行。在内存中表现为一个连续的内存块，必须用Global或Dim语句来定义。定义规则如下：Dim数组名([lowerto]upper[,[lowerto]upper,….])astype;Lower缺省值为0。二维数组是按行列排列，如XYZ(行，列)。除了以上固定数组外，VBA还有一种功能强大的动态数组，定义时无大小维数声明；在程序中再利用Re

6、dim语句来重新改变数组大小，原来数组内容可以通过加preserve关键字来保留。如下例：Dimarray1()asdouble:Redimarray1(5):array1(3)=250:Redimpreservearray1(5,10)第六节：注释和赋值语句（1）注释语句是用来说明程序中某些语句的功能和作用；VBA中有两种方法标识为注释语句。√单引号’ ;如：’定义全局变量；可以位于别的语句之尾，也可单独一行√Rem;如：Rem定义全局变量；只能单独一行（2）赋值语句是进行对变量或对象属性赋值的语句，采用赋值号=，如X=123：For

7、m1.caption=”我的窗口”对对象的赋值采用：setmyobject=object或 myobject:=object第七节：书写规范（1）VBA不区分标识符的字母大小写，一律认为是小写字母；（2）一行可以书写多条语句，各语句之间以冒号: 分开；（3）一条语句可以多行书写，以空格加下划线_ 来标识下行为续行；（4）标识符最好能简洁明了，不造成歧义。第八节：判断语句（1）If…Then…Else语句IfconditionThen[statements][Elseelsestatements]如1：IfA>BAndC

8、+2Else A=C+2如2：Ifx>250Then x=x-100或者，可以使用块形式的语法：IfconditionThen[statements][ElseIfcondition-nThen[elsei