[转]VC++操作Word

最新推荐文章于 2023-07-06 16:56:30 发布
最新推荐文章于 2023-07-06 16:56:30 发布
阅读量131 收藏
点赞数
文章标签： c/c++

工具： vc++6.0 。

关键字： c++ ， MFC 。

要求：系统安装 MS OFFICE 2003 。

过程：

准备工作：

1.       创建一个 MFC(EXE) 工程： MFC AppWizard （ exe ），工程为对话框形式（测试用）。

2.       在 CLASS VIEW 页面创建一个类：类名为： CWordOffice ，类的类型为： Class type ： Generic Class 。

3.       在工具栏中找到 view -> class wizard -> Automation -> add class -> from a tye library ，然后选中 offfice 安装的目录中的 MSWORD.OLB ，然后选中所有列出的类名，点 OK 完成。

4. 最后，这里给出一个操作word的最简单的程序源码wordApp.rar(XP + VC6 + Word2010)

 

 

准备工作完成，下面贴出相关部分的代码：

CWordOffice.h 中的手动写入的代码如下（自动生成的没有加入）： 


#include "atlbase.h"
#include "msword.h"

class CWordOffice 
{
private:
    _Application m_wdApp;
    Documents m_wdDocs;
    _Document m_wdDoc;
    Selection m_wdSel;
    Range     m_wdRange;
    InlineShapes m_wdInlineShapes; 
    InlineShape m_wdInlineShape;

public:
    CWordOffice();
    virtual ~CWordOffice();

public:
    //操作
    //**********************创建新文档*******************************************
    BOOL CreateApp();                    //创建一个新的WORD应用程序
    BOOL CreateDocuments();                //创建一个新的Word文档集合
    BOOL CreateDocument();                //创建一个新的Word文档
    BOOL Create();                        //创建新的WORD应用程序并创建一个新的文档
    void ShowApp();                        //显示WORD文档
    void HideApp();                        //隐藏word文档

    //**********************打开文档*********************************************
    BOOL OpenDocument(CString fileName);//打开已经存在的文档。
    BOOL Open(CString fileName);        //创建新的WORD应用程序并打开一个已经存在的文档。
    BOOL SetActiveDocument(short i);    //设置当前激活的文档。

    //**********************保存文档*********************************************
    BOOL SaveDocument();                //文档是以打开形式，保存。
    BOOL SaveDocumentAs(CString fileName);//文档以创建形式，保存。
    BOOL CloseDocument();
    void CloseApp(); 

    //**********************文本书写操作*****************************************
    void WriteText(CString szText);        //当前光标处写文本
    void WriteNewLineText(CString szText, int nLineCount = 1); //换N行写字
    void WriteEndLine(CString szText);    //文档结尾处写文本
    void WholeStory();                    //全选文档内容
    void Copy();                        //复制文本内容到剪贴板
    void InsertFile(CString fileName);    //将本地的文件全部内容写入到当前文档的光标处。
    
    //**********************图片插入操作*****************************************
    void InsertShapes(CString fileName);//在当前光标的位置插入图片
    
    //**********************超链接插入操作*****************************************
    void InsertHyperlink(CString fileLink);//超级链接地址，可以是相对路径。
};





CWordOffice.cpp中的手写代码如下：

CWordOffice::CWordOffice()
{

}

CWordOffice::~CWordOffice()
{
    COleVariant vTrue((short)TRUE),    
                vFalse((short)FALSE),
                vOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);
    //m_wdDoc.Save();
    m_wdApp.Quit(vFalse,    // SaveChanges.
             vTrue,            // OriginalFormat.
             vFalse            // RouteDocument.
             );
    //释放内存申请资源
    m_wdInlineShape.ReleaseDispatch();
    m_wdInlineShapes.ReleaseDispatch();
    //m_wdTb.ReleaseDispatch();
    m_wdRange.ReleaseDispatch();
    m_wdSel.ReleaseDispatch();
    //m_wdFt.ReleaseDispatch();
    m_wdDoc.ReleaseDispatch();
    m_wdDocs.ReleaseDispatch();
    m_wdApp.ReleaseDispatch();
}

//操作
BOOL CWordOffice::CreateApp()
{
    if (FALSE == m_wdApp.CreateDispatch("Word.Application"))
    {
        AfxMessageBox("Application创建失败，请确保安装了word 2000或以上版本!", MB_OK|MB_ICONWARNING);
        return FALSE;
    }
    return TRUE;
}

