ASP.NET Web Forms - How to export several controls to different XLSX worksheets

C#
using System;
using System.IO;
using DevExpress.XtraCharts;
using DevExpress.XtraCharts.Native;
using DevExpress.XtraPrinting;
using DevExpress.XtraPrintingLinks;

public partial class _Default : System.Web.UI.Page {
    protected void Page_Load(object sender, EventArgs e) {
        if(!IsPostBack) {
            Tree.DataBind();
            Tree.ExpandToLevel(2);
        }

        Chart.SeriesDataMember = "CategoryName";
        Chart.SeriesTemplate.ArgumentDataMember = "ProductSales";
        Chart.SeriesTemplate.ValueDataMembers.AddRange(new string[] { "ProductSales" });
        Chart.SeriesTemplate.View = new StackedBarSeriesView();
    }
    protected void ExportButton_Click(object sender, EventArgs e) {
        PrintingSystemBase ps = new PrintingSystemBase();

        PrintableComponentLinkBase link1 = new PrintableComponentLinkBase(ps);
        link1.Component = Grid;

        PrintableComponentLinkBase link2 = new PrintableComponentLinkBase(ps);
        link2.Component = Tree;

        PrintableComponentLinkBase link3 = new PrintableComponentLinkBase(ps);
        Chart.DataBind();
        link3.Component = ((IChartContainer)Chart).Chart;

        CompositeLinkBase compositeLink = new CompositeLinkBase(ps);
        compositeLink.Links.AddRange(new object[] { link1, link2, link3 });

        compositeLink.CreatePageForEachLink();

        using(MemoryStream stream = new MemoryStream()) {
            XlsxExportOptions options = new XlsxExportOptions();
            options.ExportMode = XlsxExportMode.SingleFilePageByPage;
            compositeLink.PrintingSystemBase.ExportToXlsx(stream, options);
            Response.Clear();
            Response.Buffer = false;
            Response.AppendHeader("Content-Type", "application/xlsx");
            Response.AppendHeader("Content-Transfer-Encoding", "binary");
            Response.AppendHeader("Content-Disposition", "attachment; filename=test.xlsx");
            Response.BinaryWrite(stream.ToArray());
            Response.End();
        }
        ps.Dispose();
    }
}

Visual Basic
Imports Microsoft.VisualBasic
Imports System
Imports System.IO
Imports DevExpress.XtraCharts
Imports DevExpress.XtraCharts.Native
Imports DevExpress.XtraPrinting
Imports DevExpress.XtraPrintingLinks

Partial Public Class _Default
    Inherits System.Web.UI.Page
    Protected Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs)
        If (Not IsPostBack) Then
            Tree.DataBind()
            Tree.ExpandToLevel(2)
        End If

        Chart.SeriesDataMember = "CategoryName"
        Chart.SeriesTemplate.ArgumentDataMember = "ProductSales"
        Chart.SeriesTemplate.ValueDataMembers.AddRange(New String() { "ProductSales" })
        Chart.SeriesTemplate.View = New StackedBarSeriesView()
    End Sub
    Protected Sub ExportButton_Click(ByVal sender As Object, ByVal e As EventArgs)
        Dim ps As New PrintingSystemBase()

        Dim link1 As New PrintableComponentLinkBase(ps)
        link1.Component = GridExporter

        Dim link2 As New PrintableComponentLinkBase(ps)
        link2.Component = TreeListExporter

        Dim link3 As New PrintableComponentLinkBase(ps)
        Chart.DataBind()
        link3.Component = (CType(Chart, IChartContainer)).Chart

        Dim compositeLink As New CompositeLinkBase(ps)
        compositeLink.Links.AddRange(New Object() { link1, link2, link3 })

        compositeLink.CreatePageForEachLink()

        Using stream As New MemoryStream()
            Dim options As New XlsxExportOptions()
            options.ExportMode = XlsxExportMode.SingleFilePageByPage
            compositeLink.PrintingSystemBase.ExportToXlsx(stream, options)
            Response.Clear()
            Response.Buffer = False
            Response.AppendHeader("Content-Type", "application/xlsx")
            Response.AppendHeader("Content-Transfer-Encoding", "binary")
            Response.AppendHeader("Content-Disposition", "attachment; filename=test.xlsx")
            Response.BinaryWrite(stream.ToArray())
            Response.End()
        End Using
        ps.Dispose()
    End Sub
End Class