涉及VBA日期比较的问题

Question

我需要编写一些代码来比较excel文件中的日期，然后根据数据评估高亮显示这些数据行。从本质上讲，此文件中有3列具有标准的月/日/年格式。我需要比较所有三列的日期，看它们是否在3天的日期差异“不关心月份”。如果它们不在3天的日期差异范围内，我想高亮它们。 OK比较的一个例子是（10/1 / 2015,12 / 2 / 2015,8 / 3/2015）我不想对这一行数据做任何事情。以下是我认为是“糟糕”的日期比较（2015年10月1日，11/3/2015，2015年8月5日）。所有日期必须在3天内，你可以看到10/1和8/5之间有4天的日期差异。我怎么能写这样的东西来评估这个呢？

Answer 1

您只需将日期的 Max（）与数组公式的 Min（）进行比较：

=IF(MAX(DAY(A1:C1))-MIN(DAY(A1:C1))>3,"fail","Close enough")

必须使用 Ctrl + Shift + 输入输入

数组公式，而不仅仅是 Enter key。

如果需要，您可以使用 VBA 执行相同的功能。