mirror of
https://github.com/abap2xlsx/abap2xlsx.git
synced 2025-05-04 23:19:45 +08:00
parent
13da36b7a2
commit
8428eb04d2
|
@ -174,8 +174,10 @@ CLASS zcl_excel_table IMPLEMENTATION.
|
|||
|
||||
|
||||
METHOD get_reference.
|
||||
DATA: lv_column TYPE zexcel_cell_column,
|
||||
DATA: lv_start_column TYPE zexcel_cell_column,
|
||||
lv_end_column TYPE zexcel_cell_column,
|
||||
lv_table_lines TYPE i,
|
||||
lv_left_column TYPE zexcel_cell_column_alpha,
|
||||
lv_right_column TYPE zexcel_cell_column_alpha,
|
||||
ls_field_catalog TYPE zexcel_s_fieldcatalog,
|
||||
lv_bottom_row TYPE zexcel_cell_row,
|
||||
|
@ -185,13 +187,12 @@ CLASS zcl_excel_table IMPLEMENTATION.
|
|||
FIELD-SYMBOLS: <fs_table> TYPE STANDARD TABLE.
|
||||
|
||||
*column
|
||||
lv_column = zcl_excel_common=>convert_column2int( settings-top_left_column ).
|
||||
lv_start_column = zcl_excel_common=>convert_column2int( settings-top_left_column ).
|
||||
lv_table_lines = 0.
|
||||
LOOP AT fieldcat INTO ls_field_catalog WHERE dynpfld EQ abap_true.
|
||||
ADD 1 TO lv_table_lines.
|
||||
ENDLOOP.
|
||||
lv_column = lv_column + lv_table_lines - 1.
|
||||
lv_right_column = zcl_excel_common=>convert_column2alpha( lv_column ).
|
||||
lv_end_column = lv_start_column + lv_table_lines - 1.
|
||||
|
||||
*row
|
||||
ASSIGN table_data->* TO <fs_table>.
|
||||
|
@ -208,7 +209,9 @@ CLASS zcl_excel_table IMPLEMENTATION.
|
|||
lv_top_row_string = zcl_excel_common=>number_to_excel_string( settings-top_left_row ).
|
||||
lv_bottom_row_string = zcl_excel_common=>number_to_excel_string( lv_bottom_row ).
|
||||
|
||||
CONCATENATE settings-top_left_column lv_top_row_string
|
||||
lv_left_column = zcl_excel_common=>convert_column2alpha( lv_start_column ).
|
||||
lv_right_column = zcl_excel_common=>convert_column2alpha( lv_end_column ).
|
||||
CONCATENATE lv_left_column lv_top_row_string
|
||||
':'
|
||||
lv_right_column lv_bottom_row_string INTO ov_reference.
|
||||
|
||||
|
|
Loading…
Reference in New Issue
Block a user