So sánh ngày - Ví dụ về mã VBA

Kiểm tra xem Ngày có nằm giữa các Ngày không

Hàm VBA sau sẽ kiểm tra xem một ngày nhất định có nằm giữa hai ngày khác không và nếu có, nó sẽ trả về giá trị TRUE. Nếu ngày không nằm giữa các ngày, thì nó sẽ trả về giá trị FALSE.

Hàm Compare_Dates (Start_Date As Date, End_Date As Date, Other_Date As Date) As Boolean 'Boolean Hàm để so sánh ngày' Sẽ chỉ trả về TRUE khi Other_Date nằm giữa Start_Date và End_Date 'Ngược lại sẽ trả về FALSE' Đặt kết quả thành FALSE - giá trị mặc định Compare_Dates = Sai 'So sánh ngày If ((Other_Date> = Start_Date) And (Other_Date <= End_Date)) Thì' Nếu Ngày khác nằm giữa Ngày bắt đầu và Ngày kết thúc thì đặt thành true Compare_Dates = True End Nếu Kết thúc Hàm 

Hàm có ba đối số:
• Ngày_ bắt đầu - ngày cho phép sớm nhất
• End_ Date - ngày cho phép mới nhất
• Other_Date - ngày được so sánh

Hàm phải nằm trong mô-đun Excel. Nó có thể được chạy từ Sổ làm việc Excel, ví dụ:

A4 = Compare_Dates (21-06-2003,12-02,2008,15-09-2008)
A3 = Compare_Dates (A1, A2.A3)
A1 = Compare_Dates (13-03-2005,18-08-2005, A6)
Vì vậy, Compare_Dates (25-04-2007,12-07-2008, 23-06-2006) sẽ cho giá trị TRUE vì 23-06-2006 nằm giữa 25-04-2007 và 12-07-2008.

Tương tự như vậy Compare_Dates (19-07-2003,12-12-2001,12-08-2008) sẽ trả về FALSE vì ngày 12-12-2001 KHÔNG nằm giữa 19-07-2003 và 12-08-2008

Tải xuống hàm .XLSM tại đây

Bạn sẽ giúp sự phát triển của trang web, chia sẻ trang web với bạn bè

wave wave wave wave wave