乔山办公网我们一直在努力
您的位置:乔山办公网 > excel表格制作 > sap <em>abap</em>如何生成<em>Excel</em>,

sap <em>abap</em>如何生成<em>Excel</em>,

作者:乔山办公网日期:

返回目录:excel表格制作


我正好刚刚整理了这个材料
给你贴过来吧 ,非常简单的,都是固定的格式,实在不会就copy也可以解决问题。 你自己要建一个excel模板上传。也可以直接放到程序的目录下。e68a847a64335

" EXCEL 输出

DATA: w_temp_file(65), "Temp file path for excel template file.
w_formkey LIKE wwwdatatab VALUE 'MIZCOR19',
w_ftemplate LIKE rlgrap-filename VALUE 'C:\TEMP\ZTRAIN02.XLT'.

DATA: x_row(6) TYPE N VALUE '4',
v_range TYPE string.

* CALL FUNCTION 'DOWNLOAD_WEB_OBJECT'
* EXPORTING
* key = w_formkey
* destination = w_ftemplate
* CHANGING
* temp = w_temp_file.

CREATE OBJECT w_excel 'EXCEL.APPLICATION'.
IF sy-subrc <> 0.
WRITE: / 'Commands were not successfully executed:'(010), sy-subrc .
STOP.
ENDIF.
SET PROPERTY OF w_excel 'Visible' = 0.

CALL METHOD OF w_excel 'WORKBOOKS' = w_mapl.
CALL METHOD OF w_mapl 'Open' = w_map
EXPORTING
#1 = w_ftemplate.
CALL METHOD OF w_map 'WORKSHEETS' = w_sheet
EXPORTING
#1 = 'Sheet1'.
CALL METHOD OF w_sheet 'ACTIVATE'.

LOOP AT X_MARA.
x_row = x_row + 1.

CONCATENATE 'A' x_row INTO v_range.
PERFORM fill_range USING v_range X_MARA-MATNR.
CONCATENATE 'B' x_row INTO v_range.
PERFORM fill_range USING v_range X_MARA-MATKL.
CONCATENATE 'C' x_row INTO v_range.
PERFORM fill_range USING v_range X_MARA-WERKS.
CONCATENATE 'D' x_row INTO v_range.
PERFORM fill_range USING v_range X_MARA-MAKTX.
CONCATENATE 'E' x_row INTO v_range.
PERFORM fill_range USING v_range X_MARA-GEWEI.

CLEAR X_MARA.
ENDLOOP.

SET PROPERTY OF w_excel 'VISIBLE' = 1 no flush.

FREE w_mapl.
FREE OBJECT w_excel.

ENDFORM. "frmXLSDisplay

*&---------------------------------------------------------------------*
*& Form fill_range
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
* -->VALUE(F_RANGE) text
* -->VALUE(F_VALUE) text
*----------------------------------------------------------------------*
FORM fill_range USING value(f_range) value(f_value).
CALL METHOD OF w_sheet 'Range' = w_rangeobj
EXPORTING
#1 = f_range.
SET PROPERTY OF w_rangeobj 'Value' = f_value.
ENDFORM. "fill_range

生成Excel文件可以用DOI或者是OLE,但是要打包成.rar是很难实现的,如果这些都要自动完成的话,相当困难
两种选择
ME22N删除行项目
ME98归档
只下了单没有做其他动作的采购订单做归档应该不麻烦,自己试试就好了.不过其实不是出于数据管理的需要建议是不要做归档的

CALL METHOD OF applicationname 'Worksheets' = SHEET
EXPORTING
#1 = 'yoursheet'. 这里yoursheet为要操作的sheet的名字。
call method of sheet 'Delete '.

相关阅读

  • sap <em>abap</em>如何生成<em>Excel</em>,

  • 乔山办公网excel表格制作
  • 我正好刚刚整理了这个材料 给你贴过来吧 ,非常简单的,都是固定的格式,实在不会就copy也可以解决问题。 你自己要建一个excel模板上传。也可以直接放到程序的目录下。e68a847a64
关键词不能为空
极力推荐

ppt怎么做_excel表格制作_office365_word文档_365办公网