单元格根据日期自动变色的问题在EXCEL中可用两种方法实现:
方法一:
条件格式,操作如下(以到期前五天举例):
开始-->条件格式-->新建规则-->使用公式确定-->输入公式=(A1>TODAY()-5)*(A1
公式中的星号可用and函数替代。
方法二:
VBA代码。
alt+f11打开VBA, 键入如下代码到需要设置颜色的sheet下,
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim cel As Range
For Each cel In Range("a1:a" & Range("a65536").End(xlUp).Row)
If cel > Date - 5 And cel < Date Then cel.Interior.ColorIndex = 20
Next
End Sub
选中全部日期单元格,选择格式,条件格式,条件一输入单元格数值“等于”“Today()”,条件二输入“介于”“Today()-2”“Today()+2”,分别为条件一和条件二设置不同的单元格格式(颜色)
2007操作如下:
选中单元格
工具栏"开始"中标签"样式"选择"条件格式"
在下拉箭头中选择"突出显示单元格规则"->"发生日期"
在其中就可以选择编辑颜色的条件了,比如"今天","前后一周"等
关键你的时间不是标准时间格式,如果是标准时间格式,用条件格式就可以了
能否将时间调整为2011-5-17这样的
选中A1点格式-条件格式-公式=(TODAY()-$A1)>=5 点格式-字体-颜色-红色
然后选中A1点格式刷.对下面的单无格刷一下.