主题：[求助]EXCEL报表

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

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

 

 

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

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

呵呵，我的方法

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