topic Print EXCEL file from ABAP program ? in Application Development and Automation Discussions

topic Print EXCEL file from ABAP program ? in Application Development and Automation Discussions https://community.sap.com/t5/application-development-and-automation-discussions/print-excel-file-from-abap-program/m-p/5572182#M1271061 <HTML><HEAD></HEAD><BODY><P>Hello,</P><P></P><P>In my program, I need to print an excel file using the OLE:</P><P></P><P>CREATE OBJECT excel 'EXCEL.APPLICATION' .</P><P></P><P>but then i do not the command for printing the file , for example filename = C:\test.xls</P><P></P><P>Thanks</P></BODY></HTML> Tue, 12 May 2009 06:32:24 GMT Former Member 2009-05-12T06:32:24Z Print EXCEL file from ABAP program ? https://community.sap.com/t5/application-development-and-automation-discussions/print-excel-file-from-abap-program/m-p/5572182#M1271061 <HTML><HEAD></HEAD><BODY><P>Hello,</P><P></P><P>In my program, I need to print an excel file using the OLE:</P><P></P><P>CREATE OBJECT excel 'EXCEL.APPLICATION' .</P><P></P><P>but then i do not the command for printing the file , for example filename = C:\test.xls</P><P></P><P>Thanks</P></BODY></HTML> Tue, 12 May 2009 06:32:24 GMT https://community.sap.com/t5/application-development-and-automation-discussions/print-excel-file-from-abap-program/m-p/5572182#M1271061 Former Member 2009-05-12T06:32:24Z Re: Print EXCEL file from ABAP program ? https://community.sap.com/t5/application-development-and-automation-discussions/print-excel-file-from-abap-program/m-p/5572183#M1271062 <HTML><HEAD></HEAD><BODY><P>check the folloiwng example:- in two part <STRONG>PART-1</STRONG></P><P>REPORT ZOLE_ABAP.</P><P>INCLUDE ole2incl.</P><P>TYPES: BEGIN OF ty_spfli,</P><P> kunnr TYPE kna1-kunnr,</P><P> land1 TYPE kna1-land1,</P><P> NAME1 TYPE KNA1-NAME1,</P><P> ORT01 TYPE KNA1-ORT01,</P><P> REGIO TYPE KNA1-REGIO,</P><P> ADRNR TYPE KNA1-ADRNR,</P><P> END OF ty_spfli.</P><P>TYPES: BEGIN OF ty_titles,</P><P> title(20) TYPE c,</P><P> field(20) TYPE c,</P><P> END OF ty_titles.</P><P>DATA: t_spfli TYPE STANDARD TABLE OF ty_spfli,</P><P> t_titles TYPE STANDARD TABLE OF ty_titles.</P><P>FIELD-SYMBOLS: <fs_spfli> LIKE LINE OF t_spfli,</P><P> <fs_titles> LIKE LINE OF t_titles,</P><P> <fs> TYPE ANY.</P><P>DATA: w_tabix TYPE sy-tabix,</P><P> w_titles TYPE sy-tabix,</P><P> w_line TYPE sy-tabix,</P><P> w_field TYPE string,</P><P> filename TYPE string,</P><P> path TYPE string,</P><P> fullpath TYPE string.</P><P>DATA: data_titles TYPE REF TO data.</P><P>DATA: e_sheet TYPE ole2_object,</P><P> e_activesheet TYPE ole2_object,</P><P> e_newsheet TYPE ole2_object,</P><P> e_appl TYPE ole2_object,</P><P> e_work TYPE ole2_object,</P><P> e_cell TYPE ole2_object,</P><P> e_color TYPE ole2_object,</P><P> e_bold TYPE ole2_object.</P><P>SELECTION-SCREEN BEGIN OF BLOCK b1.</P><P>PARAMETERS: p_file TYPE rlgrap-filename.</P><P>SELECTION-SCREEN END OF BLOCK b1.</P><P>START-OF-SELECTION.</P><P> PERFORM get_titles.</P><P> PERFORM get_data.</P><P> PERFORM create_excel.</P><P>AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_file.</P><P> CALL METHOD cl_gui_frontend_services=>file_save_dialog</P><P> EXPORTING</P><P> window_title = 'Select archivo'</P><P> default_extension = 'xls'</P><P> file_filter = '*.xls'</P><P> CHANGING</P><P> filename = filename</P><P> path = path</P><P> fullpath = fullpath.</P><P> IF sy-subrc EQ 0.</P><P> p_file = fullpath.</P><P> ENDIF.</P></BODY></HTML> Tue, 12 May 2009 06:46:07 GMT https://community.sap.com/t5/application-development-and-automation-discussions/print-excel-file-from-abap-program/m-p/5572183#M1271062 Former Member 2009-05-12T06:46:07Z Re: Print EXCEL file from ABAP program ? https://community.sap.com/t5/application-development-and-automation-discussions/print-excel-file-from-abap-program/m-p/5572184#M1271063 <HTML><HEAD></HEAD><BODY><P><STRONG>REMAING PART</STRONG> <STRONG>PART-II</STRONG></P><P></P><P>FORM get_titles.</P><P> CREATE DATA data_titles TYPE ty_titles.</P><P> ASSIGN data_titles->* TO <fs_titles>.</P><P> <fs_titles>-title = 'Customer Number 1'.</P><P> <fs_titles>-field = 'KUNNR'.</P><P> APPEND <fs_titles> TO t_titles.</P><P> <fs_titles>-title = 'Country Key'.</P><P> <fs_titles>-field = 'LAND1'.</P><P> APPEND <fs_titles> TO t_titles.</P><P> <fs_titles>-title = 'Name 1'.</P><P> <fs_titles>-field = 'NAME1'.</P><P> APPEND <fs_titles> TO t_titles.</P><P> <fs_titles>-title = 'City'.</P><P> <fs_titles>-field = 'ORT01'.</P><P> APPEND <fs_titles> TO t_titles.</P><P> <fs_titles>-title = 'Region'.</P><P> <fs_titles>-field = 'REGIO'.</P><P> APPEND <fs_titles> TO t_titles.</P><P> <fs_titles>-title = 'Address'.</P><P> <fs_titles>-field = 'ADRNR'.</P><P> APPEND <fs_titles> TO t_titles.</P><P>ENDFORM. "get_titles</P><P>FORM get_data.</P><P> SELECT KUNNR LAND1 NAME1 ORT01 REGIO ADRNR</P><P> INTO TABLE t_spfli</P><P> FROM KNA1</P><P> WHERE LAND1 EQ 'IN'</P><P> and KUNNR EQ '0000700008'.</P><P></P><P>ENDFORM. " get_data</P></BODY></HTML> Tue, 12 May 2009 06:46:51 GMT https://community.sap.com/t5/application-development-and-automation-discussions/print-excel-file-from-abap-program/m-p/5572184#M1271063 Former Member 2009-05-12T06:46:51Z Re: Print EXCEL file from ABAP program ? https://community.sap.com/t5/application-development-and-automation-discussions/print-excel-file-from-abap-program/m-p/5572185#M1271064 <HTML><HEAD></HEAD><BODY><P><STRONG>REMAING PART</STRONG> <STRONG>PART-III</STRONG></P><P>FORM create_excel.</P><P> w_line = 1.</P><P> CREATE OBJECT e_appl 'EXCEL.APPLICATION'.</P><P> SET PROPERTY OF e_appl 'VISIBLE' = 1.</P><P> CALL METHOD OF e_appl 'WORKBOOKS' = e_work.</P><P> CALL METHOD OF e_work 'Add' = e_work.</P><P> GET PROPERTY OF e_appl 'ActiveSheet' = e_activesheet.</P><P> SET PROPERTY OF e_activesheet 'Name' = 'Customer Details'.</P><P> LOOP AT t_spfli ASSIGNING <fs_spfli>.</P><P> w_tabix = sy-tabix.</P><P> w_line = w_line + 1.</P><P> LOOP AT t_titles ASSIGNING <fs_titles>.</P><P> w_titles = sy-tabix.</P><P> CALL METHOD OF e_appl 'Cells' = e_cell</P><P> EXPORTING</P><P> #1 = 1</P><P> #2 = w_titles.</P><P> SET PROPERTY OF e_cell 'Value' = <fs_titles>-title.</P><P> GET PROPERTY OF e_cell 'Interior' = e_color.</P><P> SET PROPERTY OF e_color 'ColorIndex' = 35.</P><P></P><P> GET PROPERTY OF e_cell 'Font' = e_bold.</P><P> SET PROPERTY OF e_bold 'Bold' = 1.</P><P> CALL METHOD OF e_appl 'Cells' = e_cell</P><P> EXPORTING</P><P> #1 = w_line</P><P> #2 = w_titles.</P><P> CONCATENATE '<fs_spfli>-' <fs_titles>-field</P><P> INTO w_field.</P><P> ASSIGN (w_field) TO <fs>.</P><P> SET PROPERTY OF e_cell 'Value' = <fs>.</P><P> GET PROPERTY OF e_cell 'Interior' = e_color.</P><P> SET PROPERTY OF e_cell 'ColumnWidth' = 20.</P><P> SET PROPERTY OF e_color 'ColorIndex' = 0.</P><P> GET PROPERTY OF e_cell 'Font' = e_bold.</P><P> SET PROPERTY OF e_bold 'Bold' = 0.</P><P> ENDLOOP.</P><P> ENDLOOP.</P><P> CALL METHOD OF e_work 'SAVEAS'</P><P> EXPORTING</P><P> #1 = p_file.</P><P></P><P> CALL METHOD OF e_work 'close'.</P><P> CALL METHOD OF e_appl 'QUIT'.</P><P> FREE OBJECT e_appl.</P><P></P><P></P><P>ENDFORM. " create_excel</P></BODY></HTML> Tue, 12 May 2009 06:47:31 GMT https://community.sap.com/t5/application-development-and-automation-discussions/print-excel-file-from-abap-program/m-p/5572185#M1271064 Former Member 2009-05-12T06:47:31Z Re: Print EXCEL file from ABAP program ? https://community.sap.com/t5/application-development-and-automation-discussions/print-excel-file-from-abap-program/m-p/5572186#M1271065 <HTML><HEAD></HEAD><BODY><P>hi,</P><P></P><P>thanks for your help</P><P></P><P>But in the code I do not see and method that allows printing directly the excel file ?</P><P></P><P>please show me !</P><P></P><P>Thanks</P></BODY></HTML> Tue, 12 May 2009 06:51:06 GMT https://community.sap.com/t5/application-development-and-automation-discussions/print-excel-file-from-abap-program/m-p/5572186#M1271065 Former Member 2009-05-12T06:51:06Z Re: Print EXCEL file from ABAP program ? https://community.sap.com/t5/application-development-and-automation-discussions/print-excel-file-from-abap-program/m-p/5572187#M1271066 <HTML><HEAD></HEAD><BODY><P>Hi TinhLangTham,</P><P></P><P>Let say example filename = p_path. "C:\test.xls</P><P></P><PRE><CODE>DATA: it_string_copy(255) TYPE c OCCURS 0. *Create Excel Application CREATE OBJECT excel 'EXCEL.APPLICATION'. IF sy-subrc NE 0. WRITE: / 'No EXCEL creation possible'. STOP. ENDIF. *Create workbook in excel CALL METHOD OF excel 'WORKBOOKS' = workbook . *Set property of excel visible SET PROPERTY OF excel 'VISIBLE' = 1. SET PROPERTY OF excel 'SheetsInNewWorkbook' = 1. CALL METHOD OF workbook 'ADD'. CALL METHOD OF excel 'WORKSHEETS' = sheet EXPORTING #1 = 1. *Set name of Sheet and active it SET PROPERTY OF sheet 'NAME' = 'PO_PR_Changes '. CALL METHOD OF sheet 'ACTIVATE'. * GET PROPERTY OF EXCEL 'ActiveWorkbook' = SHEET. *Past the data into Clip board CALL METHOD cl_gui_frontend_services=>clipboard_export IMPORTING data = it_string_copy[] "Final Table CHANGING rc = rc EXCEPTIONS cntl_error = 1 error_no_gui = 2 OTHERS = 3. * Paste from clipboard CALL METHOD OF columns 'Select'. CALL METHOD OF sheet 'Paste'. CALL METHOD OF sheet 'SAVEAS' EXPORTING #1 = filename #2 = 1. "file name is the path. SET PROPERTY OF excel 'VISIBLE' = 0. " Here is the property excel will be visible FREE OBJECT: sheet.</CODE></PRE><P></P><P>Regards,</P><P>Suneel G</P></BODY></HTML> Tue, 12 May 2009 06:53:01 GMT https://community.sap.com/t5/application-development-and-automation-discussions/print-excel-file-from-abap-program/m-p/5572187#M1271066 Former Member 2009-05-12T06:53:01Z Re: Print EXCEL file from ABAP program ? https://community.sap.com/t5/application-development-and-automation-discussions/print-excel-file-from-abap-program/m-p/5572188#M1271067 <HTML><HEAD></HEAD><BODY><P>Hello , </P><P></P><P>You can try this code for printing EXCEL file from ABAP:</P><P></P><P>*</P><UL><LI level="1" type="ul"><P>Make used of OLE to create a new Excel File.</P></LI></UL><P>*</P><UL><LI level="1" type="ul"><P>Written by : SAP Basis, ABAP Programming and Other IMG Stuff</P></LI><LI level="1" type="ul"><P> <A href="http://www.sap-img.com" target="test_blank">http://www.sap-img.com</A></P></LI></UL><P>*</P><P></P><P>REPORT ZCREATEEXCEL.</P><P></P><P>TYPE-POOLS OLE2.</P><P>DATA: EXCEL TYPE OLE2_OBJECT,</P><P> WORKBOOKS TYPE OLE2_OBJECT,</P><P> WORKBOOK TYPE OLE2_OBJECT.</P><P></P><P>DATA: FILENAME LIKE RLGRAP-FILENAME.</P><P></P><UL><LI level="1" type="ul"><P>START THE EXCEL APPLICATION</P></LI></UL><P> CREATE OBJECT EXCEL 'EXCEL.APPLICATION'.</P><P> PERFORM ERR_HDL.</P><P></P><UL><LI level="1" type="ul"><P>PUT EXCEL IN FRONT</P></LI></UL><P> SET PROPERTY OF EXCEL 'VISIBLE' = 1.</P><P> PERFORM ERR_HDL.</P><P></P><UL><LI level="1" type="ul"><P>INFORM USER OF THE CURRENT STATUS</P></LI></UL><P> CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR'</P><P> EXPORTING</P><P> PERCENTAGE = 0</P><P> TEXT = TEXT-I08</P><P> EXCEPTIONS</P><P> OTHERS = 1.</P><P></P><UL><LI level="1" type="ul"><P>CREATE AN EXCEL WORKBOOK OBJECT</P></LI></UL><P> CALL METHOD OF EXCEL 'WORKBOOKS' = WORKBOOKS.</P><P> PERFORM ERR_HDL.</P><P></P><P> CALL METHOD OF WORKBOOKS 'ADD' = WORKBOOK.</P><P> PERFORM ERR_HDL.</P><P></P><UL><LI level="1" type="ul"><P>EXCEL FILENAME</P></LI></UL><P> CONCATENATE SY-REPID '_' SY-DATUM<EM>6(2) '_' SY-DATUM</EM>4(2) '_'</P><P> SY-DATUM(4) '_' SY-UZEIT '.XLS' INTO FILENAME.</P><P></P><P> CALL METHOD OF WORKBOOK 'SAVEAS' EXPORTING #1 = FILENAME.</P><P></P><P> FORM ERR_HDL.</P><P></P><P> IF SY-SUBRC <> 0.</P><P> WRITE: / 'OLE ERROR: RETURN CODE ='(I10), SY-SUBRC.</P><P> STOP.</P><P> ENDIF.</P><P></P><P>ENDFORM.</P><P></P><P>*-- End of Program</P><P></P><P>Hope this can help your requirement</P></BODY></HTML> Tue, 12 May 2009 07:07:18 GMT https://community.sap.com/t5/application-development-and-automation-discussions/print-excel-file-from-abap-program/m-p/5572188#M1271067 Former Member 2009-05-12T07:07:18Z Re: Print EXCEL file from ABAP program ? https://community.sap.com/t5/application-development-and-automation-discussions/print-excel-file-from-abap-program/m-p/5572189#M1271068 <HTML><HEAD></HEAD><BODY><P>See i give full code in three section u just run this code</P><P></P><P>Edited by: krupa jani on May 12, 2009 11:24 AM</P></BODY></HTML> Tue, 12 May 2009 09:23:45 GMT https://community.sap.com/t5/application-development-and-automation-discussions/print-excel-file-from-abap-program/m-p/5572189#M1271068 Former Member 2009-05-12T09:23:45Z Re: Print EXCEL file from ABAP program ? https://community.sap.com/t5/application-development-and-automation-discussions/print-excel-file-from-abap-program/m-p/5572190#M1271069 <HTML><HEAD></HEAD><BODY><P>Check this link,</P><P></P><P><A class="jive_macro jive_macro_message" href="https://community.sap.com/" __jive_macro_name="message" modifiedtitle="true" __default_attr="7447659"></A></P><P></P><P>Regards,</P><P>Joan</P></BODY></HTML> Tue, 12 May 2009 09:27:59 GMT https://community.sap.com/t5/application-development-and-automation-discussions/print-excel-file-from-abap-program/m-p/5572190#M1271069 Former Member 2009-05-12T09:27:59Z