点击此处--->   群内免费提供SAP练习系统（在群公告中）

加入QQ群：457200227（SAP S4 HANA技术交流） 群内免费提供SAP练习系统（在群公告中）

您好，专家-我正在将新工作表添加到放置在Desktop上的现有excel中。我想在新工作表上添加一些信息。成功将新工作表添加到现有工作表中，但是当我打开Excel时说""。 xls已经打开。重新打开将导致您所做的所有更改被放弃。要您要重新打开" 。 打开新工作表后，还没有更改？下面是我的代码。感谢您的帮助。

DATA gs_excel TYPE ole2_object。

DATA gs_wbooks TYPE ole2_object。

数据gs_wbook类型ole2_object。

数据：gs_application类型ole2_object，

工作表类型ole2_object，

工作表类型ole2_object，

first_sheet TYPE ole2_object

单元格类型ole2_object。

创建对象gs_excel'EXCEL.APPLICATION'。

设置gs_excel"可见"的属性= 0。

获取gs_excel"工作簿" = gs_wbooks的属性。

*获取gs_wbooks'Application'= gs_application的属性。

*-打开现有文档

gs_wbooks"打开"的呼叫方法= gs_wbook

导出#1 = p_path。

如果sy-subrc = 0。

*创建第一个Excel工作表

gs_excel"工作表"的调用方法= first_sheet

导出#1 = 1。

gs_excel"工作表"的调用方法=工作表。

呼叫"添加"表格的方法

导出

#1 =首张纸。

获取gs_excel'ActiveSheet'=工作表的属性。

设置工作表"名称" ="标题"的属性。

*索引= row_max *（sy-tabix-1）+1。" 1-列名

表格"单元格"的调用方法=单元格导出#1 =1。"索引。

设置单元格的属性'值'='单元格data1'。

表格"单元格"的调用方法=单元格导出#1 =2。"索引。

设置单元格的"值" ="单元格data2"的属性。

*将excel speadsheet保存为特定的文件名

调用"保存"工作表的方法

导出

#1 = p_path"文件名

#2 = 1。

调用gs_excel'QUIT'的方法。

免费对象：gs_excel，gs_wbooks，gs_wbook，表格，表格。