excel - 2 つの日付のみで月末を配列する 1 つの数式

Question

A1: I have 1/1/13
A2: I have 7/25/13

A3で1つの式を使用して、出力が次のようになるようにするにはどうすればよいですか。

1/31/13,2/28/13,3/31/13,4/30/13,5/31/13,6/30/13,7/31,13

すなわち。1 つのセルで、1 つの数式ですべての月末日が得られます。

コードなしでお願いします。

Answer 1

これをモジュールに入れます：

Function myFormula(startDate, endDate)
    On Error GoTo err
    Dim result As String
    result = ""
    noOfMonths = DateDiff("m", startDate, endDate)
    For i = 1 To noOfMonths + 1
        Dim myDate As Date
        myDate = DateAdd("d", Day(startDate) - 1, startDate)
        myDate = DateAdd("m", i, myDate)
        myDate = DateAdd("d", -1, myDate)
        result = result & Format(myDate, "m\/d\/yy")
        If i <= noOfMonths Then result = result & ","
    Next i
    myFormula = result
ex:
    Exit Function
err:
    MsgBox (err.Number & err.Description)
    myFormula = "Error"
    Resume ex
End Function

これはA3にあります: =myFormula(A1;A2)