QT operation on the Excel

File Description:

Online reference code changes, but due to the longer time interval if the infringement can not find the original please contact the author.
create a new file:

void FilePro::newExcel()
{
    filepath = QFileDialog::getSaveFileName(this, QString::fromLocal8Bit("Excel文件"), "..\\", tr("Microsoft Office(*.xlsx)"));//获取保存路径
    if (!filepath.isEmpty()) {
        excel = new QAxObject(this);
        excel->setControl("Excel.Application");//连接Excel控件
        excel->dynamicCall("SetVisible (bool Visible)", "false");//不显示窗体
        excel->setProperty("DisplayAlerts", false);//不显示任何警告信息。如果为true那么在关闭是会出现类似“文件已修改,是否保存”的提示

        workbooks = excel->querySubObject("WorkBooks");//获取工作簿集合
        workbooks->dynamicCall("Add");//新建一个工作簿
        workbook = excel->querySubObject("ActiveWorkBook");//获取当前工作簿
        worksheets = workbook->querySubObject("Sheets");//获取工作表集合
        worksheet = worksheets->querySubObject("Item(int)", 1);//获取工作表集合的工作表1,即sheet1
//        workbook->dynamicCall("SaveAs(const QString&)", QDir::toNativeSeparators(filepath));//保存至filepath,注意一定要用QDir::toNativeSeparators将路径中的"/"转换为"\",不然一定保存不了。
    }

}

To write data in Excel

void FilePro::setCellValue(int row, int column, const QString &value)
{
    QAxObject *pRange = worksheet->querySubObject("Cells(int,int)", row, column);
    pRange->dynamicCall("Value", value);
    //内容居中
//    pRange->setProperty("HorizontalAlignment", -4108);
//    pRange->setProperty("VerticalAlignment", -4108);
//    pRange->setProperty("RowHeight", 50); //设置单元格行高
//    pRange->setProperty("ColumnWidth", 30); //设置单元格列宽
//    pRange->setProperty("HorizontalAlignment", -4108); //左对齐(xlLeft):-4131 居中(xlCenter):-4108 右对齐(xlRight):-4152
//    pRange->setProperty("VerticalAlignment", -4108); //上对齐(xlTop)-4160 居中(xlCenter):-4108 下对齐(xlBottom):-4107
//    pRange->setProperty("WrapText", true); //内容过多,自动换行
//    pRange->dynamicCall("ClearContents()"); //清空单元格内容
//    QAxObject* interior =pRange->querySubObject("Interior");
//    interior->setProperty("Color", QColor(0, 255, 0)); //设置单元格背景色(绿色)
//    QAxObject* border = cell->querySubObject("Borders");
//    border->setProperty("Color", QColor(0, 0, 255)); //设置单元格边框色(蓝色)
//    QAxObject *font = cell->querySubObject("Font"); //获取单元格字体
//    font->setProperty("Name", QStringLiteral("华文彩云")); //设置单元格字体
//    font->setProperty("Bold", true); //设置单元格字体加粗
//    font->setProperty("Size", 20); //设置单元格字体大小
//    font->setProperty("Italic", true); //设置单元格字体斜体
//    font->setProperty("Underline", 2); //设置单元格下划线
//    font->setProperty("Color", QColor(255, 0, 0)); //设置单元格字体颜色(红色)
//    if(row == 1){
//    //加粗
//        QAxObject *font = pRange->querySubObject("Font"); //获取单元格字体
//        font->setProperty("Bold",true); //设置单元格字体加粗
//    }
}

Save Excel

void FilePro::saveExcel()
{
    workbook->dynamicCall("SaveAs(const QString&)", QDir::toNativeSeparators(filepath));
}

The release of Excel

void FilePro::freeExcel()
{
    if (excel != NULL){
        excel->dynamicCall("Quit()");
        delete excel;
        excel = NULL;
    }
}
Released four original articles · won praise 1 · views 41

Guess you like

Origin blog.csdn.net/weixin_44248637/article/details/104796638