BOOL CWordOffice::CreateDocuments()
{
    if (FALSE == CreateApp()) 
    {
        return FALSE;
    }
    m_wdDocs.AttachDispatch(m_wdApp.GetDocuments());
    if (!m_wdDocs.m_lpDispatch) 
    {
        AfxMessageBox("Documents创建失败!", MB_OK|MB_ICONWARNING);
        return FALSE;
    }
    return TRUE;
}

BOOL CWordOffice::CreateDocument()
{
    if (!m_wdDocs.m_lpDispatch) 
    {
        AfxMessageBox("Documents为空!", MB_OK|MB_ICONWARNING);
        return FALSE;
    }

    COleVariant varTrue(short(1),VT_BOOL),vOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);
    CComVariant Template(_T(""));    //没有使用WORD的文档模板
    CComVariant NewTemplate(false),DocumentType(0),Visible;

    m_wdDocs.Add(&Template,&NewTemplate,&DocumentType,&Visible);    

    //得到document变量
    m_wdDoc = m_wdApp.GetActiveDocument();
    if (!m_wdDoc.m_lpDispatch) 
    {
        AfxMessageBox("Document获取失败!", MB_OK|MB_ICONWARNING);
        return FALSE;
    }
    //得到selection变量
    m_wdSel = m_wdApp.GetSelection();
    if (!m_wdSel.m_lpDispatch) 
    {
        AfxMessageBox("Select获取失败!", MB_OK|MB_ICONWARNING);
        return FALSE;
    }
    //得到Range变量
    m_wdRange = m_wdDoc.Range(vOptional,vOptional);
    if(!m_wdRange.m_lpDispatch)
    {
        AfxMessageBox("Range获取失败!", MB_OK|MB_ICONWARNING);
        return FALSE;
    }

    return TRUE;
}

BOOL CWordOffice::Create()
{
    if (FALSE == CreateDocuments()) 
    {
        return FALSE;
    }
    return CreateDocument();
}

void CWordOffice::ShowApp()
{
    m_wdApp.SetVisible(TRUE);
}

void CWordOffice::HideApp()
{
    m_wdApp.SetVisible(FALSE);
}

BOOL CWordOffice::OpenDocument(CString fileName)
{
    if (!m_wdDocs.m_lpDispatch) 
    {
        AfxMessageBox("Documents为空!", MB_OK|MB_ICONWARNING);
        return FALSE;
    }

    COleVariant vTrue((short)TRUE),    
                vFalse((short)FALSE),
                vOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR),
                vZ((short)0);
    COleVariant     vFileName(_T(fileName));
    
    //得到document变量
    m_wdDoc.AttachDispatch(m_wdDocs.Open(
                                vFileName,        // FileName
                                vTrue,            // Confirm Conversion.
                                vFalse,            // ReadOnly.
                                vFalse,            // AddToRecentFiles.
                                vOptional,        // PasswordDocument.
                                vOptional,        // PasswordTemplate.
                                vOptional,        // Revert.
                                vOptional,        // WritePasswordDocument.
                                vOptional,        // WritePasswordTemplate.
                                vOptional,        // Format. // Last argument for Word 97
                                vOptional,        // Encoding // New for Word 2000/2002
                                vOptional,        // Visible
                                //如下4个是word2003需要的参数。本版本是word2000。
                                vOptional,    // OpenAndRepair
                                vZ,            // DocumentDirection wdDocumentDirection LeftToRight
                                vOptional,    // NoEncodingDialog
                                vOptional
                                
                                )                // Close Open parameters
                            );                    // Close AttachDispatch
    
    if (!m_wdDoc.m_lpDispatch) 
    {
        AfxMessageBox("Document获取失败!", MB_OK|MB_ICONWARNING);
        return FALSE;
    }
    //得到selection变量
    m_wdSel = m_wdApp.GetSelection();
    if (!m_wdSel.m_lpDispatch) 
    {
        AfxMessageBox("Select获取失败!", MB_OK|MB_ICONWARNING);
        return FALSE;
    }
    //得到全部DOC的Range变量
    m_wdRange = m_wdDoc.Range(vOptional,vOptional);
    if(!m_wdRange.m_lpDispatch)
    {
        AfxMessageBox("Range获取失败!", MB_OK|MB_ICONWARNING);
        return FALSE;
    }
    return TRUE;
}

BOOL CWordOffice::Open(CString fileName)
{
    if (FALSE == CreateDocuments()) 
    {
        return FALSE;
    }
    return OpenDocument(fileName);
}

