以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=84785)
--  作者：chenchengli
--  发布时间：2016/5/10 14:26:00
--  [求助]
如何根据某一列里面的值循环克隆行？？
如   数量这列的值是8，然后将克隆8行
--  作者：大红袍
--  发布时间：2016/5/10 14:59:00
--  

参考代码，datacolchanged事件

 

If e.DataCol.name = "第二列" Then
    systemready = False
    For i As integer = 1 To e.NewValue
        Tables("表A").Current.Clone
    Next
    systemready = True
End If