Перейти до основного матеріалу

Як перевірити, чи рік є високосним в Excel?

Чи знаєте ви, як визначити, рік є високосним чи ні? В Excel немає прямого способу перевірити його, але ви можете створити визначену користувачем функцію або формулу для вирішення цієї проблеми.

Перевірте, чи рік є високосним за формулою

Перевірте, чи рік є високосним за допомогою функції, визначеної користувачем


стрілка синя права міхур Перевірте, чи рік є високосним за формулою

Припустимо, що у вас на робочому аркуші є список року, наступна довга формула може допомогти вам визначити, чи є даний рік високосним чи ні. Будь ласка, зробіть так:

1. Окрім клітинок року, у порожню комірку введіть таку формулу:

= IF (АБО (АБО (MOD (A2,400 0) = 2,4, І (MOD (A0) = 2,100, MOD (A0 XNUMX) <> XNUMX)), "Високосний рік", "НЕ високосний рік"), (A2 містить рік, в якому ви хочете застосувати цю формулу, ви можете змінити її відповідно до своїх потреб) див. знімок екрана:

doc-check-if-високосний рік-1

2. Потім перетягніть маркер заповнення до діапазону, в якому ви хочете містити цю формулу, і всі роки перевіряються, чи є вони високосними чи ні.

doc-check-if-високосний рік-1

примітки: Якщо відносна комірка порожня, ця формула також відображатиме високосний рік.


стрілка синя права міхур Перевірте, чи рік є високосним за допомогою функції, визначеної користувачем

Ви також можете створити функцію, визначену користувачем, щоб перевірити, чи рік є високосним, ви можете заповнити його таким чином:

1. Утримуйте клавішу ALT + F11 і відкриває Вікно Microsoft Visual Basic для програм.

2. Клацання Insert > Модуліта вставте наступний код у Вікно модуля.

Код VBA: перевірте, чи рік є високосним

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. Потім збережіть і закрийте цей код, поверніться до робочого аркуша та введіть таку формулу: = isleapyear (A2), див. Знімок екрана:

doc-check-if-високосний рік-1

4. Потім перетягніть маркер заповнення до комірок, в яких ви хочете містити цю формулу, і всі роки були відмічені, ПОМИЛКОВИЙ означає не високосний рік і ІСТИНА вказує на високосний рік. Дивіться знімок екрана:

doc-check-if-високосний рік-1


Пов'язана стаття:

Знайдіть найменший спільний знаменник або найбільший спільний множник в Excel

Найкращі інструменти продуктивності офісу

Популярні функції: Знайдіть, виділіть або визначте дублікати   |  Видалити порожні рядки   |  Об’єднайте стовпці або клітинки без втрати даних   |   Раунд без Формули ...
Супер пошук: VLookup за кількома критеріями    Багатозначний VLookup  |   VLookup на кількох аркушах   |   Нечіткий пошук ....
Розширений розкривний список: Швидке створення випадаючого списку   |  Залежний спадний список   |  Виберіть розкривний список, що вибирається ....
Менеджер колонок: Додайте конкретну кількість стовпців  |  Перемістити стовпці  |  Перемкнути статус видимості прихованих стовпців  |  Порівняйте діапазони та стовпці ...
Особливості: Фокус сітки   |  Перегляд дизайну   |   Велика панель формул    Диспетчер робочих книг і аркушів   |  Бібліотека ресурсів (автотекст)   |  Вибір дати   |  Об’єднайте робочі аркуші   |  Шифрування/розшифрування клітинок    Надсилайте листи за списком   |  Супер фільтр   |   Спеціальний фільтр (фільтр жирний/курсив/закреслений...) ...
Топ-15 наборів інструментів12 текст Tools (додати текст, Видалити символи, ...)   |   50 + Графік типи (діаграма Ганта, ...)   |   40+ Практичний Формули (Розрахуйте вік на основі дня народження, ...)   |   19 вставка Tools (Вставте QR-код, Вставити зображення зі шляху, ...)   |   12 Перетворення Tools (Числа до слів, Валютна конверсія, ...)   |   7 Злиття та розділення Tools (Розширені комбіновані ряди, Розділені клітини, ...)   |   ... і більше

Покращуйте свої навички Excel за допомогою Kutools для Excel і відчуйте ефективність, як ніколи раніше. Kutools для Excel пропонує понад 300 додаткових функцій для підвищення продуктивності та економії часу.  Натисніть тут, щоб отримати функцію, яка вам найбільше потрібна...

вкладка kte 201905


Вкладка Office Передає інтерфейс із вкладками в Office і значно полегшує вашу роботу

  • Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
  • Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
  • Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!

 

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