用OLE操作Excel

用OLE操作Excel2010-07-03 ccrun 老妖用OLE操作Excel（目前最全的资料）（04.2.19更新）

本文档部分资料来自互联网,大部分是ccrun（老妖）在Excel中通过录制宏-->察看宏代码-->转为CB代码而来.本文档不断更新中.欢迎大家关注.

要在应用程序中控制Excel的运行,首先必须在编制自动化客户程序时包含Comobj.hpp

#include "Comobj.hpp"

C++ Builder把Excel自动化对象的功能包装在下面的四个Ole Object Class函数中,应用人员可以很方便地进行调用。

设置对象属性:void OlePropertySet（属性名,参数……）;

获得对象属性:Variant OlePropertyGet（属性名,参数……）;

调用对象方法:1） Variant OleFunction（函数名,参数……）;

2） void OleProcedure（过程名,参数……）;

在程序中可以用宏定义来节省时间：

#define PG OlePropertyGet

#define PS OlePropertySet

#define FN OleFunction

#define PR OleProcedure

举例：

ExcelApp.OlePropertyGet（"workbooks"）.OleFunction（"Add"）;

可写为

ExcelApp.PG（"workbooks"）.FN（"Add"）;

C++ Builder中使用OLE控制Excel2000,必须掌握Excel2000的自动化对象及Microsoft Word Visual Basic帮助文件中的关于Excel的对象、方法和属性。对象是一个Excel元素,属性是对象的一个特性或操作的一个方面,方法是对象可以进行的动作。---www.bianceng.cn

首先定义以下几个变量：

Variant ExcelApp,Workbook1,Sheet1,Range1;

1、Excel中常用的对象是:Application,Workbooks,Worksheets等。

★创建应用对象★

Variant ExcelApp;

ExcelApp = Variant::CreateObject （"Excel.Application"）;

或者

ExcelApp = CreateOleObject （"Excel.Application"）;

★创建工作簿对象★

Variant WorkBook1;

WorkBook1 = ExcelApp.PG（"ActiveWorkBook"）;

★创建工作表对象★

Variant Sheet1;

Sheet1 = WorkBook1.PG（"ActiveSheet"）;

★创建区域对象★

Variant Range;

Range = Sheet1.PG（"Range","A1:A10"）;

或者使用

Excel.Exec（PropertyGet（"Range"）<<"A1:C1"）.Exec（Procedure（"Select"））;