其他分享
首页 > 其他分享> > delphi 调用编写Word、Execl

delphi 调用编写Word、Execl

作者:互联网

使用VBA接口实现。

VBA官方接口:

Office Visual Basic for Applications (VBA) 参考 | Microsoft Docs

常用办公三件套的接口和其他的软件接口齐全。

打开Word :

uses
	ComObj


///声明,所有VBA相关的对象都使用Variant实现
wApp,eApp,wordRange:Variant;

///实现
try
	wApp:=GetActiveOleObject('word.Application');
except
	wApp:=CreateOleObject('word.Application');
end;
//是否可视
wApp.Visible := True;

//打开文档
wApp.Documents.Open('test.docx');
//选中工作簿,n代表第几个,如果就只有一个就是1,返回Range
doc := wApp.Documents.Item(n);
//也可以根据名字来选中
doc := wApp.Documents['test.docx'];

打开Execl:

try
	eApp:=GetActiveOleObject('excel.Application');
except
	eApp:=CreateOleObject('excel.Application');
end;
eApp.Visible := True;
eApp.WorkBooks.Open('test.xlsx');
wb := eApp.WorkBooks['test.xlsx'];
sheet := wb.Sheets.Item(n); //sheet := wb.Sheets('Sheet1');

后续的插入文字,样式设置,指定位置等等的操作可以根据官网VBA接口调用。

标签:Execl,wApp,VBA,Word,delphi,接口,Application,test,eApp
来源: https://www.cnblogs.com/tutuleilife/p/16616047.html