Kako preveriti, ali je leto v Excelu prestopno?
Ali veste, kako ugotoviti, ali je leto prestopno ali ne? V Excelu ni neposredne metode za preverjanje, lahko pa ustvarite uporabniško določeno funkcijo ali formulo za rešitev te težave.
S formulo preverite, ali je leto prestopno
Z uporabniško določeno funkcijo preverite, ali je leto prestopno
S formulo preverite, ali je leto prestopno
Če imate na delovnem listu seznam leta, vam lahko naslednja dolga formula pomaga ugotoviti, ali je določeno leto prestopno ali ne. Naredite to:
1. Poleg celic leta v prazno celico vnesite še to formulo:
= IF (ALI (MOD (A2,400) = 0, IN (MOD (A2,4) = 0, MOD (A2,100) <> 0)), "Prestopno leto", "NI prestopno leto")(A2 vsebuje leto, v katerem želite uporabiti to formulo, jo lahko spremenite po svojih željah) glej posnetek zaslona:
2. Nato povlecite ročico za polnjenje do obsega, v katerega želite vsebovati to formulo, in vsa leta so bila preverjena, ali so prestopna ali ne.
Opombe: Če je relativna celica prazna, bo tudi ta formula prikazala prestopno leto.
Z uporabniško določeno funkcijo preverite, ali je leto prestopno
Ustvarite lahko tudi uporabniško določeno funkcijo, da preverite, ali je leto prestopno, in jo lahko izpolnite na naslednji način:
1. Držite tipko ALT + F11 in odpre tipko Okno Microsoft Visual Basic for Applications.
2. Kliknite Vstavi > Moduliin prilepite naslednjo kodo v Okno modula.
Koda VBA: preverite, ali je leto prestopno
Function IsLeapYear(pYear As Integer) As Boolean
'Update 20140623
If (pYear Mod 4) = 0 And (pYear Mod 100) <> 0 Or ((pYear Mod 400) = 0) Then
IsLeapYear = True
Else
IsLeapYear = False
End If
End Function
3. Nato shranite in zaprite to kodo, se vrnite na svoj delovni list in vnesite to formulo: = isleapyear (A2), glejte posnetek zaslona:
4. Nato povlecite ročico za polnjenje do celic, v katerih želite vsebovati to formulo, in vsa leta so bila označena, FALSE pomeni ne prestopno leto in TRUE označuje prestopno leto. Oglejte si posnetek zaslona:
Povezani članek:
V Excelu poiščite najmanjši skupni imenovalec ali največji skupni faktor
Najboljša pisarniška orodja za produktivnost
Napolnite svoje Excelove spretnosti s Kutools za Excel in izkusite učinkovitost kot še nikoli prej. Kutools za Excel ponuja več kot 300 naprednih funkcij za povečanje produktivnosti in prihranek časa. Kliknite tukaj, če želite pridobiti funkcijo, ki jo najbolj potrebujete...
Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo
- Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
- Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
- Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!