主题：信息提示

动态错误提示事例：

在AfterEdit事件中设置代码：

If e.Col.name = "折扣" Then
If e.Row("折扣") > 0.2 Then
e.Row.DataRow.SetError("折扣", "折扣不能超过0.2!")
Else
e.Row.DataRow.SetError("折扣","")
End If
End If

这样用户输入超过0.2的折扣后，会在折扣单元格显示一个红色的图标，表示这里输入的内容有误，当鼠标移到这个红色图标上时，会显示具体的错误信息：

能够利用类似代码，实现单元格修改提示

希望实现某预算清单审批后但需要修改时，对于经过修改的单元格显示红色图标，标识这里的内容进行了修改，当鼠标移到这个红色图标上时，会显示具体信息，如修改前的内容、修改人、修改日期

没有经过审批的预算清单进行修改时则不显示修改记录。