C++Builder 6中开发Office程序心得(一)

我们知道，缺省情况下，一个空白的Excel Workbook有三个空白的Worksheet，所以上文中我用三个ExcelWorksheet控件来连接这三个Worksheet。

我们既可以用表的名字（如“Sheet1”），也可以用表的序号（如“2”）来作为一个表的索引号。请注意V方法，它也是我定义的一个宏：

#define V TVariant

所以，它只是一个用来构造TVariant参数的宏。它和上面的TNP宏都是蛮有用的定义。

下面是一些针对Excel Worksheet的操作，不再一一详细说明。

void __fastcall TMainForm::MoveSheetBtnClick(TObject *Sender)
{
EWS1->Move(TNP, V(EWB->Worksheets->get_Item(V("Sheet3"))), 0);
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::RenameBtnClick(TObject *Sender)
{
String NewName;
InputQuery("Rename Excel Worksheet", "Input a new name", NewName);
EWS1->set_Name((WideString)NewName);
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::CreateBtnClick(TObject *Sender)
{
EWS4->ConnectTo(EWB->Sheets->
Add(TNP,V(EWB->Worksheets->get_Item(V("Sheet3"))),V(1),V(xlWorksheet)));
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::DelSheetBtnClick(TObject *Sender)
{
EWS2->Delete(0);
}

我们已经操作到了Worksheet级别，但是在我们日常操作中，接触最多的是Range（范围）和Cell（单元格），在后文我们将继续深入讨论，并讨论如何连接数据库、如何画数据图，以及如何用TExcelQueryTable加速数据导入的方法。

凌众科技专业提供服务器租用、服务器托管、企业邮局、虚拟主机等服务，公司网站：http://www.lingzhong.cn 为了给广大客户了解更多的技术信息，本技术文章收集来源于网络,凌众科技尊重文章作者的版权，如果有涉及你的版权有必要删除你的文章，请和我们联系。以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢!