Patikrinkite, ar data yra tarp datų
Ši VBA funkcija patikrins, ar nurodyta data yra tarp dviejų kitų datų, ir jei taip, ji grąžins reikšmę TRUE. Jei data nėra tarp datų, ji grąžins reikšmę FALSE.
Funkcija Compare_Dates (pradžios_data kaip data, pabaigos_ data kaip data, kita_ data kaip data) kaip loginė „Boolean“ funkcija palyginant datas Netiesa 'Palyginkite datas, jei ((Kita_data> = Pradžios_data) Ir (Kita_data <= Pabaigos_data)) Tada „Jei kita data yra tarp pradžios ir pabaigos datos, tada nustatykite į teisingą Palyginti_datos = Tikroji pabaiga, jei pabaigos funkcija
Funkcija turi tris argumentus:
• Start_ date - ankstyviausia leistina data
• Pabaigos data - paskutinė leistina data
• Other_Date - lyginama data
Funkcija turi būti „Excel“ modulyje. Jis gali būti paleistas iš „Excel“ darbaknygės, pvz .:
A4 = Palyginti datas (2003-06-21, 12-02,2008,15-09-2008)
A3 = Palyginti datas (A1, A2.A3)
A1 = Palyginti datas (2005-03-13, 2005-08-18, A6)
Taigi „Compare_Dates“ (2007-04-25, 2008-07-12, 2006-06-23) suteiks vertę TIESA, nes 2006-06-23 yra nuo 2007-04-25 iki 2008-07-12.
Panašiai „Compare_Dates“ (2003-07-19, 2001-12-12, 2008-08-12) grąžins FALSE, nes 2001-12-12 NĖRA tarp 2003-07-19 ir 2008-08-12
Atsisiųskite .XLSM funkciją čia