QT根据模板文件xxx.dot导出word格式xxx.docx

打开word,并创建word模板,并为模板文件要写入文件的地方添加标签。
xxx.h文件

#ifndef WORDHANDLER_H
#define WORDHANDLER_H

#include <QObject>
#include <QAxWidget>
#include <QAxObject>
#include <QDebug>
#include <QThread>
#include <QMessageBox>
#include <QFile>
#include <QFileDialog>
#include <QMutex>
#include <windows.h>

#define cout qDebug()<<"["<<__FILE__<<":"<<__LINE__<<"]"

class WordHandler : public QObject
{
    Q_OBJECT
public:
    explicit WordHandler(QObject *parent = nullptr);
    //单例程
    static WordHandler *GetInstance(){
        static QMutex mutex;
        if(!self){
            QMutexLocker locker(&mutex);
            if(!self){
                self = new WordHandler;
            }
        }
        return self;
    }

    ~WordHandler();
signals:
    void s_WordFinish(bool,QString);
public slots:
    void ExportWord(QString outFileName, QStringList itemList, QStringList textList, QStringList picitemList, QStringList picpathList);
private:
    static WordHandler* self;

};

#endif // WORDHANDLER_H

xxx.cpp文件

#include "WordHandler.h"

WordHandler* WordHandler::self = nullptr;
WordHandler::WordHandler(QObject *parent) : QObject(parent)
{
}

WordHandler::~WordHandler()
{
}

/**
* @brief        导出word
* @param        outFileName   导出路径
* @param        itemList      文字标签
* @param        textList      文字内容
* @param        picitemList   图片标签
* @param        picpathList   图片路径
* @note
*/
void WordHandler::ExportWord(QString outFileName,QStringList itemList,QStringList textList,QStringList picitemList,QStringList picpathList)
{
    QAxObject *word;
    //新建一个word应用程序,
    word = new QAxObject();//取代QAxWidget,使其在子线程中可用
    word->setControl( "word.Application" );
    //设置为不可见
    word->setProperty("Visible", false);
    // 获取所有的工作文档
    QAxObject * documents = word->querySubObject("Documents");
    // 以文件template.dot为模版新建一个文档
    documents->dynamicCall("Add(QString)",QString("D:/Template.dot"));
    // 获取当前激活的文档
    QAxObject *document=word->querySubObject("ActiveDocument");
    //获取所有标签
    QAxObject *allBookmarks = document->querySubObject("Bookmarks");
    if (!allBookmarks)
    {
        cout<<"无法获取模板中的书签";
        emit s_WordFinish(false,outFileName);
        return ;
    }

    int count = allBookmarks->property("Count").toInt();

    for (int i = count; i > 0; --i)
    {
        QAxObject *bookmark = allBookmarks->querySubObject("Item(QVariant)", i);
        QString name= bookmark->property("Name").toString();

        //插入文字
        int j=0;
        foreach(QString itemName , itemList)
        {
            if (name == itemName) {
                QAxObject *curBM = document->querySubObject("Bookmarks(QString)", name);
                curBM->querySubObject("Range")->setProperty("Text", textList.at(j));
                delete curBM;
            }
            j++;
        }

        //插入图片
        int n =0;
        foreach(QString picitemName , picitemList)
        {
            if (name == picitemName) {
                QAxObject *curBM = document->querySubObject("Bookmarks(QString)", name);
                curBM->dynamicCall("Select(void)");
                QAxObject *Inlineshapes = document->querySubObject("InlineShapes");
                Inlineshapes->dynamicCall("AddPicture(const QString&)",QDir::toNativeSeparators(picpathList.at(n)));

                //获得inlineshape对象
                QAxObject* inlineshape = document->querySubObject("InlineShapes(1)");
                //选中当前图片
                inlineshape->dynamicCall("Select(void)");
                //调整图片大小
                inlineshape->setProperty("Width", 250);
                inlineshape->setProperty("Height",200);

                delete Inlineshapes;
                delete curBM;
            }
            n++;
        }
    }

    // 将文件另存为xxx.doc,关闭工作文档,退出应用程序
    document->dynamicCall("SaveAs (const QString&)", outFileName);
    document->dynamicCall("Close (boolean)", false);
    word->dynamicCall("Quit()");

    delete document;
    delete documents;
    delete word;
}

无论QT调用word还是excel,我们只要理解这3个API即可
querySubObject(“对象名字”);//获取对象
dynamicCall(“方法名字”);//调用对象方法,可以带参数
setProperty(“属性名字”,属性值);//设置对象属性

具体的对象方法,我们可以去Microsoft官网去查看
Office VBA参考

  • 1
    点赞
  • 17
    收藏
    觉得还不错? 一键收藏
  • 1
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论 1
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值