各位老师：在表DataColChanged中，写入如下代码，希望离合单价列后，不管有没有变化，焦点都自动跳转到第12列，但现在数值有变化后焦点可以跳转，没有变化跳转不了！
If e.DataCol.Name = "单价" Then
'Messagebox.show("单价 发生变化!")
If e.NewValue = e.OldValue Then '如果新值等旧值
e.DataRow("折后单价") = e.DataRow("折后单价1")
Tables("销售出库单_Table1").Select(Tables("销售出库单_Table1").RowSel,12) '定位到当前行到备注列
Else
e.DataRow("折后单价") = e.DataRow("折后单价1")
e.DataRow("修改前单价") = e.OldValue
e.DataRow("修改单价人员") = _UsersName & " " & Date.Now
Tables("销售出库单_Table1").Select(Tables("销售出库单_Table1").RowSel,12) '定位到当前行的到备注列
End If
End If
或者离开单价列后跳到备注列的另外代码？
请各位老师费心！
加好友 
发短信
Post By：2025/4/13 13:53:00 [只看该作者]
