I have a problem with SAP OLE to manipulate Excel file. I need to set a specific cell and put a value there. Could somebody direct me to the
correct way to write this in ABAP?
Here is my code and it does not work (SAP4.0B and Excel 97).
CREATE OBJECT h_appl 'EXCEL.APPLICATION'.
GET PROPERTY OF h_appl 'ACTIVESHEET' = h_sheet.
GET PROPERTY OF h_sheet 'RANGE(""A1"")' = h_range. "activate
cell A1
CALL METHOD OF h_range 'SELECT'.
SET PROPERTY OF h_cell 'VALUE' = 'my value'.
Thanks in advance.
> Mike
>
Try the following to activate and set the value to the cell:
DATA: H_APPL TYPE OLE2_OBJECT,
H_WORK TYPE OLE2_OBJECT,
H_SHEET TYPE OLE2_OBJECT,
H_CELL TYPE OLE2_OBJECT,
W_ROW_IT LIKE SY-TABIX, " row number of the cell
W_COL_IT LIKE SY-TABIX, " column number of the cell
P_FILE LIKE RLGRAP-FILENAME.
CALL METHOD OF H_APPL 'WORKBOOKS' = H_WORK.
CALL METHOD OF H_WORK 'ADD'.
CALL METHOD OF H_APPL 'WORKSHEETS' = H_SHEET EXPORTING #1 = 1.
CALL METHOD OF H_SHEET 'ACTIVATE'.
CALL METHOD OF H_SHEET 'CELLS' = H_CELL
EXPORTING #1 = W_ROW_IT #2 = W_COL_IT.
SET PROPERTY OF H_CELL 'VALUE' = 'my value'.
CALL METHOD OF H_SHEET 'SAVEAS' EXPORTING #1 = P_FILE.
CALL METHOD OF H_APPL 'QUIT'.
FREE OBJECT H_APPL.
H_APPL-HANDLE = -1.