qt QTableWidget&&QTableView 导出数据到excel

通常情况下,我们在开发过程中比较常用的方法是将表格的数据到处到excel文件。我也在这个点上头疼了很长时间,不过功夫不负苦心人,最终还是勉强达到效果,为了后面再次用到时不手忙脚乱现在将方法寄存在此,如果有人需要也可以借鉴;

注意:由于在qt导出的过程中分为QTableWidget导出文件到excel和QTableView导出文件到excel两个部分,所以在看这个笔记的的时候需要注意主方法程序中的注释部分,已经具体说明了部分代码的适用情况;

首先在 .pro文件中增加一个配置文件,如下:

 1 CONFIG += qaxcontainer #导出excel 

第二步,在实现导出功能方法的 .cpp 文件中引入如下类:

 

1 #include <QTableWidget>
2 #include <QFileDialog>
3 #include <QDesktopServices>
4 #include <QMessageBox>
5 #include <QAxObject>

第三步,是真正的实现方法,以上所做只是为这个方法做出的铺垫,具体如下: 

 

  1 //第一个参数是页面上的表格,第二个是导出文件的表头数据
  2  void FaJianDialog::Table2ExcelByHtml(QTableWidget *table,QString title)
  3  {
  4      QString fileName = QFileDialog::getSaveFileName(table, "保存",QStandardPaths::writableLocation(QStandardPaths::DocumentsLocation),"Excel 文件(*.xls *.xlsx)");
  5      if (fileName!="")
  6      {
  7          QAxObject *excel = new QAxObject;
  8          if (excel->setControl("Excel.Application")) //连接Excel控件
  9          {
 10              excel->dynamicCall("SetVisible (bool Visible)","false");//不显示窗体
 11              excel->setProperty("DisplayAlerts", false);//不显示任何警告信息。如果为true那么在关闭是会出现类似“文件已修改,是否保存”的提示
 12              QAxObject *workbooks = excel->querySubObject("WorkBooks");//获取工作簿集合
 13              workbooks->dynamicCall("Add");//新建一个工作簿
 14              QAxObject *workbook = excel->querySubObject("ActiveWorkBook");//获取当前工作簿
 15              QAxObject *worksheet = workbook->querySubObject("Worksheets(int)", 1);
 16 
 17              int i,j;
 18              //QTablewidget 获取数据的列数
 19              int colcount=table->columnCount();
 20               //QTablewidget 获取数据的行数
 21              int rowscount=table->rowCount()
 22 
 23              //QTableView 获取列数
 24         //int colount=ui->tableview->model->columnCount();
 25              //QTableView 获取行数
 26         //int rowcount=ui->tableview->model->rowCount();
 27 
 28              QAxObject *cell,*col;
 29              //标题行
 30              cell=worksheet->querySubObject("Cells(int,int)", 1, 1);
 31              cell->dynamicCall("SetValue(const QString&)", title);
 32              cell->querySubObject("Font")->setProperty("Size", 18);
 33              //调整行高
 34              worksheet->querySubObject("Range(const QString&)", "1:1")->setProperty("RowHeight", 30);
 35              //合并标题行
 36              QString cellTitle;
 37              cellTitle.append("A1:");
 38              cellTitle.append(QChar(colcount - 1 + 'A'));
 39              cellTitle.append(QString::number(1));
 40              QAxObject *range = worksheet->querySubObject("Range(const QString&)", cellTitle);
 41              range->setProperty("WrapText", true);
 42              range->setProperty("MergeCells", true);
 43              range->setProperty("HorizontalAlignment", -4108);//xlCenter
 44              range->setProperty("VerticalAlignment", -4108);//xlCenter
 45              //列标题
 46              for(i=0;i<colcount;i++)
 47              {
 48                  QString columnName;
 49                  columnName.append(QChar(i  + 'A'));
 50                  columnName.append(":");
 51                  columnName.append(QChar(i + 'A'));
 52                  col = worksheet->querySubObject("Columns(const QString&)", columnName);
 53                  col->setProperty("ColumnWidth", table->columnWidth(i)/6);
 54                  cell=worksheet->querySubObject("Cells(int,int)", 2, i+1);
 55                  //QTableWidget 获取表格头部文字信息
 56                  columnName=table->horizontalHeaderItem(i)->text();
 57                  //QTableView 获取表格头部文字信息
 58                  // columnName=ui->tableView_right->model()->headerData(i,Qt::Horizontal,Qt::DisplayRole).toString();
 59                  cell->dynamicCall("SetValue(const QString&)", columnName);
 60                  cell->querySubObject("Font")->setProperty("Bold", true);
 61                  cell->querySubObject("Interior")->setProperty("Color",QColor(191, 191, 191));
 62                  cell->setProperty("HorizontalAlignment", -4108);//xlCenter
 63                  cell->setProperty("VerticalAlignment", -4108);//xlCenter
 64              }
 65 
 66             //数据区
 67 
 68             //QTableWidget 获取表格数据部分
 69              for(i=0;i<rowcount;i++){
 70                  for (j=0;j<colcount;j++)
 71                  {
 72                      worksheet->querySubObject("Cells(int,int)", i+3, j+1)->dynamicCall("SetValue(const QString&)", table->item(i,j)?table->item(i,j)->text():"");
 73                  }
 74              }
 75 
 76 
 77             //QTableView 获取表格数据部分
 78             //  for(i=0;i<rowcount;i++) //行数
 79             //     {
 80             //         for (j=0;j<colcount;j++)   //列数
 81             //         {
 82             //             QModelIndex index = ui->tableView_right->model()->index(i, j);
 83             //             QString strdata=ui->tableView_right->model()->data(index).toString();
 84             //             worksheet->querySubObject("Cells(int,int)", i+3, j+1)->dynamicCall("SetValue(const QString&)", strdata);
 85             //         }
 86             //     }
 87 
 88 
 89              //画框线
 90              QString lrange;
 91              lrange.append("A2:");
 92              lrange.append(colcount - 1 + 'A');
 93              lrange.append(QString::number(table->rowCount() + 2));
 94              range = worksheet->querySubObject("Range(const QString&)", lrange);
 95              range->querySubObject("Borders")->setProperty("LineStyle", QString::number(1));
 96              range->querySubObject("Borders")->setProperty("Color", QColor(0, 0, 0));
 97              //调整数据区行高
 98              QString rowsName;
 99              rowsName.append("2:");
100              rowsName.append(QString::number(table->rowCount() + 2));
101              range = worksheet->querySubObject("Range(const QString&)", rowsName);
102              range->setProperty("RowHeight", 20);
103              workbook->dynamicCall("SaveAs(const QString&)",QDir::toNativeSeparators(fileName));//保存至fileName
104              workbook->dynamicCall("Close()");//关闭工作簿
105              excel->dynamicCall("Quit()");//关闭excel
106              delete excel;
107              excel=NULL;
108              if (QMessageBox::question(NULL,"完成","文件已经导出,是否现在打开?",QMessageBox::Yes|QMessageBox::No)==QMessageBox::Yes)
109              {
110                  QDesktopServices::openUrl(QUrl("file:///" + QDir::toNativeSeparators(fileName)));
111              }
112          }
113          else
114          {
115              QMessageBox::warning(NULL,"错误","未能创建 Excel 对象,请安装 Microsoft Excel。",QMessageBox::Apply);
116          }
117      }
118  }

 

 

 

到此,你的整个导出功能基本上就相当于完成了。

 

posted @ 2017-01-13 09:41  FelixWang  阅读(15506)  评论(7编辑  收藏  举报