博客
关于我
强烈建议你试试无所不能的chatGPT,快点击我
运用VC或Java对Office进行编程操作 (转)
阅读量:2508 次
发布时间:2019-05-11

本文共 5041 字,大约阅读时间需要 16 分钟。

运用VC或Java对Office进行编程操作 (转)[@more@]

  用VC对进行操作的介绍已经不少了,但是从来没有把,,进进全面的介绍的。

  由于工作的需要,我需要对在自己的中对word,excel,powerPoint进行操作。所以把自己的体会写出来和大家分享,希望对大家有所帮助。当然还有很多不当之处,希望大家指出。

  用例子来说明吧,首先创建一个MFC AppWizard(EXE)工程,然后通过在VIEW菜单中,选ClassWizard,选Automation选项卡,选Add Class,选择From a TypeLibrary, 选中 Office 2000 类型库:Excel9.olb,MSPPT9.OLB,MSWORD9.OLB(在Microsoft OfficeOffice目录下) 会将类型库中的所有类添加到你的工程中。

然后写一个类来操作Office吧!

ObtGuiGcomOfficePrinter .h

#if !defined(AFX_OBTGUIGCOMOFFICEPRINTER_H__03A0C2D8_DFC8_4B51_8A_994B86BACB82__INCLUDED_)
#define AFX_OBTGUIGCOMOFFICEPRINTER_H__03A0C2D8_DFC8_4B51_8ADB_994B86BACB82__INCLUDED_

#if _MSC_VER > 1000

#pragma once
#endif // _MSC_VER > 1000

#include "comdef.h"

#include "ObtGuiGcomMsWord9.h"
#include "ObtGuiGcomMsPpt9.h"
#include "ObtGuiGcomExcel9.h"

class AFX_EXT_CLASS ObtGuiGcomOfficePrinter 

{
public:
 ObtGuiGcomOfficePrinter();
 virtual ~ObtGuiGcomOfficePrinter();

public:
 BOOL WordPrinterToJcf(LPCTSTR lpszFileName,LPCTSTR lpszActivePrinter);
 BOOL ExcelPrinterToJcf(LPCTSTR lpszFileName,LPCTSTR lpszActivePrinter);
 BOOL PowerPointPrinterToJcf(LPCTSTR lpszFileName,LPCTSTR lpszActivePrinter);

};

#include "stdafx.h"

#include "ObtGuiGcomOfficePrinter.h"

#ifdef _DE

#undef THIS_FILE
static char THIS_FILE[]=__FILE__;
#define new DEBUG_NEW
#endif

//

// Construction/Destruction
//

ObtGuiGcomOfficePrinter::ObtGuiGcomOfficePrinter()

{

}

ObtGuiGcomOfficePrinter::~ObtGuiGcomOfficePrinter()
{

}

BOOL ObtGuiGcomOfficePrinter::PowerPointPrinterToJcf(LPCTSTR lpszFileName,LPCTSTR lpszActivePrinter)

{
 _PptApplication  m_powerpointApp;
 Presentations m_powerpointPres;
 _Presentation m_powerpointPre;

  m_powerpointPres.ReleaseDispatch();

 m_powerpointPre.ReleaseDispatch();
 
 if(!m_powerpointApp.CreateDispatch("PowerPoint.Application"))
 {
 AfxMessageBox("创建PowerPoint服务失败!");
 return FALSE;
 }
 
 m_powerpointApp.m_bAutoRelease=true;
 m_powerpointApp.SetVisible(TRUE);//对于PowerPoint必须设置为TRUE

 m_powerpointPres.AttachDispatch(m_powerpointApp.GetPresentations());

  m_powerpointPres.Open(lpszFileName,-1,-1,-1);
 m_powerpointPre.AttachDispatch(m_powerpointApp.GetActivePresentation(),TRUE);
 
 m_powerpointPre.PrintOut(-1,-1,"",long(1),-1);
 
  m_powerpointApp.Quit();

 m_powerpointPre.ReleaseDispatch();

 m_powerpointPres.ReleaseDispatch();
 m_powerpointApp.ReleaseDispatch();

 return TRUE;

}
BOOL ObtGuiGcomOfficePrinter::ExcelPrinterToJcf(LPCTSTR lpszFileName,LPCTSTR lpszActivePrinter)
{
 _ExcelApplication  m_excelApp;//定义Excel提供的应用
 Workbooks  m_excelBooks;
 _Workbook  m_excelBook;
 
 m_excelBooks.ReleaseDispatch();
 m_excelBook.ReleaseDispatch();
 m_excelApp.m_bAutoRelease=true;

 建Excel 2000(启动Excel)

 if (!m_excelApp.CreateDispatch("Excel.Application"))
 {
 AfxMessageBox("创建Excel服务失败!");
 return FALSE;
 }
 
 m_excelApp.SetVisible(FALSE); 置为隐藏
 用模板建立新文档
 m_excelBooks.AttachDispatch(m_excelApp.GetWorkbooks(),true);
 m_excelBook.AttachDispatch(m_excelBooks.Add(_variant_t(lpszFileName))); 
 
 (lpszActivePrinter); 置当前打印机
 COleVariant covTrue((short)TRUE), covFalse((short)FALSE), covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);//定义打印机并打印
  m_excelBook.PrintOut(covOptional,covOptional,COleVariant(long(1)),covFalse,covOptional,covOptional,covOptional,covOptional);
 
 m_excelApp.Quit();//退出
 
 m_excelBook.ReleaseDispatch();
 m_excelBooks.ReleaseDispatch();
 m_excelApp.ReleaseDispatch();

 return TRUE;

}

