excel怎么能根据后面的数字自动插入多少行?

15813191501

现在要打印物料编号贴在料盘上如下图, 每条编号要打印不同的张数,手工插入行太麻烦了,有没有什么公式或简便方法?   因为要批量打印,打印软件支持导入excel文件,,所以要先整好文档!

Himem

用VBA呀

1.     pos = 1
   
2.     For i = 1 To 10000
   
3.     r = Val(Sheets("Sheet1").Cells(i, "C").Value)
   
4.     If r = 0 Then Exit Sub
   
5.     For j = 1 To r
   
6.         pos = pos + 1
   
7.         Sheets("Sheet2").Cells(pos, "A") = Sheets("Sheet1").Cells(i, "A")
   
8.         Sheets("Sheet2").Cells(pos, "B") = Sheets("Sheet1").Cells(i, "B")
   
9.     Next
   
10.     Next
    

复制代码

大概这意思

memstone

我是不插行，直接读取张数，BarTender 可以直接设定打印张数。

prow

matlab解决任何excel问题

15813191501

谢谢各位。刚刚百度了一下，用公式解决了，也没有插入行数，在另外两列生成新的数据，VBA不会搞啊，呵呵！