主题：采购合同打印

勾选的记录，有多个供应商的时候，你希望怎么显示？把所有供应商合并在一起，显示在【供方】？

还是说，一个供应商生成一份合同？

参考excel模板 

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

点击浏览该文件:采购订单合同.xlsx

因为你的供应商名称不同。请认真对比数据。

我测试没问题，请核对你供应商名称，必须相同，才会合并到一起，一个字符都不能差。

代码改成

Dim Book As New XLS.Book(ProjectPath & "Attachments\采购订单合同.xlsx")
Dim fl As String = ProjectPath & "Reports\采购订单合同.xlsx"
Dim str As String = "-1,"
Dim t As Table = e.Form.controls("table1").Table
For Each r As Row In t.GetCheckedRows
    str &= r("_Identify") & ","
Next
book.sheets(0)(10,11).value = "<[_Identify] in (" & str.trim(",") & ")>"
Book.Build() '生成细节区
Book.Save(fl) '保存工作簿
Dim Proc As New Process '打开工作簿
Proc.File = fl
'Proc.Verb = "Print" '指定动作
Proc.Start()