Как проверить, является ли год високосным, в Excel?
Знаете ли вы, как определить, является ли год високосным? В Excel нет встроенной функции для такой проверки, но вы можете создать собственную формулу или пользовательскую функцию, чтобы легко решить эту задачу.
Проверка, является ли год Високосный год, с помощью формулы
Проверка, является ли год Високосный год, с помощью пользовательской функции
Проверка, является ли год Високосный год, с помощью формулы
Предположим, на вашем листе есть список годов. Следующая формула поможет определить, является ли указанный год високосным. Выполните следующие действия:
1. Помимо ячеек с годами, введите эту формулу в пустую ячейку:
=IF(OR(MOD(A2,400)=0,AND(MOD(A2,4)=0,MOD(A2,100)<,>,0)),«Високосный год», «NOT a Високосный год»), ()A2содержит год, к которому нужно применить формулу; при необходимости измените ссылку)
2. Затем перетащите маркер заполнения на диапазон, в который нужно ввести эту формулу, — и все годы автоматически проверятся на то, являются ли они високосными.
Примечание: если соответствующая ячейка пуста, формула также покажет «Високосный год».
Проверка, является ли год Високосный год, с помощью пользовательской функции
Вы также можете создать пользовательскую функцию для проверки, является ли год високосным. Для этого выполните следующие действия:
1. Удерживая нажатыми клавиши ALT + F11, откройте окно Microsoft Visual Basic для приложений.
2. Нажмите Вставка > Модуль и вставьте следующий код в окно Модуля.
Код 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). См. снимок экрана:
4. Перетащите маркер заполнения на ячейки, в которые нужно ввести эту формулу, и все годы будут проверены: значение ЛОЖЬ означает, что год не является високосным, а значение ИСТИНА указывает на то, что год — високосный. См. снимок экрана:
См. также:
Как найти наименьший общий знаменатель или наибольший общий делитель в Excel
Лучшие инструменты повышения продуктивности в Office
Раскройте весь потенциал Excel с помощью Kutools для Excel и ощутите эффективность как никогда раньше.Kutools для Excel предлагает более 300 расширенных функций для повышения продуктивности и Экономия времени.Нажмите здесь, чтобы получить нужную Вам функцию…
Office Tab добавляет в Office вкладки и значительно упрощает Вашу работу
- Включите редактирование и чтение во вкладках в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Открывайте и создавайте несколько документов во вкладках одного окна — вместо того чтобы использовать отдельные окна.
- Повышает вашу продуктивность на 50 % и экономит сотни кликов мышью каждый день!
Все надстройки Kutools — один установщик
Kutools for Office — набор надстроек для Excel, Word, Outlook и PowerPoint, а также Office Tab Pro, идеально подходящий командам, работающим с разными приложениями Office.
- Единый комплект— надстройки для Excel, Word, Outlook и PowerPoint + Office Tab Pro
- Один установщик, одна лицензия— настройка занимает считанные минуты (готово для MSI)
- Лучше работать вместе— оптимизированная продуктивность во всех приложениях Office
- 30-дневная полнофункциональная пробная версия— без регистрации и кредитной карты
- Лучшее соотношение цены и качества— экономия по сравнению с покупкой отдельных надстроек