1

昨年の翌月の日付と比較しようとしています。date1からの日付が昨年からの翌月の1日よりも小さい場合は、trueを返します。日付を1年先に設定した場合にのみ、条件が失敗するようです。

LastRightToKnow = 7/14/2011
Dim RTK As String
RTK = ""
If [NeedsRightToKnow] = -1 And [LastRightToKnow] < DateSerial(Year(Now() - 1), Month(Now() + 1), 1) Then
RTK = "Right-To-Know"
End If

だから、私の理解から、私はそれを収集しtoday = 6/14/2012ます

DateSerial(Year(Now() - 1), Month(Now() + 1), 1)  = 7/01/2011 
LastRightToKnow = 7/14/2011 

したがって、7/14/2011 < 7/01/2011を返す必要がありFalseます。しかしそれは戻りますtrue...私は何が欠けていますか?

4

2 に答える 2

3

パレテシスの配置が原因で、数式がオフになっています。

? DateSerial(Year(Now() - 1), Month(Now() + 1), 1)
6/1/2012 
? DateSerial(Year(Now()) - 1, Month(Now()) + 1, 1)
7/1/2011 

編集:1か月間同じことをする必要があります

于 2012-06-14T15:50:06.863 に答える
1
Now() +1 = tomorrow

私はあなたが意味すると思います

DateSerial(Year(Now())-1, Month(Now())-1, 1)  = 7/01/2011 
于 2012-06-14T15:45:48.150 に答える