首先在 .pro文件中增加一个配置文件,如下:
1 CONFIG += qaxcontainer #导出excel
第二步,在实现导出功能方法的 .cpp 文件中引入如下类:
1 #include
2 #include
3 #include
4 #include
5 #include
第三步,是真正的实现方法,以上所做只是为这个方法做出的铺垫,具体如下:
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;iquerySubObject("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;iquerySubObject("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;itableView_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 }