טיפול בתאריך

כמובן Date Serial
ולא DatePart
המעלה החשובה בפונקציה הזאת היא שאם נניח תרצה לקבוע 2 תאריכים
הראשון יתייחס לתחילת החודש
והשני ליום האחרון של החודש

בעקרון היית אמור לבדוק כמה ימים יש בחודש, לבנות לזה פונקציה וכו' וכו'

אבל בעזרת DateSerial את פטור מכל זה

אם תקבל את השנה והחודש במשתנים, זה יספיק

דוגמה:

Dim _year As Integer
Dim _month as Integer

Dim _from As Date
Dim _to As Date

_from = DateSerial(_year, _month, 1)
_to = DateSerial(_year, (_month + 1), 0)

……..

שים לב לערך 0 שהזנתי במיקום של היום בחודש
ניתן להזין גם ערכים שליליים בכל אחד מן הפרמטרים והמערכת תחשב את זה

המון הצלחה