REPORT Z_TEST1.

data:
      BEGIN OF z_PARTNER,
        LIFNR TYPE LIFNR,
        NAME(25),
      end OF z_PARTNER,
      T_PARTNER like STANDARD TABLE OF z_PARTNER.

CLEAR: T_PARTNER, z_PARTNER.
z_PARTNER-LIFNR = '1'.
z_PARTNER-NAME = 'номер 1'.
APPEND z_PARTNER to t_PARTNER.
z_PARTNER-LIFNR = '2'.
z_PARTNER-NAME = 'номер 2'.
APPEND z_PARTNER to t_PARTNER.

* трансформация ABAP2XML
TYPES: z_xml(1024) TYPE x.
DATA:  lt_xml  TYPE STANDARD TABLE OF z_xml,
       lt_xml_xls LIKE lt_xml.
CALL TRANSFORMATION id
  SOURCE data_node = t_PARTNER
  RESULT XML lt_xml.

* трансформация XML2XML(EXCEL)
CALL TRANSFORMATION ZST_1
  SOURCE XML lt_xml[]
  RESULT XML lt_xml_XLS.

* выгрузка
* временная директория
DATA:
  l_filename TYPE string,
  l_dirname  TYPE string.
CALL METHOD cl_gui_frontend_services=>get_sapgui_workdir
  CHANGING
    sapworkdir = l_dirname
  EXCEPTIONS
    OTHERS     = 0.
CHECK sy-subrc = 0.

* имя файла для выгрузки
CLEAR: l_filename.
CONCATENATE l_dirname 'TST' '_' sy-datum '_' sy-uzeit '.xls' INTO l_filename.
* выгрузка файла
CALL METHOD cl_gui_frontend_services=>gui_download
  EXPORTING
    filename = l_filename
    filetype = 'BIN'
  CHANGING
    data_tab = lt_xml_XLS.

* откроем выгруженный XML-эксель
cl_gui_frontend_services=>execute( document = l_filename operation = 'OPEN' ).

<xsl:transform xmlns:xsl="http://www.w3.org/1999/XSL/Transform" xmlns:sap="http://www.sap.com/sapxsl" xmlns:asx="http://www.sap.com/abapxml" version="1.0">
  <xsl:strip-space elements="*"/>
  <xsl:template match="/">
    <?mso-application progid="Excel.Sheet"?>
    <Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet" xmlns:o="urn:schemas-microsoft-com:office:office" xmlns:x="urn:schemas-microsoft-com:office:excel" xmlns:ss="urn:schemas-microsoft-com:office:spreadsheet" xmlns:html=
"http://www.w3.org/TR/REC-html40">
      <DocumentProperties xmlns="urn:schemas-microsoft-com:office:office">
        <Version>12.00</Version>
      </DocumentProperties>
      <ExcelWorkbook xmlns="urn:schemas-microsoft-com:office:excel">
        <WindowHeight>8580</WindowHeight>
        <WindowWidth>17100</WindowWidth>
        <WindowTopX>360</WindowTopX>
        <WindowTopY>45</WindowTopY>
        <ProtectStructure>False</ProtectStructure>
        <ProtectWindows>False</ProtectWindows>
      </ExcelWorkbook>
      <Styles>
        <Style ss:ID="Default" ss:Name="Normal">
          <Alignment ss:Vertical="Bottom"/>
          <Borders/>
          <Font ss:Color="#000000" ss:FontName="Calibri" ss:Size="11" x:CharSet="204" x:Family="Swiss"/>
          <Interior/>
          <NumberFormat/>
          <Protection/>
        </Style>
        <Style ss:ID="s62">
          <Borders>
            <Border ss:LineStyle="Continuous" ss:Position="Bottom" ss:Weight="1"/>
            <Border ss:LineStyle="Continuous" ss:Position="Left" ss:Weight="1"/>
            <Border ss:LineStyle="Continuous" ss:Position="Right" ss:Weight="1"/>
            <Border ss:LineStyle="Continuous" ss:Position="Top" ss:Weight="1"/>
          </Borders>
        </Style>
      </Styles>

      <Worksheet ss:Name="Лист12345">
        <Table ss:DefaultRowHeight="15" ss:ExpandedColumnCount="4" ss:ExpandedRowCount="20000" x:FullColumns="1" x:FullRows="1">
          <xsl:for-each select="asx:abap/asx:values/DATA_NODE/item">
              <Row>
                <Cell ss:StyleID="s62">
                  <Data ss:Type="Number">
                    <xsl:value-of select="LIFNR"/>
                  </Data>
                </Cell>
                <Cell ss:StyleID="s62">
                  <Data ss:Type="String">
                    <xsl:value-of select="NAME"/>
                  </Data>
                </Cell>
                <Cell ss:StyleID="s62">
                  <Data ss:Type="String">
                    <xsl:value-of select="asx:abap/asx:values/DATA_NODE/item/NUMBER_OF_LINE"/>
                  </Data>
                </Cell>
                <Cell ss:StyleID="s62"/>
              </Row>
          </xsl:for-each>
        </Table>

        <WorksheetOptions xmlns="urn:schemas-microsoft-com:office:excel">
          <PageSetup>
            <Header x:Margin="0.3"/>
            <Footer x:Margin="0.3"/>
            <PageMargins x:Bottom="0.75" x:Left="0.7" x:Right="0.7" x:Top="0.75"/>
          </PageSetup>
          <Selected/>
          <Panes>
            <Pane>
              <Number>3</Number>
            </Pane>
          </Panes>
          <ProtectObjects>False</ProtectObjects>
          <ProtectScenarios>False</ProtectScenarios>
        </WorksheetOptions>
      </Worksheet>
    </Workbook>

  </xsl:template>
</xsl:transform>

<xsl:output encoding="ваша кодировка"/>

<?mso-application progid="Excel.Sheet"?>

<xsl:template match="/">
<xsl:processing-instruction name="mso-application">
  <xsl:text>progid="Word.Document"</xsl:text>
</xsl:processing-instruction>