以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  日志记录列如何记录多条记录?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=125070)

--  作者:初心不改再说未来
--  发布时间:2018/9/19 12:21:00
--  日志记录列如何记录多条记录?

假定新增列的名称为"Log",你可以在产品的AfterEdit事件中设置如下代码:

If e.Col.Name = "单价" Then
    e.
Row("Log") = User.Name & " " & Date.Now
End
 
If


那假如我有ABCD 4个列都需要分别记录最后是谁修改了什么内容,修改的具体内容是什么,然后集中展示在同一个单元格中,应该怎么写啊?


单元格记录效果类似:


张三 2018年1月1日 将产品价格从100修改为120

李四 2018年1月2日 将销量从1修改为20



--  作者:有点甜
--  发布时间:2018/9/19 14:48:00
--  

建议编写datacolchanged事件

 

Select Case e.DataCol.name
   
    Case "A", "B", "C", "D"
        e.DataRow("Log") = User.Name & " " & Date.Now & " 将" & e.DataCol.name & "从[" & e.oldvalue & "]修改为[" & e.newvalue & "]" & vbcrlf & e.DataRow("Log")
       
End Select