我每年都会为一组30人进行培训。我想在excel上找到一种让细胞改变颜色的方法。让我们说培训是在5/13/2015我想找到一种方法,该单元格将自动从绿色(有效)变为黄色(到期前一个月)和红色(已过期)。此培训仅有效期为一年。所以我希望细胞在2016年4月13日变黄,所以在训练日期前一个月无效。 (这些日期是示例,并非每个人都有相同的培训日期。)
答案 0 :(得分:0)
您需要在Excel中使用条件格式。
以下是使用单位值而不是日期的分步示例,但想法是一样的: https://www.youtube.com/watch?v=2RQnTGlM57g
视频还会在此处显示书面说明:http://www.contextures.com/xlCondFormat01.html
答案 1 :(得分:0)
使用条件格式,过期培训的公式为:
Set PT = Sheets("Pivot").PivotTables("PivotTable1")
Set Sdate = MyWorkbook.SlicerCaches.Add(PT, "Dates")'"Dates" is the header of the column
Set DateSlicer = Sdate.Slicers.Add(SlicerDestination:=Sheets("Pivot"), Name:="Time period", Caption:="Dte", Top:=40 + 187.5 + 187.5, Left:=width_counter, Width:=144, Height:=187.5) 'Top Left WIDTH HEIGHT
'Loop a slicer
For Each sI In Sdate.SlicerItems
Debug.Print "Caption; – > " & sI.Caption
Debug.Print "Value; – > " + CStr(sI.Value)
Debug.Print "Unique; Name; – > " + sI.Name
Debug.Print "——————————————————————————"
hoy = Format(Date, "mm/dd/yyyy")
If CDate(sI.Value) < CDate(hoy) Then
sI.Selected = False
End If
Next
到期培训的公式为:
=NOW()-$A$1>365
A1是要格式化的单元格的示例。
然后更改规则以格式化文本颜色。规则应按此顺序排列。请参见屏幕截图:
答案 2 :(得分:0)
与@Abe相同的原则但是如果允许闰年并且月份的长度不同,同时还要注意有30人参与(比如A1到A30的培训日期),那么可能选择A1: A30和填充(标准)绿色然后HOME&gt;样式 - 条件格式,新规则...,使用公式确定要格式化的单元格,格式化此公式为真的值::
=A1<DATE(YEAR(Now())-1,MONTH(Now()),DAY(Now()))
格式化... ,填充,红色,确定,确定和新规则...,使用公式确定要格式化的单元格,格式化此公式为真的值::
=A1<DATE(YEAR(Now())-1,MONTH(Now())+1,DAY(Now()))
格式化...... ,填充,黄色,OK,OK。