打开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参考