在 VBA 中,我知道您可以使用此语法从日期中减去一年

Dim testdate As String, DateTest As String
testdate= "03/21/2017"
DateTest = Month(testdate) & "/" & Day(testdate) & "/" & Year(testdate) - 1

但是你怎么能找到给定年份的第一个和最后一个日期呢?例如,让我们使用相同的日期
testdate = "03/21/2017"

并获得以下值
firstdate = "01/01/2017"
lastdate = "12/31/2017"

最佳答案

如果您始终对年初和年末感兴趣,则可以仅使用 1 月 1 日和 12 月 31 日。模仿你的语法:

Dim testdate As String, DateTest As String
testdate= "03/21/2017"
FirstDayOfYear = "1/1/" & Year(testdate)
LastDayOfYear = "12/31/" & Year(testdate)

10-07 17:19