把QT里tablewidget表格数据导出到Excel时程序崩溃 求解答
//获取保存路径
QString filepath=QFileDialog::getSaveFileName(this,tr("Save"),".",tr(" (*.xlsx)"));
if(!filepath.isEmpty()){
QAxObject *excel = new QAxObject(this);
//连接Excel控件
excel->setControl("Excel.Application");
//不显示窗体
excel->dynamicCall("SetVisible (bool Visible)","false");
//不显示任何警告信息。如果为true那么在关闭是会出现类似“文件已修改,是否保存”的提示
excel->setProperty("DisplayAlerts", false);
//获取工作簿集合
QAxObject *workbooks = excel->querySubObject("WorkBooks");
//新建一个工作簿
workbooks->dynamicCall("Add");
//获取当前工作簿
QAxObject *workbook = excel->querySubObject("ActiveWorkBook");
//获取工作表集合
QAxObject *worksheets = workbook->querySubObject("Sheets");
//获取工作表集合的工作表1,即sheet1
QAxObject *worksheet = worksheets->querySubObject("Item(int)",1);
int rows = ui->tableWidget1->rowCount();
for(int i=1;i<40;i++){
//设置设置某行某列
QAxObject *Range = worksheet->querySubObject("Cells(int,int)", 1, i);
Range->dynamicCall("SetValue(const QString &)",QVariant(ui->tableWidget1->horizontalHeaderItem(i-1)->text()));
for(int j=2;j<rows+2;j++)
{
QAxObject *Range = worksheet->querySubObject("Cells(int,int)", j, i);
qDebug()<<j-2<<"i="<<i-1;
if(ui->tableWidget1->item(j-2,i-1)!=NULL) Range->dynamicCall("SetValue(const QString &)",QVariant(ui->tableWidget1->item(j-2,i-1)->text()));
else Range->dynamicCall("SetValue(const QString &)",QVariant(""));
qDebug()<<j-2<<"i="<<i-1;
}
}
workbook->dynamicCall("SaveAs(const QString&)",QDir::toNativeSeparators(filepath));//保存至filepath,注意一定要用QDir::toNativeSeparators将路径中的"/"转换为"\",不然一定保存不了。
workbook->dynamicCall("Close()");//关闭工作簿
excel->dynamicCall("Quit()");//关闭excel
delete excel;
excel=NULL;
qDebug() << "\n导出成功啦!!!";
其中tablewidget1是自己建立的表格
debug时在这行报错:
Range->dynamicCall("SetValue(const QString &)",QVariant(ui->tableWidget1->horizontalHeaderItem(i-1)->text()));