Excel编程(3)----对象模型

Excel对象模型主要有以下几种：

Application 对象

表示 Excel 应用程序本身

Workbook 对象

表示 Excel 应用程序中的单个工作簿

Worksheet 对象

 表示工作表。

Range 对象

 表示Excel 内的一块区域，该对象可以是一个单元格、一行、一列、包含一个或多个单元格块（可以连续，也可以不连续）。

以上对象从上而下的关系如下：

Application --> Workbook --> Worksheet --> Range 而Range下面可以包含多个Cell（单元格）

运行如下例子，更容易理解各个对象之间的关系

    Function ExcelObjectDemo()
    
        '读取Demo.xls-->Sheet1-->A1单元格的内容
        MsgBox Application.Workbooks("Demo.xls").Worksheets("Sheet1").Range("A1").Value
        '以下代码也可以
        MsgBox Application.Workbooks("Demo.xls").Worksheets("Sheet1").Cells(1, 1).Value
        
        'ActiveWorkbook表示当前活动的Workbook
        MsgBox ActiveWorkbook.Worksheets(1).Range("A1").Value
        
    End Function

单元格读写的例子如下：

    Function ExcelCellDemo()
    
        Dim cls As String
        
        '读取Demo.xls-->Sheet1-->A1单元格的内容
        MsgBox Application.Workbooks("Demo.xls").Worksheets("Sheet1").Cells(1, 1).Value
        
        'Demo.xls-->Sheet1-->A2写入"TextValue"
        Application.Workbooks("Demo.xls").Worksheets("Sheet1").Cells(2, 1).Value = "TestValue"
        
        
    End Function