主题：更改提示或记录

datacolchanged事件

Select Case e.DataCol.Name
    Case "A列","B列","C列","D列","E列"
        e.DataRow("最后修改人") = user.name
        e.DataRow("最后修改时间") = Date.now
        e.DataRow("修改内容记录") = user.name & "在" & Date.now & "把列【" & e.DataCol.name & "】值【" & e.OldValue & "】修改成【" & e.NewValue & "】" & vbcrlf & e.DataRow("修改内容记录")
End Select