• 博客园logo
  • 会员
  • 众包
  • 新闻
  • 博问
  • 闪存
  • 赞助商
  • HarmonyOS
  • Chat2DB
    • 搜索
      所有博客
    • 搜索
      当前博客
  • 写随笔 我的博客 短消息 简洁模式
    用户头像
    我的博客 我的园子 账号设置 会员中心 简洁模式 ... 退出登录
    注册 登录
我是张洪铭我是熊博士
时光静好,与君同;细水长流,与君语
博客园    首页    新随笔    联系   管理    订阅  订阅

Qt 写Excel

bool ExcelIO::saveFromTable(DataTable *table, QString tablename, QString filePath)
{
    if (filePath.isEmpty() || tablename.isEmpty()){
        emit signal_SaveAsSuccess(false);
        return false;
    }
    //把"test.xlsx"中//替换为所在系统分隔符,否则路径读取会失败
    filePath = QDir::toNativeSeparators(filePath);
    HRESULT result = OleInitialize(nullptr); 
    if (result != S_OK && result != S_FALSE)
    {
        qDebug()<<QString("Could not initialize OLE (error %x)").arg(static_cast<unsigned int>(result));
    }

    QAxObject *excel = new QAxObject(this);

    excel->setControl("Excel.Application");

//    excel->dynamicCall("SetVisible(bool Visible)","false");
    excel->setProperty("DisplayAlerts", true);
    QAxObject *workBooks = excel->querySubObject("WorkBooks");
    workBooks->dynamicCall("Add");

    QAxObject *workBook = excel->querySubObject("ActiveWorkBook");
    QAxObject *workSheets = workBook->querySubObject("WorkSheets");

    QAxObject *workSheet = workSheets->querySubObject("Item(int)",1);
    workSheet->setProperty("Name",tablename);
    int column = table->columnCount();
    int row = table->rowCount();
    for (int k = 0; k < column; k++)
    {
        QString header = table->getHorHeader()->getEnglishNameByIndex(k);
        QAxObject *range = workSheet->querySubObject("Cells(int,int)",1,k+1);
        range->dynamicCall("Value",header);
    }
    for (int i = 0; i < row; i++)
    {
        for (int j = 0; j < column; j++)
        {
            QString tableitem = table->getItemData(i, j).toString();
            QAxObject *range = workSheet->querySubObject("Cells(int,int)",i+2,j+1);
            range->dynamicCall("Value",tableitem);
        }
    }

    workBook->dynamicCall("SaveAs(const QString&)",QDir::toNativeSeparators(filePath));
    workBook->dynamicCall("Close()");
    excel->dynamicCall("Quit()");
    delete excel;
    excel = nullptr;

    emit signal_SaveAsSuccess(true);
    return true;
}

 

posted @ 2019-12-30 20:55  我是张洪铭我是熊博士  阅读(608)  评论(0)    收藏  举报
刷新页面返回顶部
博客园  ©  2004-2025
浙公网安备 33010602011771号 浙ICP备2021040463号-3