*&---------------------------------------------------------------------*
*& Report ZDEMO_EXCEL
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*
REPORT zdemo_excel.
DATA: lv_workdir TYPE string.
PARAMETERS: p_path TYPE string.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_path.
cl_gui_frontend_services=>directory_browse( EXPORTING initial_folder = p_path
CHANGING selected_folder = p_path ).
INITIALIZATION.
cl_gui_frontend_services=>get_sapgui_workdir( CHANGING sapworkdir = lv_workdir ).
p_path = lv_workdir.
START-OF-SELECTION.
IF p_path IS INITIAL.
p_path = lv_workdir.
ENDIF.
SUBMIT zdemo_excel1 with p_path = p_path AND RETURN. " Hello world
SUBMIT zdemo_excel2 with p_path = p_path AND RETURN. " Styles
SUBMIT zdemo_excel3 with p_path = p_path AND RETURN. " iTab binding
SUBMIT zdemo_excel4 with p_path = p_path AND RETURN. " Multi sheets and page setup
SUBMIT zdemo_excel5 with p_path = p_path AND RETURN. " Conditional formatting
SUBMIT zdemo_excel6 with p_path = p_path AND RETURN. " Formulas
SUBMIT zdemo_excel7 with p_path = p_path AND RETURN. " Conditional formatting
SUBMIT zdemo_excel8 with p_path = p_path AND RETURN. " Ranges
SUBMIT zdemo_excel9 with p_path = p_path AND RETURN. " Data validation
SUBMIT zdemo_excel10 with p_path = p_path AND RETURN. " Bind table with field catalog
" zdemo_excel11 is not added because it has a selection screen and
" you also need to have business partners maintained in transaction BP
SUBMIT zdemo_excel12 with p_path = p_path AND RETURN. " Column size
SUBMIT zdemo_excel13 with p_path = p_path AND RETURN. " Merge cell
SUBMIT zdemo_excel14 with p_path = p_path AND RETURN. " Alignment
SUBMIT zdemo_excel15 with p_path = p_path AND RETURN. " Read Excel and write it back
SUBMIT zdemo_excel16 with p_path = p_path AND RETURN. " Drawing
SUBMIT zdemo_excel17 with p_path = p_path AND RETURN. " Lock sheet
SUBMIT zdemo_excel18 with p_path = p_path AND RETURN. " Lock workbook
SUBMIT zdemo_excel19 with p_path = p_path AND RETURN. " Set active sheet