Re opening an excel

Question

well i am using this part of code :
FORM db_to_excel .
  CREATE OBJECT application 'excel.application'.
  SET PROPERTY OF application 'visible' = 1.
  CALL METHOD OF application 'Workbooks' = workbook.
*CALL METHOD OF workbook 'Add'. "if you want to create a file
  CALL METHOD OF workbook 'Open'
    EXPORTING
     #1 = p_file .
         'C:\Temp\XXX0099_Support_20XX.xls'.  "your excel file name
*here
Create second Excel sheet  "Timesheets
  CALL METHOD OF application 'Worksheets' = sheet
    EXPORTING
      #1 = 2.
  SET PROPERTY OF sheet 'Name' = 'Timesheets'.
  CALL METHOD OF sheet 'Activate'.
  clear: w_index.
  LOOP AT itab.
    w_index = sy-tabix + 3.
    CALL METHOD OF application 'Cells' = cells
      EXPORTING
        #1 = w_index      " line
        #2 = 1.           " column
    SET PROPERTY OF cells 'Value' = itab-budat .  "need to be changed
    CALL METHOD OF application 'Cells' = cells
      EXPORTING
        #1 = w_index    "line
        #2 = 3.         " col
    SET PROPERTY OF cells 'Value' = itab-ltext .  "need to be changed
  ENDLOOP.
Save excel spreadsheet to particular filename
  CALL METHOD OF sheet 'Save'
    EXPORTING
   #1 = p_file
      #1 = 'c:\temp\XXX0099_Support_20XX.xls'
      #2 = 1."filename
  "fileFormat
Closes excel window, data is lost if not saved
SET PROPERTY OF application 'visible' = 0.
ENDFORM.                    " output
<b>i have a problem re-runing the report.
when i re-run the excel i dont want the new index of the internal table to be overwritten in the excel but to be appended in the excisted excel document.</b>

Answer 1

i think this is the solution to my prob.
CALL METHOD OF application 'Worksheets' = sheet
    EXPORTING
      #1 = 2.
  SET PROPERTY OF sheet 'Name' = 'Timesheets'.
  CALL METHOD OF sheet 'Activate'.
CALL METHOD OF gs_chart 'Location'
EXPORTING #1 = 2
          #2 = 'Timesheets'.
CALL FUNCTION 'ALSM_EXCEL_TO_INTERNAL_TABLE'
  EXPORTING
    FILENAME                      = p_file
    I_BEGIN_COL                   = 1
    I_BEGIN_ROW                   = 3
    I_END_COL                     = 1
    I_END_ROW                     = 60000
  TABLES
    INTERN                        = itemp
EXCEPTIONS
   INCONSISTENT_PARAMETERS       = 1
   UPLOAD_OLE                    = 2
   OTHERS                        = 3
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
loop at itemp.
w_lin = sy-tabix.
endloop.