BOOL ObtGuiGcomOfficePrinter::WordPrinterToJcf(LPCTSTR lpszFileName,LPCTSTR lpszActivePrinter)

{
 
 _WordApplication  m_wordApp;//定义Word提供的应用程序对象
 Documents m_wordDocs;//定义Word提供的文档对象
 _Document m_wordDoc; 前的的文档对象
 
 m_wordDocs.ReleaseDispatch();
 m_wordDoc.ReleaseDispatch();
 m_wordApp.m_bAutoRelease=true;
 
 if(!m_wordApp.CreateDispatch("Word.Application")) 建Word应用服务
 {
 AfxMessageBox("创建Word应用服务失败!");
 return FALSE;
 }

 m_wordApp.SetVisible(FALSE); 置为隐藏

面是打开文件定义VARIANT变量;
 COleVariant varFilePath(lpszFileName);
 COleVariant varstrNull("");
 COleVariant varZero((short)0);
 COleVariant varTrue(short(1),VT_BOOL);
 COleVariant varFalse(short(0),VT_BOOL);

 m_wordDocs.AttachDispatch(m_wordApp.GetDocuments());//将Documents类对象m_Docs和Idispatch接口关联起来;

 m_wordDocs.Open(varFilePath,varFalse,varFalse,varFalse,varstrNull,varstrNull,varFalse,varstrNull,varstrNull,varTrue,varTrue,varTrue);
 m_wordDoc.AttachDispatch(m_wordApp.GetActiveDocument()); 到当前激活的Document对象

 m_wordApp.SetActivePrinter(lpszActivePrinter);  置当前打印机

 COleVariant covTrue((short)TRUE), covFalse((short)FALSE), covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR); 义打印属性
 m_wordDoc.PrintOut(covFalse, 
  covOptional, 
  covOptional, 
  covOptional, 
  covOptional, 
  covOptional, 
  covOptional, 
  COleVariant((long)1), 
  covOptional, 
  covOptional, 
  covOptional, 
  covOptional, 
  covOptional, 
  covOptional, 
 covOptional, 
  covOptional, 
  covOptional, 
  covOptional); 
 
 m_wordApp.Quit(covOptional,covOptional,covOptional);//退出

 m_wordDoc.ReleaseDispatch();  开关联;

 m_wordDocs.ReleaseDispatch();
 m_wordApp.ReleaseDispatch();
 
 return TRUE;

}

以上是用Office打开相应的文档进行打印的操作,如果你需要进行相应的其他操作,你可以用Office里面的宏进行录制然后转化为相应的代码。

对于在里需要时行Office操作的,你必须用JNI或运用Java-Com的相应包

来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/10748419/viewspace-960952/,如需转载,请注明出处,否则将追究法律责任。

转载于:http://blog.itpub.net/10748419/viewspace-960952/

你可能感兴趣的文章
满屏的指标?删了吧,手把手教你裸 K 交易!
查看>>
不吹不黑 | 聊聊为什么要用99%精度的数据回测
查看>>
高频交易的几种策略
查看>>
量化策略回测TRIXKDJ
查看>>
量化策略回测唐安奇通道
查看>>
CTA策略如何过滤部分震荡行情?
查看>>
量化策略回测DualThrust
查看>>
量化策略回测BoolC
查看>>
量化策略回测DCCV2
查看>>
mongodb查询优化
查看>>
五步git操作搞定Github中fork的项目与原作者同步
查看>>
git 删除远程分支
查看>>
删远端分支报错remote refs do not exist或git: refusing to delete the current branch解决方法
查看>>
python multiprocessing遇到Can’t pickle instancemethod问题
查看>>
APP真机测试及发布
查看>>
通知机制 (Notifications)
查看>>
10 Things You Need To Know About Cocoa Auto Layout
查看>>
一个异步网络请求的坑:关于NSURLConnection和NSRunLoopCommonModes
查看>>
iOS 如何放大按钮点击热区
查看>>
ios设备唯一标识获取策略
查看>>