ABAP Internal Table to Excel Sheet

  Transferring Data from ABAP Internal Table to Excel Sheet

If you wish to transfer data from ABAP internal table to EXCEL you can use the following function module.

MS_EXCEL_OLE_STANDARD_DAT

This function module populates an existing excel sheet with the data from the ABAP internal table. Please find below code which shows hwo to declare and populate the import and important parameters. In the next section we will see in depth how this function module operates.

REPORT ZEX_DATATOEXCEL .

Parameters: P_file like RLGRAP-FILENAME.

data : begin of int_head occurs 0,
Filed1(20) type c,                     " Header Data
end of int_head.

data : begin of int_data occurs 0,
Field1(20) type c,                     " Data
Field2(20) type c,
Field3(20) type c,
Field4(20) type c,
end of int_data.


int_head-Filed1 = 'Sales Ord'.
APPEND int_head.
CLEAR  int_head.

int_head-Filed1 = 'Sold-to-Party'.
APPEND int_head.
CLEAR  int_head.

int_head-Filed1 = 'Purchase Ord'.
APPEND int_head.
CLEAR  int_head.

int_head-Filed1 = 'Ship-to-Party'.
APPEND int_head.
CLEAR  int_head.

int_data-field1 = '1JOHN'.
int_data-field2 = '2TOM'.
int_data-field3 = '3BRAD'.
int_data-field4 = '4PETER'.
Append int_data.
Clear int_data.


CALL FUNCTION 'MS_EXCEL_OLE_STANDARD_DAT'
EXPORTING
file_name = p_file " path offile where u need to download
* CREATE_PIVOT = 0
* DATA_SHEET_NAME = ' '
* PIVOT_SHEET_NAME = ' '
* PASSWORD = ' '
* PASSWORD_OPTION = 0
TABLES
* PIVOT_FIELD_TAB =
data_tab = int_data "internal table with data
fieldnames = int_head "internal table with header
EXCEPTIONS
file_not_exist = 1
filename_expected = 2
communication_error = 3
ole_object_method_error = 4
ole_object_property_error = 5
invalid_filename = 6
invalid_pivot_fields = 7
download_problem = 8
OTHERS = 9
.
IF sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.

---

OLE AUTOMATION IN ABAP PART 3

OLE AUTOMATION PART 3 DownLoad PDF
In this post we will see the Color code for Excel Cells by using SAP OLE.
Color code for ABAP is shown below, please use the numeric value as given in the figure below. For example if you want the interior color of the Excel cell to be of the color Cyan then use the code 8.

OLE Automation

OLE Automation an Example

Please see the report shown below. We will see more of OLE automation tomorrow. The following report shows how to send the output of ABAP report to EXCEL. It shows the various formatting options for excel sheet like borders of cells, font, bold, Cell color, using ABAP OLE automation.
http://abaplovers.blogspot.com/2008/02/ole-automation-in-abap-part-3.html
Related topics
OLE Automation Part 1
OLE Automation Part 2
OLE Automation Part 2