ABAP OLE快速下载excel

【原创】 ABAP OLE快速下载excel

栏目：ABAP 作者：在海边看星星阅读：（57）更新于：04-17 14:18

*&---------------------------------------------------------------------*
*&      Form  CREATE_APPLICATION
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
*  -->  p1        text
*  <--  p2        text
*----------------------------------------------------------------------*
FORM create_application .
  IF  application-handle  LE 0.
    CREATE OBJECT application 'EXCEL.APPLICATION'.
  ENDIF.
ENDFORM.
*&---------------------------------------------------------------------*
*&      Form  OPEN_EXCEL1
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
*      -->P_LC_FILE  text
*      -->P_1      text
*      -->P_3339   text
*----------------------------------------------------------------------*
FORM open_excel1 USING p_file
                    pv_visible TYPE int1
                    p_sheet_name TYPE string.
  SET PROPERTY OF application 'Visible' = pv_visible."1 为打开Excel
  CALL METHOD OF application 'Workbooks' = workbook.
  CALL METHOD OF workbook 'Open' = workbook
  EXPORTING
    #1 = p_file.
  CALL METHOD OF workbook 'Worksheets' = sheet
  EXPORTING
    #1 = p_sheet_name.
  CALL METHOD OF sheet 'Activate'.

ENDFORM.                    "open_excel

非特殊说明，本文版权归在海边看星星所有，转载请注明出处.

本文标题：ABAP OLE快速下载excel

本文网址：http://www.hysvr.com.com/article-123.html.

本文标签：OLE

上一篇： SAP PO从DEV导接口到PRD时提示Software component v...

下一篇： ABAP KE21N获利能力凭证批量创建BAPI_COPAACTUALS_POS...

我的评论