ABAP OLE插入二维柱形图

数据输出后,用图表表示,能够很直观地反映数据的增长或递减情况,比如销售产品,可以很直观地知道每个月的某种产品销售情况;

设计方法如下:

选择产品,极其数量;

 

form set_chart.

   GET PROPERTY OF  excel_obj 'ACTIVESHEET' = sheet_obj.

   call method of excel_obj 'Range' = range_obj
     exporting #1 = 'A5:A14,F5:F14' .

   call method of range_obj 'SELECT'.
   CALL METHOD  of sheet_obj 'Shapes' = shapes_obj .
   call method of shapes_obj 'AddChart' = chart_obj.
*   get property of chart_obj 'ACTIVECHART' .

endform.