电子表格VBA编程计算速成

《电子表格VBA编程计算速成》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、电子表格VBA编程计算速成（2）第二章 学习VBA编程基础       学会了专业函数的编程，极大地方便了在电子表格里进行函数，工程、科学计算。但要实现复杂专业计算的自动化，还需要学会对工作簿、工作表和单元格常用基本操作的编程——VBA编程：主要是学会工作簿、工作表运行环境，选项，计算，编辑，输入，输出等的代码编写。       在介绍常用编程代码之前，还是先来认识一下电子表格Excel的VBA代码编写的基本知识，这样对看懂后面的常用编程代码是很有必要的（当然，是对像我这样菜鸟级的人而言，对高手们来说也许是多余的话）。2.1 认识VBA的对象、属性、方法、事件

2、       电子表格VBA是面向对象的编程语言。因为它简单、易学，功能强大，很受编程爱好者的喜爱。       既然电子表格VBA是面向对象的编程语言，首先就要弄清电子表格VBA的对象是什么？有哪些？对象的属性、方法、事件是什么？有哪些？       一，电子表格VBA的对象       Excel应用程序（Application）范围内的设置和选项（例如“工具”菜单上“选项”对话框内的许多选项）；返回顶级对象的方法，例如ActiveCell活动单元格和ActiveSheet活动工作表等都是VBA的对象。请看帮助文件中Excel对象模型       二，电子

3、表格对象的属性、方法和事件       属性是对象本身固有的特性。如：单元格这一对象，用于存储计算数据和公式，它具有大小，字体，数据格式，填充色，边框，底纹，保护等属性。表示属性格式为：       对象名称.属性名称＝属性值，如：       ActiveCell（1，2).Value=100       对象：ActiveCell（1，2)；属性：Value=；属性值：100       方法是对象能做的事，在VBA中，对象的方法就是对象本身包含的函数和过程。调用格式为：       对象名称.方法名称，如：       Range("G6").Selec

4、t       对象：Range("G6")；方法：Select       事件是发生在对象上的事情。在VBA中，事件是预先设置的，能被对象识别的动作。如Load加载、Click鼠标单击、Workbook_Open()、Worksheet_Activate()激活工作表等。       VBA编程就是在VBA集成开发环境中通过编写代码，激发某种事件，驱动某种方法，以精心设计的流程，实现我们预期得到的结果输出。       三，电子表格VBA语句代码的基本形式       应该知道：每个VBA语句是构成VBA程序的基本单元；每个VBA语句都要实现一种功能，相关

5、的一些语句组成完成特定任务的函数或过程、子过程，将许多函数、过程和子过程通过精心设计的流程组织起来，实现我们的预定目标，这就是VBA程序。       在理解了对象、属性、方法、事件后，总结一下VBA语句的基本形式：       1， 对象.属性＝”属性值”       如：ActiveCell（1，2).Value=100  ‘对象ActiveCell（1，2)的Value值＝100       Sheet1.ScrollArea=”a1”   ‘对象Sheet1的ScrollArea滚动范围=”a1”       2，对象.属性.….属性=”属性值”   

6、    如：在Sheet1的A1单元格中创建一个公式       Worksheets("Sheet1").Range("A1").Formula="=10*RAND()"       3，对象.方法       如：激活工作表sheet1       Worksheets("Sheet1").Activate       4，对象.属性.方法       如：将工作表Sheet1上单元格区域A1:D4中的公式复制到工作表Sheet2上的单元格区域E5:H8中。       Worksheets("Sheet1").Range("A1:D4").Copy_  

7、   destination:=Worksheets("Sheet2").Range("E5")       5，对象.属性.….方法       如：将工作表Sheet1上单元格区域A1:D10中的字体大小设置为12。       Worksheets("Sheet1").Range("A1:D10").Font.Size=12       6，常用事件：    （1）Workbook_Open()：每次打开工作簿时发生。下例打开工作簿时，对窗口进行格式化。PrivateSubWorkbook_Open()，       Dimoldcaptionasstr

8、ing '用oldCaption变量保