这个代码怎么修改设置当前日期变色

软件 2023-09-20

在EXCEl表格中，怎么设定日期到期后自动变色例如：我在C1列设定的第一个日期是20141015，到期自动变红色

解决在EXCEl表格中，怎么设定日期到期后自动变色的步骤如下：

1.打开你需要设置的Excel电子表格，然后鼠标移到你需要设置的日期栏，然后再选上方的函数fx。

2.设置函数类别为日期时间。

3.输入年月日，然后把这一栏全部套用格式，或者用格式刷刷一下。

4.选中做好的日期一栏，然后选上方条开始，找到条件格式。在条件格式中，选择新建规则。

5.在新建格式规则内，选只为包含以下单元格设置格式，然后在下方选择小于，输入＝TODAY()。

6.接上一步，不能确认，需要在上一步预览处点击格式，然后设置单元格格式，点击填充，点击你需要的颜色。这样就解决了在EXCEl表格中，怎么设定日期到期后自动变色例的问题了。

excel中如何设置日期，到期变色提醒

下面就来分享一下Excel表格中如何设置日期到期提醒。

1、首先在打开的表格中，框选需要设置日期到期提醒的单元格。

2、这时在上面点选“开始——条件格式”。

3、条件格式中，点选“突出显示单元格规则——发生日期”。

4、弹出页，点选时间选项“昨天”，选择“下月”。

5、设置好提醒时间后，点击“确定”。

6、返回日期界面，即可看到下月到期日期已高亮显示。

如何设置EXCEL 日期提醒或变醒目颜色

单元格根据日期自动变色的问题在EXCEL中可用两种方法实现：

方法一：

条件格式，操作如下(以到期前五天举例)：

开始-->条件格式-->新建规则-->使用公式确定-->输入公式=(A1>TODAY()-5)*(A1设置单元格填充色-->确定。

公式中的星号可用and函数替代。

方法二：

VBA代码。

alt+f11打开VBA, 键入如下代码到需要设置颜色的sheet下，

PrivateSubWorksheet_SelectionChange(ByValTargetAsRange)
DimcelAsRange
ForEachcelInRange("a1:a"&Range("a65536").End(xlUp).Row)
Ifcel>Date-5AndcelNext
EndSub

Excel 日期自动变色

单元格自动变色的问题在EXCEL中可用两种方法实现：