如果范围包括2016年期间的日期

Question

我正在编写一个宏，如果一个范围包括2016年的任何日期（例如），我想执行一些代码。我有一个开始（我认为）。

Dim rptDateColumn As Range
Set rptDateColumn = Sheets("Data").Range("N:N")
For Each cell In rngRptgDate
    If ... (the date is during 2016)... Then
...This other stuff happens

有什么建议？

Answer 1

尝试这个...

If Year(cell) = 2016 Then