vba excel比较日期值

EXCELVBA

我的A列有一个日期列表，按日期顺序排列。我需要依次比较每个日期，例如，单元格A2中的日期值是否等于单元格A3中的日期值，如果等于，则将单元格A3与A4进行比较，重新迭代，直到下一行单元格中的日期不等于上一行单元格中的日期。然后我想在新的行单元格列a中添加一行和一个文本值

---

我正试图自己解决这个问题，但如果能指出正确的方向，我将不胜感激

请在你的问题中包含你用来解决这个问题的代码，并解释你在这个问题上遇到的具体问题。另外，当你发现第一个单元格不等于

A2

，你的迭代会停止吗？你正在为那些想帮助你的人留下大量的探索工作。请看一个带a的问题，并据此编辑您的问题。我需要继续检查新行之后的日期，直到日期不相等，然后在新行中添加另一行，其中包含文本。