Как сравнить даты в VBA

Question

У меня есть текущая дата в ячейке "AP2" и столбце (N) с несколькими датами. Если текущая дата выше, чем значения, указанные в столбце N, мне нужно, чтобы число макросов vba было меньше текущей даты. Но это не работает с этой формулой. Любые подсказки.

If Cells(1 + x, 1) = "@3J@" Or Cells(1 + x, 1) = "@5D@" And **Range("AP2") > Cells(1 + x, 14) And Cells(1 + x, 14) <> "" Then
    Counter_A01_incorsdata = Counter_A01_incorsdata + 1**

Answer 1

Попробуйте это ...

Sub Flavio()
    Dim n&
    n = [countifs(n:n,"<"&ap2)]
    MsgBox n
End Sub