Как да получа дата на края на месеца в Excel?
Може би да получите крайната дата на месец е лесно за вас, но ако има множество данни за дата в Excel, как можете бързо да получите цялата крайна дата на всеки месец наведнъж? Сега ви представям някои бързи трикове за решаване на този проблем в Excel.
Вземете крайна дата на месеца с формули в Excel
Получете дата на края на месеца с VBA в Excel
Вземете крайна дата на месеца с формули в Excel
Използването на формула за намиране на крайната дата на всеки месец може да бъде много лесно за всеки потребител на Excel.
Изберете клетка до данните за датата и след това въведете тази формула =ДАТА(ГОДИНА(A2),МЕСЕЦ(A2)+1,0) (A2 е клетката, от която искате да получите крайната дата на месеца) в нея и натиснете Въведете на клавиатурата и след това плъзнете автоматичното попълване до диапазона, от който се нуждаете, за да приложите тази формула. Сега крайната дата на всеки месец се показва в клетките. Вижте екранни снимки:
 |
 |
 |
Освен това можете да използвате тази формула =EOMESEC(A2,0;XNUMX) за да получите крайната дата на месеца. (Трябва да форматирате клетките с резултати като формат на дата, преди да въведете тази формула.)
Съвет: В Excel 2003 или по-стара версия, ако искате да използвате формулата =EOMESEC(A2,0;XNUMX), трябва да инсталирате Пакет с инструменти за анализ като щракнете върху Инструменти > Добавки първи. Вижте екранни снимки:
 |
 |
 |
Получете крайна дата на месеца с дефинирана функция в Excel
Ако сте запознати с VBA, можете да използвате кода на VBA по-долу, за да намерите крайната дата на месеца.
1. Натиснете F11 + Alt съберете клавишите на клавиатурата, за да отворите Microsoft Visual Basic за приложения прозорец.
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. Запазете и затворете прозореца. След това изберете клетка и въведете тази формула =ПоследенДенВМесеца(A2) (A2 съдържа датата, от която искате да получите крайната дата на месеца), след което натиснете Въведете ключ и ще получите крайната дата на месеца.
Забележка: Този VBA също изисква да форматирате клетките с резултати като формат на дата, преди да въведете тази формула на =ПоследенДенВМесеца(A2).
Относителни статии:
Най-добрите инструменти за продуктивност в офиса
Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време. Щракнете тук, за да получите функцията, от която се нуждаете най-много...
Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна
- Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
- Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!
