各位老师，我现在有一份excel报表，每一页都有很多条数据，我现在需要对每一条数据，让报表自动生成内容随数据变化的条码，应该怎么做呢？
我看到帮助里有这个代码可以批量生成条形码：
Dim
doc As New
PrintDoc
Dim
rg As prt.RenderGraphics
Dim
Bar As New
BarCodeBuilder
Bar.Symbology = Barpro.Symbology.QRCode
Doc.Stacking = prt.StackingRulesEnum.InlineLeftToRight
For Each
r As Row In
Tables("表A").Rows
bar.Code = r("第一列")
rg = new
prt.RenderGraphics
bar.DrawOnCanvas(rg.Graphics,0,0,1)
rg.Style.Spacing.All = 3
Doc.Body.Children.Add(rg)
Next
Doc.Preview()
但是，如果要对不止一列的数据批量生成，应该怎么做？
如果要让生成的条码上可以显示包含的内容。比如用姓名做的条码，那么除了条码外还标出姓名，以便以分发，那么又应该怎么做呢？
十分感谢！
[此贴子已经被作者于2015/10/15 8:07:59编辑过]
加好友 
发短信
Post By：2015/10/15 7:56:00 [显示全部帖子]
