主题：[求助]EXCEL报表

导出EXCEL报表的时候有没有办法把关联表的信息以批注的形式插入到主表的相关列中？

比如将进炉明细表的信息以批注的形式插入进炉量那一列

 

 

或者有没有其他的类似办法

我已经想出办法了，现在有个问题需要帮助，就是怎么把关联表的所有关联行变成字符串？

 楼主想出的办法是什么呢？

 编写报表事件->查询关联表数据->遍历行，取出数据。

 具体的例子，可以参考下示例。

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:excel_关联表_批注形式.zip

呵呵，我的方法

Select Case e.Book.TempLate
    Case "铝箔未完成合同清单模版"
        If e.DataRow IsNot Nothing AndAlso e.Region = "订单" Then
            Dim Arys As List(Of String()) = DataTables("铝箔退火炉").GetUniqueValues("合同序号 = '" & e.DataRow("合同序号") & "'", "炉号","出炉时间","进炉量")
            Dim S As String
            For Each Ary As String() In Arys
                S = S & Ary(0) & " | " & Ary(1) & " | " & Ary(2) & "          "
            Next
            e.Book.Marks("进炉明细") = S
        End If
End Select

好样的，又学到知识