用条件格式
例:A1中输入2010-11-10
点格式-条件格式,
左边第一个选“公式”,在右边输入"=today()-3>A1"
点“格式”-图案-红色,
确定。可以试下了
在EXCEL下方的页标签上点鼠标右键,选择"查看代码",输入
Private Sub Workbook_Open()
If Year(Now) = 2010 And Month(Now) = 11 And Day(Now) = 14 - 4 Then
MsgBox "是时候了,哼哼,嘿嘿....", 64
End If
End Sub
保存,关闭再打开应该可以看到效果
我觉得可是设置格式