VBA Excel Date Dilema，我想今天比较一下'；s年_Excel_Vba

VBA Excel Date Dilema，我想今天比较一下'；s年

excel vba

VBA Excel Date Dilema，我想今天比较一下'；s年,excel,vba,Excel,Vba,我想将我在工作表上的日期（SOP）与今天的年份进行比较，我现在知道的是 objDate = CDate("12/31/2016") For Row = 2 To MAX_Row Application.StatusBar = "SOPintheNextYears. Progress: " & Row & " of " & MAX_Row If (Worksheets(NBG_RegionaDataWorksheetName).Cells(Row, SOP).Valu

我想将我在工作表上的日期（SOP）与今天的年份进行比较，我现在知道的是

objDate = CDate("12/31/2016")

For Row = 2 To MAX_Row 
Application.StatusBar = "SOPintheNextYears. Progress: " & Row & " of " & MAX_Row

If (Worksheets(NBG_RegionaDataWorksheetName).Cells(Row, SOP).Value <= objDate

objDate=CDate（“12/31/2016”）
对于行=2到最大行
Application.StatusBar=“sopinextyears.Progress:”&Row&“of”&MAX\u Row
If（工作表（NBG_RegionaDataWorksheetName）。单元格（行，SOP）。值使用VBA函数：
objDate=year(now)

objDate=DateSerial（Year（Now），12，31）
。请注意，您的匈牙利符号有误导性-日期不是对象。快速搜索将为您提供Year（Date）
将返回当前年份。