Copying data from excel(more than one row) and pasting into table control

Question

I have a requirement to copy data from excel and have it pasted it into the corresponding fields table control when the user clicks on an icon.For the first part I used a class to copy it from the clip board.By the previous process,I get the data inside an internal table, but even after  trying to split the data using 'split at cl_abap_char_utilities=>horizontal_tab into table itab.' it's not working.The table and the excel file are of the same structure.
Does anyone know any cause as to why it might not work?Is there any other way to achieve my objective?
Bon

Answer 1

Hi,
try to get data into internal table as below
TYPES :     BEGIN     OF             ty_data          ,
            zbukr     TYPE           payr-zbukr       ,
            hbkid     TYPE           payr-hbkid       ,
            hktid     TYPE           payr-hktid       ,
            rzawe     TYPE           payr-rzawe       ,
            chect     TYPE           payr-chect       ,
            laufd     TYPE           reguh-laufd      ,
            laufi     TYPE           reguh-laufi      ,
            lifnr     TYPE           reguh-lifnr      ,
            vblnr     TYPE           reguh-vblnr      ,
            rwbtr     TYPE           reguh-rwbtr      ,    "uncommented
            unique_no TYPE           char13           ,   " Added SAP Doc. No. and current year concate in NEFT,RTGS and Fund Transfer cases
            END       OF             ty_data          .
DATA :      wa_file   LIKE LINE OF   it_file          ,
            wa_data   TYPE           ty_data          .
DATA:      it_data1 TYPE              kcde_intern WITH HEADER LINE,
           wa_data1 LIKE LINE OF      it_data1.
start-of-selection.
CALL FUNCTION 'KCD_EXCEL_OLE_TO_INT_CONVERT'
      EXPORTING
        filename                = lv_file1
        i_begin_col             = '1'
        i_begin_row             = '4'
        i_end_col               = '11'
        i_end_row               = '60000'
      TABLES
        intern                  = it_data1
      EXCEPTIONS
        inconsistent_parameters = 1
        upload_ole              = 2
        OTHERS                  = 3.
    IF sy-subrc = 0.
      PERFORM format_data.
    ENDIF.
FORM format_data.
  DATA : ld_index TYPE i.
  FIELD-SYMBOLS : <fs>.
  DATA it_tab LIKE wa_data OCCURS 0 WITH HEADER LINE.
      LOOP AT it_data1.
        MOVE it_data1-col TO ld_index.
        ASSIGN COMPONENT ld_index OF STRUCTURE
        it_tab TO <fs>.
        MOVE : it_data1-value TO <fs>.
    MOVE it_data1-value TO p_table.
        AT END OF row.
          APPEND it_tab.
          CLEAR it_tab.
        ENDAT.
      ENDLOOP.
       it_data[] = it_tab[] .
    ENDIF.
endform.                    "format_data