原文:http://blog.sina.com.cn/s/blog_7229b9c00100opx2.html ---------------------------------------------------------------------------- REPORT ZVR013. INCLUDE OLE2INCL. DATA: GS_EXCEL TYPE OLE2_OBJECT, GS_WBOOKLIST TYPE OLE2_OBJECT, GS_APPLICATION TYPE
OLE DATA: excel TYPE ole2_object, workbook TYPE ole2_object, sheet TYPE ole2_object, cell TYPE ole2_object. FORM frm_open_excel USING p_fullpath. CREATE OBJECT excel 'EXCEL.APPLICATION'. . CALL METHOD OF excel 'Workbooks' = workbook. CALL METHOD OF w
DATA: excel TYPE ole2_object, workbook TYPE ole2_object, sheet TYPE ole2_object, cell TYPE ole2_object, column TYPE ole2_object, row TYPE ole2_object. 插入列的方法: CALL METHOD OF excel 'COLUMNS' = column EXPO
OLE整理: 1.定义,分别对应EXCEL,workbook(工作簿),sheet(页),单元格 DATA: EXCEL_OBJ TYPE OLE2_OBJECT, BOOK_OBJ TYPE OLE2_OBJECT, SHEET_OBJ TYPE OLE2_OBJECT, CELL_OBJ TYPE OLE2_OBJECT. 2.方法说明: CREATE OBJECT name_obj 'app'."创建APP应用类的一个对象obj_name实例 SET PROPERTY OF name_ob
"1 设置行高 "参数说明:行/列号.行高/列宽.R-行 C-列 FORM row_column USING p_r p_width p_type. CASE p_type. WHEN 'R'. "行高 = p_r # = . GET PROPERTY OF gs_cells 'rows' = gs_rows. SET PROPERTY OF gs_rows 'rowheight' = p_width. WHEN 'C'. "列宽 = # = p_r. GET PR
先把基本的FORM写好: 1.行列属性 FORM row_column USING p_r p_width p_type. CASE p_type. WHEN 'R'. "行高 = p_r # = . GET PROPERTY OF gs_cells 'rows' = gs_rows. SET PROPERTY OF gs_rows 'rowheight' = p_width. WHEN 'C'. "列宽 = # = p_r. GET PROPERTY OF gs_cells 'col