自学VBA，需要熟悉的常用对象

什么是对象模型

就像厨房里的东西一样，Excel中的对象是层次分明的组织在一起，一个对象可以包含其他对象，也可以包含在其他对象里。这种对象的排列模式称为对象模型。

Workbook和Worksheet对象

一个Excel工作簿对象，可以通过对象获取到工作簿的名称，存储地址等属性，一个Workbook下可以有多个Worksheet。可以通过Worksheet调用表单内的所有单元格，对单元格进行相应的操作。

Workbook.Workseets(1).Name = 'ABC'

ActiveWorkbook和ActiveSheet对象

获取当前激活的工作簿，和获取当前激活的表单

ActiveSheet.Name = 'ABC'

Range 对象

工作表单区域对象，你可以通过Range对象获取一个单元格，也可以通过Range获取一个区域表格。可以对单元格赋值，格式调整，也可以对单元格颜色进行修改，添加规则等。

Sheets(1).Range('A1').Value = 'ABC'

With Sheets(1).Range('A1').Interior

.Pattern = xlSolid

.PatternColorIndex = xlAutomatic

.Color = 65535

.TintAndShade = 0

.PatternTintAndShade = 0

End With

With Sheets(1).Range('A1').Font

.Color = -16776961

.TintAndShade = 0

End With

Application对象

打开对象模型，你会发现最顶端的对象就是Application对象，它代表Excel程序本身，就像一颗树的根，Excel里所有的对象都以它为起点。

ScreenUpdating属性

设置屏幕更新是打开还是关闭，关闭以后所有的提示都会显示在屏幕上

DisplayAlerts属性

取消显示警告对话框，比如在删除表单的时候，如果表单里面引用了一些其他表单的内容，在你删除的时候都会收到一个警告提示，如果设置DisplayAlerts属性为Fasle，你就不会在收到提示了

EnableEvents属性

可以通过设置Application对象的EnableEvents属性来启用和禁用事件。

什么是事件？事件就是在某一种操作的时候，会除法这个事件的发生。比如打开工作簿，修改单元格值，双击单元格等事件。

WorksheetFunction属性

VBA内置函数可以通过这个属性进行调用，Excel内部函数大部分都可以在这个属性中找到，用法和Excel用法一致，

iCount = Application.WorksheetFunction.CountIf(Range('A1:B50'), '>1000')