OLE2方式操作EXCEL,OLE是将所有EXCEL中组成结构封装成一个ole2的类。通过ole2对象方法来操作Excel。 1、类对象:lo_application:一个Excel; 通过create object语句创建一个excel对象, CREATEOBJECTlo_application'Excel.Application'."创建excel对象 设置EXCEL的属性,是否可见: SETPROPERTYOFlo_application'Visible'=1."设...
MESSAGE 'upload failed' TYPE 'S' DISPLAY LIKE 'E'. ELSE. LOOP AT iexcel INTO iexcel. CASE iexcel-col. WHEN '0001'. “按照单元格一一对应放到内表中,记得需要加前导零的字段,加前导零 * ls_new-vkorg = iexcel-value. * PERFORM frm_check_authority USING ls_new-vkorg. gs_out-vbeln ...
CALL FUNCTION 'ALSM_EXCEL_TO_INTERNAL_TABLE' EXPORTING filename = f_file_name i_begin_col = 1 i_begin_row = 1 i_end_col = 100 i_end_row = 30000 TABLES intern = f_tab"gt_data EXCEPTIONS inconsistent_parameters = 1 upload_ole = 2 OTHERS = 3. SORT gt_data BY row col value."...
处理的方式大多数为后台自动处理处理,因为sap服务器一般是不能够使用MS软件来处理EXCEL文件的,所以我想到了把cl_ehfnd_xlsx其中的逻辑搬运到ECC 6.0系统的想法. 我在查找资料的时候发现网上有以下资料进行借鉴: XLSX Upload – a unified approach(https://archive.sap.com/kmuuid2/6026d7c0-c716-3010-c8be-ea...
*" UPLOAD_OLE *"--- DATA: excel_tab TYPE ty_t_sender. DATA: ld_separator TYPE c. DATA: application TYPE ole2_object, workbook TYPE ole2_object, range TYPE ole2_object, worksheet TYPE ole2_object. DATA: h_cell TYPE ole2_object, h_cell1 TYPE...
给你几个参考函数:ALSM_EXCEL_TO_INTERNAL_TABLE TEXT_CONVERT_XLS_TO_SAP KCD_EXCEL_OLE_TO_INT_CONVERT PS:其实GUI_UPLOAD对文本文件和EXCEL文件都是能够实现上载到SAP内表中的,你把FILENAME = L_FILENAME 上载文件路径换成(C:\Documents and Settings\test.xls)就行啦!!
I_END_ROW=100"读取多少行 TABLES INTERN=IEXCEL EXCEPTIONS INCONSISTENT_PARAMETERS=1 UPLOAD_OLE=2 OTHERS=3. "读取后内表保存的结构为:第一行记录第一个单元的行值列值单元格内容比如00010001第一个单元格内容 WRITE:/. IFsy-subrc<>0. WRITE:/XLS,'读入错误!'. ELSE. LOOPATIEXCEL.
upload_ole = 2 OTHERS = 3. CLEAR it_upload. REFRESH it_upload. SORT it_excel by ROW col. DATA l_index TYPE i. LOOP at it_excel. “将EXCEL内表数据存入内表it_upload中 MOVE it_excel-col TO l_index. ASSIGN COMPONENT l_index OF STRUCTURE it_upload TO <fs>. MOVE it_excel-value ...
OLE 语法参照 VBA,在 ABAP 中调用方法来操作 Excel。 语法的友好性差;另外将数据从 ABAP 内表写入到 Excel ,速度特别慢,性能难以接受。 方法: 创建实例 CREATEOBJECTname_obj'app' 设置属性 SETPROPERTYOFname_obj'XXX'= f . 读取属性 GETPROPERTYOFname_obj ‘XXX'= f . ...
首先,新建程序ztest_upload,并准备一个EXCEL文件。假设一个相对简单的情景,比如,要上传的数据库表有三个字段。那么我们也建立一个三列内容的EXCEL文件,test.xlsx: 由此,可以在代码中定义相应的内表itab: REPORTztest_upload.DATA:BEGINOFwa, col1(30)TYPEc, ...