BOOL CWordOffice::SetActiveDocument(short i)
{
    COleVariant     vIndex(_T(i)),vOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);

    m_wdDoc.AttachDispatch(m_wdDocs.Item(vIndex));
    m_wdDoc.Activate();
    if (!m_wdDoc.m_lpDispatch) 
    {
        AfxMessageBox("Document获取失败!", MB_OK|MB_ICONWARNING);
        return FALSE;
    }
    //得到selection变量
    m_wdSel = m_wdApp.GetSelection();
    if (!m_wdSel.m_lpDispatch) 
    {
        AfxMessageBox("Select获取失败!", MB_OK|MB_ICONWARNING);
        return FALSE;
    }
    //得到全部DOC的Range变量
    m_wdRange = m_wdDoc.Range(vOptional,vOptional);
    if(!m_wdRange.m_lpDispatch)
    {
        AfxMessageBox("Range获取失败!", MB_OK|MB_ICONWARNING);
        return FALSE;
    }
    HideApp();
    return TRUE;
}

BOOL CWordOffice::SaveDocument()
{
    if (!m_wdDoc.m_lpDispatch) 
    {
        AfxMessageBox("Document获取失败!", MB_OK|MB_ICONWARNING);
        return FALSE;
    }
    m_wdDoc.Save();
    return TRUE;
}

BOOL CWordOffice::SaveDocumentAs(CString fileName)
{
    if (!m_wdDoc.m_lpDispatch) 
    {
        AfxMessageBox("Document获取失败!", MB_OK|MB_ICONWARNING);
        return FALSE;
    }
    COleVariant vTrue((short)TRUE),    
                vFalse((short)FALSE),
                vOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);
    COleVariant vFileName(_T(fileName));

    m_wdDoc.SaveAs(
                vFileName,    //VARIANT* FileName
                vOptional,    //VARIANT* FileFormat
                vOptional,    //VARIANT* LockComments
                vOptional,    //VARIANT* Password
                vOptional,    //VARIANT* AddToRecentFiles
                vOptional,    //VARIANT* WritePassword
                vOptional,    //VARIANT* ReadOnlyRecommended
                vOptional,    //VARIANT* EmbedTrueTypeFonts
                vOptional,    //VARIANT* SaveNativePictureFormat
                vOptional,    //VARIANT* SaveFormsData
                vOptional,    //VARIANT* SaveAsAOCELetter
                vOptional,
                vOptional,
                vOptional,
                vOptional,
                vOptional
                );
    return    TRUE;
}

BOOL CWordOffice::CloseDocument()
{
    COleVariant vTrue((short)TRUE),    
                vFalse((short)FALSE),
                vOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);
    m_wdDoc.Close(vFalse,    // SaveChanges.
             vTrue,            // OriginalFormat.
             vFalse            // RouteDocument.
             );
    m_wdDoc.AttachDispatch(m_wdApp.GetActiveDocument());
    if (!m_wdDoc.m_lpDispatch) 
    {
        AfxMessageBox("Document获取失败!", MB_OK|MB_ICONWARNING);
        return FALSE;
    }
    //得到selection变量
    m_wdSel = m_wdApp.GetSelection();
    if (!m_wdSel.m_lpDispatch) 
    {
        AfxMessageBox("Select获取失败!", MB_OK|MB_ICONWARNING);
        return FALSE;
    }
    //得到全部DOC的Range变量
    m_wdRange = m_wdDoc.Range(vOptional,vOptional);
    if(!m_wdRange.m_lpDispatch)
    {
        AfxMessageBox("Range获取失败!", MB_OK|MB_ICONWARNING);
        return FALSE;
    }
    return TRUE;
}

void CWordOffice::CloseApp()
{
    COleVariant vTrue((short)TRUE),    
                vFalse((short)FALSE),
                vOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);
    m_wdDoc.Save();
    m_wdApp.Quit(vFalse,    // SaveChanges.
             vTrue,            // OriginalFormat.
             vFalse            // RouteDocument.
             );
    //释放内存申请资源
    m_wdInlineShape.ReleaseDispatch();
    m_wdInlineShapes.ReleaseDispatch();
    //m_wdTb.ReleaseDispatch();
    m_wdRange.ReleaseDispatch();
    m_wdSel.ReleaseDispatch();
    //m_wdFt.ReleaseDispatch();
    m_wdDoc.ReleaseDispatch();
    m_wdDocs.ReleaseDispatch();
    m_wdApp.ReleaseDispatch();
}

void CWordOffice::WriteText(CString szText)
{
    m_wdSel.TypeText(szText);
}

