最新第3章+Excel+VBA对象模型-1更新.pptx

Excel VBA 程序设计刘 珺邮箱: jliu@whu.edu.cn武汉大学 计算机学院主要内容第一部分 Excel VBA开发平台概述第二部分 VBA基础知识第三部分 Excel VBA对象模型第四部分 用户界面设计第三部分 Excel VBA对象模型(1)基本概念（对象、属性、方法、事件）Excel的对象层次模型和常用对象集合对象对象变量的定义和赋值对象数组的定义和赋值使用Range对象使用Application对象使用Workbook对象使用Worksheet对象基本概念（对象、属性、方法、事件）VBA中的对象VBA通过操作不同的对象来控制Excel，对象代表应用程序中的元素Excel程序（Application）、工作薄（Workbook）、工作表（Worksheet）、单元格（Range）、图表（Chart）、窗体（Userform）等，都是对象如：对象 Range(A1) 表示当前工作表的A1单元格每个对象可以是其他对象的组成部分，也可以由其他对象组成对象具有属性、方法和事件三个要素对对象的操作就是对对象的有关属性、方法和事件的操作在Excel Vba程序设计中，就是通过读取或设置对象的属性、调用对象的方法、编写事件过程来操作Excel对象的属性什么是对象的属性每个对象都有特性，称为对象的属性（找名词和形容词）如：汽车对象有颜色，型号等属性引用方式：对象名.属性如：Range(A1).Value 表示单元格的值属性（默认属性）设置对象的属性值对象.属性=属性值如： Range(A1).Value=100 把100写入A1单元格如：Range(A2:H8).Formula = =Rand() 为区域 A2:H8 中的每个单元格设置公式，用随机数字填充该区域读取对象的属性值变量=对象.属性如： a=Range(A1).Value 把A1单元格的值赋给变量a 工作表的.name属性和 .codename属性的区别每张工作表都有两个名字工作表名（name）：工作表标签上显示的名称（如“示例2”、“成绩表”、“Sheet1”等），工作表名称是显性的代码名（codename）：代码名在工作表窗口看不到（如Sheet1、Sheet2……、表一 ），代码名是隐性的 分别对应着工作表的属性窗口的Name框和 (名称) 框两个名字的区别工作表名可以随意修改工作表标签处修改，或通过属性窗口修改用VBA语句来修改，如Sheets(1).Name=abc代码名不能用VBA代码修改，必须通过属性窗口修改工作表的.name属性和 .codename属性的区别在立即窗口分别输入Print Worksheets(1).namePrint Worksheets(3).namePrint Worksheets(示例3).codeName Print sheet3.name观察结果.name属性，显示相应的工作表名.codename属性，显示相应工作表的代码名Worksheets 表示当前工作簿中所有普通工作表的集合Worksheets(n)表示Worksheets集合里的第n个工作表Worksheets(“示例3”)表示Worksheets集合里名称为“示例3”的工作表sheet3.name表示代码名是“sheet3”的工作表的显式名称对象的属性示例示例1：取得活动工作表窗口的宽度和高度值，并重设窗口大小Sub 设置窗口大小() Dim w As Single, h As Single 声明变量 w = ActiveWindow.Width获得活动窗口宽度 h = ActiveWindow.Height获得活动窗口高度 MsgBox 当前窗口的宽度为： w _ 高度为： h 。, vbOKOnly, 提示 ActiveWindow.WindowState = xlNormal设置窗口状态 ActiveWindow.Width = 300设置窗口宽度 ActiveWindow.Height = 300设置窗口高度End Sub把红色的行用with语句改写，该怎么改？对象的方法什么是对象的方法每个对象都有方法，方法就是在对象上执行的某个动作（找动词）方法是对象本身包含的函数或过程，用于完成特定的功能如Range对象有一个方法是Select，作用是选中指定的Range对象 引用方式：对象名.方法如：Range(A1).Select 表示选中A1单元格分辨对象的属性和方法在代码窗口，按Ctrl+J（自动联想功能）对象后面输入下圆点（.），自动显示“属性/方法”列表绿色图标的项是方法手指卡片的项是属性对象的方法示例示例2：将选中单元格中的英文改为首字母大写，其他字母小写的格式Sub 首字母大写( )