Preskoči na glavno vsebino

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


puščica modri desni mehurček 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:

doc-check-if-prestopno-leto-1

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.

doc-check-if-prestopno-leto-1

Opombe: Če je relativna celica prazna, bo tudi ta formula prikazala prestopno leto.


puščica modri desni mehurček 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:

doc-check-if-prestopno-leto-1

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:

doc-check-if-prestopno-leto-1


Povezani članek:

V Excelu poiščite najmanjši skupni imenovalec ali največji skupni faktor

Najboljša pisarniška orodja za produktivnost

🤖 Kutools AI Aide: Revolucionirajte analizo podatkov na podlagi: Inteligentna izvedba   |  Ustvari kodo  |  Ustvarite formule po meri  |  Analizirajte podatke in ustvarite grafikone  |  Prikličite funkcije Kutools...
Priljubljene funkcije: Poiščite, označite ali identificirajte dvojnike   |  Izbriši prazne vrstice   |  Združite stolpce ali celice brez izgube podatkov   |   Krog brez formule ...
Super iskanje: Več kriterijev VLookup    Multiple Value VLookup  |   VLookup na več listih   |   Nejasno iskanje ....
Napredni spustni seznam: Hitro ustvarite spustni seznam   |  Odvisni spustni seznam   |  Večkrat izberite spustni seznam ....
Upravitelj stolpcev: Dodajte določeno število stolpcev  |  Premakni stolpce  |  Preklop stanja vidnosti skritih stolpcev  |  Primerjaj obsege in stolpce ...
Predstavljene funkcije: Mrežni fokus   |  Pogled oblikovanja   |   Velika vrstica formule    Upravitelj delovnih zvezkov in listov   |  Knjižnica virov (Samodejno besedilo)   |  Izbirnik datuma   |  Združite delovne liste   |  Šifriranje/dešifriranje celic    Pošljite e-pošto po seznamu   |  Super filter   |   Poseben filter (filter krepko/ležeče/prečrtano ...) ...
15 najboljših kompletov orodij12 Besedilo Orodja (dodajanje besedila, Odstrani znake,...)   |   50 + Graf Vrste (Gantt Chart,...)   |   40+ Praktično Formule (Izračunajte starost glede na rojstni dan,...)   |   19 vstavljanje Orodja (Vstavite kodo QR, Vstavi sliko s poti,...)   |   12 Pretvorba Orodja (Številke v besede, Pretvorba valut,...)   |   7 Spoji in razdeli Orodja (Napredne kombinirane vrstice, Razdeljene celice,...)   |   ... in več

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...

Opis


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!

 

Comments (4)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
ivec, your determination of a leap year within Excel itself works if the year is at / later than the Excel base year of 1900. For years before the Excel base year of 1900, I believe an external determination is required.
This comment was minimized by the moderator on the site
What about relying on Excel's own definition of a leap year?
The expression below checks the difference between March 1st and Feb 28 in that year - a leap year will have Feb 29 in-betweek, which makes a difference of 2 days.
IsLeapYear formula: = ( DATE( $$YEAR_REF$$ ;3;1)-DATE( $$YEAR_REF$$ ;2;28) > 1.5 )

The 1.5 is because I'm not sure if there is a risk of floating-point inaccuracies...
This comment was minimized by the moderator on the site
Please don't post my previous comment.
This comment was minimized by the moderator on the site
Using Excel 2013 the VBA returns backwards, saying 2015 is a leap year and 2016 is not
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations