Как получить дату конца месяца в Excel?
Возможно, получение даты окончания месяца для вас не составит труда, но если в Excel есть несколько значений дат, как быстро получить дату окончания каждого месяца сразу? Сейчас я представлю вам несколько быстрых способов решения этой проблемы в Excel.
Получение даты конца месяца с помощью формул в Excel
Получение даты конца месяца с помощью VBA в Excel
Получение даты конца месяца с помощью формул в Excel
Использование формулы для нахождения даты окончания каждого месяца может быть очень простым для каждого пользователя Excel.
Выберите ячейку рядом с данными о дате и введите эту формулу =DATE(YEAR(A2),MONTH(A2)+1,0) (A2 — это ячейка, из которой вы хотите получить дату конца месяца), затем нажмите клавишу Enter на клавиатуре и протяните автозаполнение до диапазона, к которому нужно применить эту формулу. Теперь дата окончания каждого месяца отображается в ячейках. См. скриншоты:
 |
 |
 |
Также вы можете использовать эту формулу =EOMONTH(A2,0) для получения даты окончания месяца. (Вам нужно отформатировать ячейки результата как формат Дата перед вводом этой формулы.)
Совет: В Excel 2003 или более ранней версии, если вы хотите использовать формулу =EOMONTH(A2,0), вам нужно сначала установить Пакет анализа, нажав Инструменты > Надстройки. См. скриншоты:
 |  |  |
Получение даты конца месяца с помощью определенной функции в Excel
Если вы знакомы с VBA, вы можете использовать следующий код VBA для нахождения даты окончания месяца.
1. Нажмите клавиши F11 + Alt вместе на клавиатуре, чтобы открыть окно Microsoft Visual Basic for Applications.
2. Затем нажмите Вставка > Модуль, чтобы вставить новое окно модуля. После этого скопируйте следующий код VBA в это окно.
VBA: Получение даты конца месяца.
Function LastDayInMonth(Optional pDate As Date = 0) As Date
'Updateby20140723
If pDate = 0 Then pDate = VBA.Date
LastDayInMonth = VBA.DateSerial(VBA.Year(pDate), VBA.Month(pDate) + 1, 0)
End Function
3. Сохраните и закройте окно. Затем выберите ячейку и введите эту формулу =LastDayInMonth(A2) (A2 содержит дату, из которой вы хотите получить дату конца месяца), затем нажмите клавишу Enter, и вы получите дату окончания месяца.
Примечание: Этот VBA также требует, чтобы вы отформатировали ячейки результата как формат Дата перед вводом этой формулы =LastDayInMonth(A2).
Связанные статьи:
Лучшие инструменты для повышения продуктивности в 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-дневная полнофункциональная пробная версия — без регистрации и кредитной карты
- Лучшее соотношение цены и качества — экономия по сравнению с покупкой отдельных надстроек