Qt 向word中插入文字（使用QAxWidget和QAxObject）

1. pro 文件中要加入   

        CONFIG += qaxcontainer   

       2. main.cpp

#include <QApplication>
#include <QAxWidget>
#include <QAxObject>

int main(int argc, char* argv[])
{
     QApplication app(argc, argv);
     QAxWidget *word=new QAxWidget("Word.Application", 0, Qt::MSWindowsOwnDC);
     word->setProperty("Visible", true);
     // 获取所有的工作文档
     QAxObject * documents = word->querySubObject("Documents");
     // 以文件template.doc为模版新建一个文档
     documents->dynamicCall("Add(QString)",QString::fromLocal8Bit("D:/doc/template.doc"));
     // 获取当前激活的文档
     QAxObject *document=word->querySubObject("ActiveDocument");

     // 获取文档中名字为text的标签
     QAxObject*bookmark_text=document->querySubObject("Bookmarks(QVariant)","text");
     // 选中标签，将字符InsertText插入到标签位置
     if(!bookmark_text->isNull()){
     bookmark_text->dynamicCall("Select(void)");
     bookmark_text->querySubObject("Range")->setProperty("Text","InsertText");
     }

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

    return app.exec();
}

http://blog.csdn.net/zbc415766331/article/details/36396159

网上关于qt操作word的资料实在是太少了，搞了半天终于能在word 表格中插入标签的地方插入图片了。

1.在pro中加入

CONFIG   += qaxcontainer

2.main.cpp

#include <QApplication>
#include <QAxWidget>
#include <QAxObject>

int main(int argc, char* argv[])
{
     QApplication app(argc, argv);
     QAxWidget *word=new QAxWidget("Word.Application", 0, Qt::MSWindowsOwnDC);
     word->setProperty("Visible", true);
     // 获取所有的工作文档
     QAxObject * documents = word->querySubObject("Documents");
     // 以文件template.doc为模版新建一个文档
     documents->dynamicCall("Add(QString)",QString::fromLocal8Bit("D:/doc/template.doc"));
     // 获取当前激活的文档
     QAxObject *document=word->querySubObject("ActiveDocument");

     // 获取文档中名字为text的标签
     QAxObject*bookmark_text=document->querySubObject("Bookmarks(QVariant)","text");
     // 选中标签，将字符InsertText插入到标签位置
     if(!bookmark_text->isNull()){
     bookmark_text->dynamicCall("Select(void)");
     bookmark_text->querySubObject("Range")->setProperty("Text","InsertText");
     }

     // 获取文档中名字为pic的标签
     QAxObject*bookmark_pic=document->querySubObject("Bookmarks(QVariant)","pic");
      // 选中标签，将图片插入到标签位置
     if(!bookmark_pic->isNull())
     {
         bookmark_pic->dynamicCall("Select(void)");

         QAxObject *range;
         range = bookmark_pic->querySubObject("Range");
         QVariant tmp = range->asVariant();
         QList<QVariant>qList;
         qList<<QVariant("D:/1.png");
         qList<<QVariant(false);
         qList<<QVariant(true);
         qList<<tmp;

         QAxObject *Inlineshapes = document->querySubObject("InlineShapes");
         Inlineshapes->dynamicCall("AddPicture(const QString&, QVariant, QVariant ,QVariant)",qList);
     }

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

    return app.exec();
}

addpicture 微软官方注解：http://msdn.microsoft.com/en-us/library/office/aa171535(v=office.11).aspx

http://blog.csdn.net/zbc415766331/article/details/36659993

HRESULT r;
r = CoInitialize(0);
// r =CoInitializeEx(0, COINIT_MULTITHREADED);
// m_word = new QAxWidget("Word.Application", widget, Qt::MSWindowsOwnDC );
m_word = new QAxObject("Word.Application" );
if( m_word == NULL ) return true;
//m_word->setProperty("Visible", false); //设置为隐藏
QAxObject * documents = m_word->querySubObject("Documents"); //获取所有工作的文档

http://www.qtcn.org/bbs/read-htm-tid-60802.html