标题：求 克隆行按钮 代码的运行规则

我表格中有一个代码   

Case "定单号","定单行号"
If dr.IsNull("生产任务单") Then
                dr("生产任务单") = dr("定单号") & "-" & dr("定单行号") & "-"  & Format( dr ("_Identify")+1,"0000")
 End If        

按我对克隆行的理解。克隆一行后，新增行 生产任务单 应该等于 上一行的 生产任务单

可是我克隆行后，表重新执行了代码

此主题相关图片如下：1.jpg

怎么样做可以让克隆行时，不执行代码？

用全局变量做开头关，DataColChanged事件判断全局变量的值，当变量值为设定值时执行，否则不执行（也就是执行克隆行时不执行DataColChanged代码）。

不过你还需注意重置列时对原数据产生的影响。