excel文档中嵌入对象(excel、word等)

//测试环境office2016、office365

string InsertPath= @"E:\\新建文件夹\\2.xls";//插入的文档路径

string openfile = string.Empty;
excelFileName = @"E:\\1.xls";//使用的文档路径

Application app = new Application();//创建一个资源对象
//app.Visible = true;
Workbook wb = app.Workbooks.Open(Filename: openfile );//打excel文档
Worksheet sht = wb.Worksheets[1];//选择第一个活动工作目录

OLEObjects objs = sht.OLEObjects();//创建一个OLEObjects对象
for (int i = objs.Count; i >= 1; i--)
objs.Item(i).Delete();

Range rng = null;
rng = sht.Cells[1, 5];//插入的位置 第1:行 第5:列
rng.Select();

//将文档插入
OLEObject obj = objs.Add(Filename: InsertPath
, Link: false
, DisplayAsIcon: true
, IconFileName: "excel.exe"
, IconIndex: 0
, IconLabel: "aaa"
, Left: rng.Left
, Top: rng.Top
);
obj.Select();
rng.Select();
wb.Save();
wb.Close();

posted @ 2018-11-21 10:19  曾经是最好  阅读(2536)  评论(0编辑  收藏  举报