在Qt中用QAxObject来操作Excel
2014-07-15 10:33
441 查看
最近写程序中需要将数据输出保存到Excel文件中。翻看《C++GUIProgrammingwithQt4》(SecondEdition)发现可以在Qt中运用ActiveX控件,这真是太好了。看了很久教程也没有学会,毕竟是新手,平时也没学过ActiveX编程。一些在VB中可以方便使用的函数在Qt中都没法儿运行。网上的方法也很多解决不了问题,还会报错。也许是版本问题吧,Qt都更新了好几次了。所以只好自己多试几次。经过摸索我的方法如下:
首先在.pro文件中添加CONFIG+=qaxcontainer
接着程序实现
[cpp]viewplain copy ?
QStringfilepath=QFileDialog::getSaveFileName(this,tr("Saveorbit"),".",tr("MicrosoftOffice2007(*.xlsx)"));//获取保存路径
if(!filepath.isEmpty()){
QAxObject*excel=newQAxObject(this);
excel->setControl("Excel.Application");//连接Excel控件
excel->dynamicCall("SetVisible(boolVisible)","false");//不显示窗体
excel->setProperty("DisplayAlerts",false);//不显示任何警告信息。如果为true那么在关闭是会出现类似“文件已修改,是否保存”的提示
QAxObject*workbooks=excel->querySubObject("WorkBooks");//获取工作簿集合
workbooks->dynamicCall("Add");//新建一个工作簿
QAxObject*workbook=excel->querySubObject("ActiveWorkBook");//获取当前工作簿
QAxObject*worksheets=workbook->querySubObject("Sheets");//获取工作表集合
QAxObject*worksheet=worksheets->querySubObject("Item(int)",1);//获取工作表集合的工作表1,即sheet1
QAxObject*cellX,*cellY;
for(inti=0;i<curRow;i++){
QStringX="A"+QString::number(i+1);//设置要操作的单元格,如A1
QStringY="B"+QString::number(i+1);
cellX=worksheet->querySubObject("Range(QVariant,QVariant)",X);//获取单元格
cellY=worksheet->querySubObject("Range(QVariant,QVariant)",Y);
cellX->dynamicCall("SetValue(constQVariant&)",QVariant(ui->tableWidget->formula(i,0).toInt()));//设置单元格的值
cellY->dynamicCall("SetValue(constQVariant&)",QVariant(ui->tableWidget->formula(i,1).toInt()));
}
workbook->dynamicCall("SaveAs(constQString&)",QDir::toNativeSeparators(filepath));//保存至filepath,注意一定要用QDir::toNativeSeparators将路径中的"/"转换为"\",不然一定保存不了。
workbook->dynamicCall("Close()");//关闭工作簿
excel->dynamicCall("Quit()");//关闭excel
deleteexcel;
excel=NULL;
}
QStringfilepath=QFileDialog::getSaveFileName(this,tr("Saveorbit"),".",tr("MicrosoftOffice2007(*.xlsx)"));//获取保存路径
if(!filepath.isEmpty()){
QAxObject*excel=newQAxObject(this);
excel->setControl("Excel.Application");//连接Excel控件
excel->dynamicCall("SetVisible(boolVisible)","false");//不显示窗体
excel->setProperty("DisplayAlerts",false);//不显示任何警告信息。如果为true那么在关闭是会出现类似“文件已修改,是否保存”的提示
QAxObject*workbooks=excel->querySubObject("WorkBooks");//获取工作簿集合
workbooks->dynamicCall("Add");//新建一个工作簿
QAxObject*workbook=excel->querySubObject("ActiveWorkBook");//获取当前工作簿
QAxObject*worksheets=workbook->querySubObject("Sheets");//获取工作表集合
QAxObject*worksheet=worksheets->querySubObject("Item(int)",1);//获取工作表集合的工作表1,即sheet1
QAxObject*cellX,*cellY;
for(inti=0;i<curRow;i++){
QStringX="A"+QString::number(i+1);//设置要操作的单元格,如A1
QStringY="B"+QString::number(i+1);
cellX=worksheet->querySubObject("Range(QVariant,QVariant)",X);//获取单元格
cellY=worksheet->querySubObject("Range(QVariant,QVariant)",Y);
cellX->dynamicCall("SetValue(constQVariant&)",QVariant(ui->tableWidget->formula(i,0).toInt()));//设置单元格的值
cellY->dynamicCall("SetValue(constQVariant&)",QVariant(ui->tableWidget->formula(i,1).toInt()));
}
workbook->dynamicCall("SaveAs(constQString&)",QDir::toNativeSeparators(filepath));//保存至filepath,注意一定要用QDir::toNativeSeparators将路径中的"/"转换为"\",不然一定保存不了。
workbook->dynamicCall("Close()");//关闭工作簿
excel->dynamicCall("Quit()");//关闭excel
deleteexcel;
excel=NULL;
}
另外附上在网上搜到的一些常用操作:
QAxWidgetexcel("Excel.Application");
1)显示当前窗口:
excel.setProperty("Visible",true);
2)更改Excel标题栏:
excel.setProperty("Caption","InvokeMicrosoftExcel");
3)添加新工作簿:
QAxObject*workbooks=excel.querySubObject("WorkBooks");
workbooks->dynamicCall("Add");
4)打开已存在的工作簿:
workbooks->dynamicCall("Open(constQString&)",QString("c:/test.xls"));
5)获取活动工作簿:
QAxObject*workbook=excel.querySubObject("ActiveWorkBook");
6)获取所有的工作表:
QAxObject*worksheets=workbook->querySubObject("WorkSheets");
7)获取工作表数量:
intintCount=worksheets->property("Count").toInt();
8)获取第一个工作表:
QAxObject*worksheet=workbook->querySubObject("Worksheets(int)",1);
9)获取cell的值:
QAxObject*range=worksheet->querySubObject("Cells(int,int)",1,1);
以上操作不一定每个都可用(都好用),仅作为参考吧。起码我第9)个就没成功,不知为何?后来我改用了Range(QVariant,QVariant)的方法来替代它。
最后附上我用QAxBase::generateDocumentation()方法获得的对应于Excel.Application的带Qt数据类型的QAxObject或者QAxWidget中可用的属性、信号和槽列表(虽然我还不大会用,不过参考下还是很好的):
相关文章推荐
- 在Qt中用QAxObject来操作Excel
- 在Qt中用QAxObject来操作Excel
- 在Qt中用QAxObject来操作Excel
- 在Qt中用QAxObject来操作Excel
- Qt操作Excel文件知识总结
- QT操作Excel
- QT 操作excel 类封装
- Qt之操作Excel
- Qt之操作Excel
- QT操作Excel
- QT之ODBC操作Excel的解决方案
- QT 操作excel 类封装(转载)
- QT操作Excel调用SaveAs保存成2003格式
- QT 操作excel 类封装
- QT 操作excel 类封装使用
- Qt通过QAxObject调用Excel[解决在非主线程无法调用的问题]
- 有关QT对Excel的操作
- qt通过odbc操作Excel
- QT 操作excel
- 使用Qt的QAxObject将Excel文件转成CSV文本文件