ABAP--通过OLE操作OFFICE(代码)

最新推荐文章于 2024-11-04 14:52:45 发布

原创

最新推荐文章于 2024-11-04 14:52:45 发布 · 5.3k 阅读

3 ·

CC 4.0 BY-SA版权

文章标签：

#office #excel #object #function #report #sap

这篇博客展示了如何利用ABAP的OLE自动化技术将SAP数据填入本地Excel文件中。代码创建了一个Excel对象，设置了可见性，读取了SPFLI表中的航班数据，并将其写入到新建的工作簿中。每个航班数据包括航班号、出发地、目的地和起飞时间等信息。

本代码是通过OLE技术操作EXCEL,将SAP的数据填写到本地EXCEL中,Office运行在SAP的GUI界面外,注意红色代码。
REPORT ZRSDEMO01 NO STANDARD PAGE HEADING.
* this report demonstrates how to send some ABAP data to an
* EXCEL sheet using OLE automation.
*必须包含
INCLUDE OLE2INCL.
* handles for OLE objects
*申明相关的OFFICE的OLE对象
DATA: H_EXCEL TYPE OLE2_OBJECT,        " Excel object
      H_MAPL TYPE OLE2_OBJECT,         " list of workbooks
      H_MAP TYPE OLE2_OBJECT,          " workbook
      H_ZL TYPE OLE2_OBJECT,           " cell
      H_F TYPE OLE2_OBJECT.            " font
TABLES: SPFLI.
DATA H TYPE I.
* table of flights
DATA: IT_SPFLI LIKE SPFLI OCCURS 10 WITH HEADER LINE.

*&---------------------------------------------------------------------*
*& Event START-OF-SELECTION
*&---------------------------------------------------------------------*
START-OF-SELECTION.
* read flights
SELECT * FROM SPFLI INTO TABLE IT_SPFLI UP TO 10 ROWS.
* tell user what is going o