vc++使用word

第一步,导入word对象库 #import "d:/Program Files/Microsoft Office/OFFICE11/MSWORD.OLB" raw_interfaces_only raw_native_types named_guids / rename("ExitWindows","ExitWindows1")

using namespace Word;

需要将ExitWindows重新命名,因为与系统冲突;使用名字空间是为了防止与其他组件冲突

下面是一段往表格里填写文字的代码:

using namespace Word;

 _ApplicationPtr app; app.CreateInstance(__uuidof(Word::Application));  

_DocumentPtr wdDoc; 

DocumentsPtr wdDocs; 

app->get_Documents(&wdDocs); 

CComVariant vOpt(DISP_E_PARAMNOTFOUND,VT_ERROR); 

CComVariant vr(filePah); 

wdDocs->Open(&vr,&vOpt,&vOpt,&vOpt,&vOpt,&vOpt,&vOpt,&vOpt,&vOpt,&vOpt,&vOpt,&vOpt,&vOpt,&vOpt,&vOpt,&vOpt,&wdDoc); 

TablesPtr tables; 

wdDoc->get_Tables(&tables); 

TablePtr table; tables->Item(1,&table); //第一个表格,不是从0开始的,所有的项都是从1开始的,不是程序的惯例从0开始

CellPtr cell;

 RangePtr range;

 CComBSTR bstr; 

bstr=L“xxxx”; 

table->Cell(2,2,&cell);//第二行第二列

 cell->get_Range(&range); 

range->put_Text(bstr); 

 RowPtr row;  

rows->Item(3,&row);  

row->Delete();  //删除一行 

 CComVariant vrSave(sFile); 

 wdDoc->SaveAs(&vrSave);   //保存文件

   wdDoc->Close(); 

app->Quit();

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

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

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

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

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

抵扣说明:

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

余额充值