void CWordOffice::WriteNewLineText(CString szText, int nLineCount /* = 1 */)
{
    int i;
    if (nLineCount <= 0)
    {
        nLineCount = 0;
    }
    for (i = 0; i < nLineCount; i++)
    {
        m_wdSel.TypeParagraph();
    }
    WriteText(szText);
}

void CWordOffice::WriteEndLine(CString szText)
{
    m_wdRange.InsertAfter(szText);
}

void CWordOffice::WholeStory()
{
    m_wdRange.WholeStory();
}

void CWordOffice::Copy()
{
    m_wdRange.CopyAsPicture();
}

void CWordOffice::InsertFile(CString fileName)
{
    COleVariant     vFileName(fileName),
                 vTrue((short)TRUE),
                 vFalse((short)FALSE),
                 vOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR),
                 vNull(_T(""));
    /*
    void InsertFile(LPCTSTR FileName, VARIANT* Range, VARIANT* ConfirmConversions, VARIANT* Link, VARIANT* Attachment);
    */
    m_wdSel.InsertFile(
                    fileName,
                    vNull,
                    vFalse,
                    vFalse,
                    vFalse
                    );
}

void CWordOffice::InsertShapes(CString fileName)
{
    COleVariant vTrue((short)TRUE),    
                vFalse((short)FALSE),
                vOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);
    m_wdInlineShapes=m_wdSel.GetInlineShapes();
    m_wdInlineShape=m_wdInlineShapes.AddPicture(fileName,vFalse,vTrue,vOptional);
}

void CWordOffice::InsertHyperlink(CString fileLink)
{
    COleVariant     vAddress(_T(fileLink)),vSubAddress(_T(""));
    Range aRange = m_wdSel.GetRange();
    Hyperlinks vHyperlinks(aRange.GetHyperlinks());

    vHyperlinks.Add(
                    aRange,            //Object，必需。转换为超链接的文本或图形。
                    vAddress,         //Variant 类型，可选。指定的链接的地址。此地址可以是电子邮件地址、Internet 地址或文件名。请注意，Microsoft Word 不检查该地址的正确性。
                    vSubAddress,     //Variant 类型，可选。目标文件内的位置名，如书签、已命名的区域或幻灯片编号。
                    vAddress,         //Variant 类型，可选。当鼠标指针放在指定的超链接上时显示的可用作“屏幕提示”的文本。默认值为 Address。
                    vAddress,         //Variant 类型，可选。指定的超链接的显示文本。此参数的值将取代由 Anchor 指定的文本或图形。
                    vSubAddress        //Variant 类型，可选。要在其中打开指定的超链接的框架或窗口的名字。
                    ); 
    vHyperlinks.ReleaseDispatch();
}




测试部分代码如下：

需要在对话框中添加一个按钮，按钮的事件方法内添加如下代码：

