zoukankan      html  css  js  c++  java
  • 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  }

     

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

  • 相关阅读:
    vlc 学习网
    delphi vlc 安装bug 处理编译错误"0" is an invalid value for the "DebugInformation" parameter of the "DCC"
    检测一组电动车电瓶好坏要多久?
    通过VLC的ActiveX进行二次开发,实现一个多媒体播放器 2011-04-10 00:57:23
    最简单的基于libVLC的例子:最简单的基于libVLC的视频播放器
    把任意的EXE嵌入到自己程序中
    http代理工具delphi源码
    2.1.2 列表常用方法
    2.1.1 列表创建与删除
    第2章 Python序列
  • 原文地址:https://www.cnblogs.com/felix-wang/p/6281558.html
Copyright © 2011-2022 走看看