ABAP 实现Excel 粘贴复制

      "设置需要复制的区域
        CLEAR gv_range.
        gs_ole2-row1 = 1.
        gs_ole2-col1 = 1.
        gs_ole2-row2 = 50.
        gs_ole2-col2 = 40.

        PERFORM fmi_copy.

FORM fmi_copy .
  CALL METHOD OF gv_excel 'Cells' = gv_cell1   "起始单元格
    EXPORTING #1 = gs_ole2-row1
    #2 = gs_ole2-col1.

  CALL METHOD OF gv_excel 'Cells' = gv_cell2   "终止单元格
    EXPORTING #1 = gs_ole2-row2
    #2 = gs_ole2-col2.

  CALL METHOD OF gv_excel 'Range' = gv_range   "生成区域
    EXPORTING
      #1 = gv_cell1
      #2 = gv_cell2.

  CALL METHOD OF gv_range 'Select' . "选中区域
  CALL METHOD OF gv_range 'Copy'. "复制
ENDFORM