void CWordOperateDlg::OnButtonWord() 
{
     AfxEnableControlContainer();   
     AfxOleInit();
     CWordOffice wd;
     wd.CreateDocuments();
     wd.OpenDocument("d:\\a.doc");
     wd.ShowApp(); //显示word
}
weixin_33853827
关注
用VC++操作WORD（1）——综述
猛虎&蔷薇
10-13 1102
写在前面：         10.1长假前，导师给安排了任务，做一些用VC++操作WORD进行自动化文档生成的工作。于是乎我百度了许多代码，又看了许多帖子。以前很少接触COM/OLE编程，奈何网上一些基础的东西都是只言片语东鳞西爪，于是乎决定把自己最近所得写成博文来供后人使用。文本一家之言，如有错误欢迎指出。         在学习过程中，我使用的是VS2005+OFFICE2003，在其他环
VC++操作Word
01-27
本文跟大家分享的是VC++操作Word的东东，工程类型是MFC的对话框 本文跟大家分享的是VC++操作Word的东东，工程类型是MFC的对话框 本文跟大家分享的是VC++操作Word的东东，工程类型是MFC的对话框
VC+++ 操作word
Masimaro的专栏
04-14 6865
最近完成了一个使用VC++ 操作word生成扫描报告的功能，在这里将过程记录下来，开发环境为visual studio 2008 导入接口 首先在创建的MFC项目中引入word相关组件 右键点击 项目 --> 添加 --> 新类,在弹出的对话框中选择Typelib中的MFC类。 然后在弹出的对话框中选择文件，从文件中导入MSWORD.OLB组件。 这个文件的路径一般在C:\Pro...
C++ 自动化操作Word
白话机器学习
05-02 6373
本文事例工程源码面积分下载地址：http://download.csdn.net/detail/zy_dreamer/5321760 介绍： 这个事例演示了如何写C++代码来创建并操作一个Microsoft Word实例，创建一个新文档，插入一个段落，保存文档，关闭Word程序并清理使用的COM资源。 利用VC++实现有三种基本方法： 1.使用#import指令和智能指针操作Word
VC操纵Word
珍爱生命 远离C++
07-02 2514
最近有很多朋友问我，VC操纵Word的方法。需要的朋友请往下看。我们操纵Word需要通过类型库中的MFC类。而这些类，应该都是基于一个叫COleDispatchDriver的类。至少我所了解到的都是这样。COleDispatchDriver没有基类。COleDispatchDriver类实现OLE自动化中的客户方。OLE调度接口为访问一个对象的方法和属性提供了途径。COleDispatch
VC++ 6.0 操作Word文档
09-18
简化原有Word操作程序示例，使用VC6创建，多版本VS可打开。
vc++操作word
12-26
在VC++中操作Word文档，主要是通过Microsoft ...综上所述，使用VC++操作Word涉及到的知识点主要包括COM组件、Automation、Word对象模型、编程接口以及错误处理等方面，通过这些知识可以实现对Word文档的高效编程控制。
VC++操作Word文档
09-10
在IT行业中，VC++是一种广泛...总的来说，利用VC++操作Word文档是一项实用的技能，可以用于自动化文档处理、报告生成等任务。通过深入理解COM编程和Word对象模型，开发者可以实现更复杂的Word功能集成，提升工作效率。
VC++操作 word2007
12-08
标题“VC++操作Word2007”提示我们关注的重点是利用C++编程语言控制Word文档的创建、修改和处理。描述中提到，开发环境为VC++ 6.0，在Windows 7操作系统上，同时使用了录制的宏作为辅助工具。标签“mfc c++ office ...
VC 操作Word类
09-13
VC 操作word类，可以在word指定位置输出文字，生成报表，不需要使用word模板。
c++ 操作Word
热门推荐
wowolook的专栏
01-16 5万+
摘要： 使用VC编程来操纵Office。你可以实现诸如：Word文件打印、传送数据到Word文档、发送E-MAIL、自动产生表格、Excel数据统计、圆饼图，直方图显示、自动报表生成、播放幻灯、doc，txt，HTML，rtf文件转换、中文简繁体转换、拼音或笔画排序......只要是Office能够实现的功能，都可以在你写的程序中调用。仔细阅读下面的说明，并下载源文件进行参考，你就可以一步一步地
VC操作Word文档
07-15
VS2010编写的程序，运用VC++操作Word文档示例代码，包括添加文字，插入图片等.
利用VC自动生成WORD文档的代码
01-19
利用VC自动生成WORD文档的代码，方便通过程序自动编辑及生成WORD文档
c++ 读写Word
最新发布
m0_61069042的博客
07-06 2841
【代码】c++ 读写Word。
VC生成word文档的部分代码
qj840828的专栏
09-03 4465
 protected://变量_Application  wordApp;    Documents  wordDocs;    _Document  wordDoc;    Selection  wordSelection;    Range   wordRange;    Tables  wordTables;    Table   wordTable;           Cell  
vc操作word读写
sx1989827的专栏
11-25 3193
<br />      继续带来一片com的应用文章，关于word的读写问题，其实关于word的读写操作代码不麻烦，麻烦在于类库的引用，试验了很长时间草搞定。<br /><br />#pragma warning(disable:4259) #import "C://Program Files//Common Files//Microsoft Shared//Office11//MSO.DLL" using namespace Office; #import "C://Program Fi
VC读写word文件（RTF文件）
yuhuimin111的专栏
07-07 5207
这几天一直在研究VC读写有格式文本文件（RTF文件）的方法，终于动明白一些，下面是我的代码，在VS2005下运行正常，希望能帮助大家解决一点问题，若有书写不周，欢迎各位批评指正 。 void CVCreadwriteRTFDlg::OnBnClickedButton1() { // 变量的声明 COleVariant  vTrue((short)TRUE),         
VC编程操作word2010生成表格
gdruhv的博客
02-22 547
VC编程操作word2010生成表格
VC++操作Word：初学者指南
"VC++ Office自动化开发教程，适用于初学者，通过CWzjWordOffice类操作Word，实现文字样式设置、表格创建等基础功能。" 在VC++中进行Office自动化开发，主要是利用Microsoft Office提供的COM组件接口来控制Office...
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

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

抵扣说明：

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

余额充值