求助：代码或公式

清风竹-

向各位老师求助：用代码或公式求出，两个日期间含有闰月（含有2月29日）次数。

陆离Lowry

1. =SUM(N(TEXT(A2+ROW(INDIRECT("1:"&B2-A2+1))-1,"md")="229"))

复制代码

ykcbf1100

你看看是不是你要的效果

hcm19522

=SUMPRODUCT(N(TEXT(ROW(INDIRECT(A2&":"&B2)),"md")-229=0))
西元4與400整除是闰月   西元100整除非闰月

准提部林

這個運算量及速度應會少一些些//
=MOD(MMULT(DATE(YEAR(A2:B2),13^(--TEXT(A2:B2,"mdd")>{229,228}),1),{-1;1}),365)

准提部林

Sub TEST_A1()
Dim Arr, V1, V2, i&, j&, S%
Arr = [a1].CurrentRegion
For i = 2 To UBound(Arr)
    V1 = Year(Arr(i, 1)) - (Val(Format(Arr(i, 1), "mdd")) > 229)
    V2 = Year(Arr(i, 2)) + (Val(Format(Arr(i, 2), "mdd")) < 229)
    For j = V1 To V2
        If IsDate(j & "/2/29") Then S = S + 1
    Next j
    Arr(i - 1, 1) = S: S = 0
Next i
[c2].Resize(UBound(Arr) - 1, 1) = Arr
End Sub