资源描述:
《excel的ole操作方法》由会员上传分享,免费在线阅读,更多相关内容在应用文档-天天文库。
1、C++Builder中使用OLE控制Excel2000,必须掌握Excel2000的自动化对象及MicrosoftWordVisualBasic帮助文件中的关于Excel的对象、方法和属性。对象是一个Excel元素,属性是对象的一个特性或操作的一个方面,方法是对象可以进行的动作。首先定义以下几个变量:VariantExcelApp,Workbook1,Sheet1,Range1;1、Excel中常用的对象是:Application,Workbooks,Worksheets等。★创建应用对象★VariantExcelAp
2、p;ExcelApp=Variant::CreateObject("Excel.Application"); 或者ExcelApp=CreateOleObject("Excel.Application");★创建工作簿对象★VariantWorkBook1;WorkBook1=ExcelApp.OlePropertyGet("ActiveWorkBook");★创建工作表对象★VariantSheet1;Sheet1=WorkBook1.OlePropertyGet("ActiveSheet");★创建区域对象★ Va
3、riantRange;Range=Sheet1.OlePropertyGet("Range","A1:A10"); 或者使用Excel.Exec(PropertyGet("Range")<<"A1:C1").Exec(Procedure("Select"));2、常用的属性操作:★使Excel程序不可见★ExcelApp.OlePropertySet("Visible",(Variant)false);★新建EXCEL文件★◎新建系统模板的工作簿ExcelApp.OlePropertyGet("workbooks").
4、OleFunction("Add")//默认工作簿ExcelApp.OlePropertyGet("workbooks").OleFunction("Add",1)//单工作表ExcelApp.OlePropertyGet("workbooks").OleFunction("Add",2)//图表 ExcelApp.OlePropertyGet("workbooks").OleFunction("Add",3)//宏表ExcelApp.OlePropertyGet("workbooks").OleFunction("A
5、dd",4)//国际通用宏表ExcelApp.OlePropertyGet("workbooks").OleFunction("Add",5)//与默认的相同ExcelApp.OlePropertyGet("workbooks").OleFunction("Add",6)//工作簿且只有一个表或者使用ExcelApp的Exec方法Excel.Exec(PropertyGet("Workbooks")).Exec(Procedure("Add"));◎新建自己创建的模板的工作簿 ExcelApp.OlePropertyG
6、et("workbooks").OleFunction("Add","C:\Temp\result.xlt");★打开工作簿★ExcelApp.OlePropertyGet("workbooks").OleFunction("open","路径名.xls") ★保存工作簿★WorkBook1.OleFunction("Save");//保存工作簿WorkBook1.OleFunction("SaveAs","文件名");//工作簿保存为,路径注意用"\"★退出EXCEL★ExcelApp.OleFunction(
7、"Quit");ExcelApp=Unassigned;或者ExcelApp.Exec(Procedure("Quit"));★操作工作表★◎选择选择工作表中第一个工作表Workbook1.OlePropertyGet("Sheets",1).OleProcedure("Select");Sheet1=Workbook1.OlePropertyGet("ActiveSheet");◎重命名工作表Sheet1.OlePropertyGet("Name","Sheet的新名字"); ◎当前工作簿中的工作表总数 intnSh
8、eetCount=Workbook1.OlePropertyGet("Sheets").OlePropertyGet("Count"); ★操作行和列★◎获取当前工作表中有多少行和多少列:Sheet1.OlePropertyGet("UsedRange").OlePropertyGet("Columns").OleProperty