سلام
بسته به اینکه از کدوم مجموعه تابع تاریخ شمسی استفاده کنید باید یک تابع مناسب برای اون ایجاد بشه که که با گرفتن تاریخ خروجی تابع فصل اون تاریخ باشه .
مثلا اگر از مجموعه توابع آقای آزادی استفاده می کنید می تونید این تابع رو بهش اضافه کنید .
Function Season(fdate As Long) As String
Select Case Val(Mid(fdate, 5, 2))
'Select Case Val(mah(fdate))
Case Is < 4
Season = "بهار"
Exit Function
Case Is < 7
Season = "تابستان"
Exit Function
Case Is < 10
Season = "پاييز"
Exit Function
Case Else
Season = "زمستان"
End Select
End Function