68手游网

对象都有属性，可以把它当作对象的特征。例如Range(单元格区域)对象有诸如Column(列)、Row(行)、Width(列宽)和Value(值)之类的属性。Chart(图表)对象有Legend(图例)和ChartTitle(图标题)等属性。ChartTitle也是一个对象，有诸如Font(字体)，Orientation(方向)和Text(文本)等属性。Excel有很多对象，每一个都拥有自己的属性集。可编写VBA代码实现如下功能：
　　●检查对象当前的属性设置，并基于此做一些操作。
　　●改变对象的属性设置。
　　通过在对象名称之后插入句号和属性名称，可以在VBA代码中引用该属性。例如，下面的VBA语句将一个名为frequency的Range对象的Value属性设为15(即该语句使数字15显示在区域单元格中) 。
　　Range("frequency").Value=15
　　有些属性是只读的，这意味着可以检查属性，但不能改变属性。对于单一单元格的Range对象来说，Row和Column 属性都是只读属性：可以确定单元格的位置(即在哪行哪列)，但不能通过改变这些属性来改变单元格的位置。
　　Range对象还有一个Formula(公式)属性，该属性不是只读的：即可以通过改变Formula属性在单元格中插入一个公式。以下语句可以通过改变单元格的Formula属性，在单元格A11中插入一个公式：
　　Range("All").Formula = "=SUM(A1:A10)"
　　在对象层的顶端是Application对象，实际就是Excel程序。Application对象有几个有用的属性：
　　●Application.ActiveWorkbook：返回Excel中的活动工作簿(Workbook对象)。
　　●Application.ActiveSheet：返回活动工作簿的活动工作表(Worksheet对象) 。
　　●Application.ActiveCell：返回活动窗口的活动单元格(Range对象)对象。
　　●Application.Selection：返回当前在Application对象的活动窗口中被选中的对象。这些对象可能是Range、Chart、Shape，或其他被选中的对象。
　　属性可以返回对象。事实上这正是上面的例子所做的。例如，Application.ActiveCell的结果是一个Range对象。因此，可以使用以下语句访问属性：
　　Application.ActiveCell.Font.Size=15
　　此处，ActiveCell属性返回一个Range对象。Font属性返回一个Font对象，该对象包含在Range 对象中。Size是Font对象的一个属性。上面的语句将Size属性设为15——即使当前选中的单元格的字号大小为15。
　　很多情况下，可以使用多种不同方法引用相同的对象。假设有一个工作簿名为Sales.xlsx，它是唯一打开的工作簿。此外，假设该工作簿有一个叫做Summary的工作表。VBA代码可以用下列任意一种方式引用Summary工作表:
　　Workbooks("Sales.xlsx").Worksheets("Summary")
　　Workbooks(1).Worksheets(1)
　　Workbooks(1).Sheets(1)
　　Application.ActiveWorkbook.ActiveSheet
　　ActiveWorkbook.ActiveSheet
　　ActiveSheet
　　对工作空间的了解程度决定使用的方法。例如，如果已打开多个工作簿，第二种和第三种方法就不适用。如果想使用活动工作表(不管它是什么)，后面三种方法中的任意一种都可以。为绝对确保引用的是特定工作簿上的特定工作表，第一种方法是最好的选择。