如何在Excel中查找今天和其他日期之间的差异？

我试图做一个函数，告诉我今天和另一个日期之间的区别。如果该日期距离现在不足一个月，则显示文本1；如果距离现在超过一个月，则显示文本2。此外，如果它显示TEXT1，它还应该使单元格具有某种颜色

您可以制作自己的UDF（用户定义函数），以实现上述第一部分。不幸的是，UDF不能改变单元格，只能返回一个值。将以下代码放入工作簿中的模块中，使其正常工作

          Public Function DateCompare(EvalDate As Date) As String
            Dim cval As Integer

            cval = EvalDate - Date

            Select Case cval
                Case Is <= 30
                    DateCompare = "TEXT 1"
                Case Is > 30
                    DateCompare = "TEXT 2"
            End Select

         End Function

公共函数DateCompare（EvalDate作为日期）作为字符串
作为整数的Dim cval
cval=评估日期-日期
选择案例cval
病例30例
DateCompare=“文本2”
结束选择
端函数

如果有差异，只需减去日期即可。对于迭代，您可以只使用if子句。=if（TODAY（）试试这个：

=if（TODAY（）-D2>30；“一切正常”；“重新认证”）

。对于

如果它显示TEXT1，它也应该使单元格具有特定的颜色。

查看此单元格是否有效。谢谢。要使用此函数，请将其作为标准Excel函数输入。这里的示例假设您正在计算单元格A2中的日期

=DateCompare（A2）