Přejít k hlavnímu obsahu

Jak získat datum konce měsíce v aplikaci Excel?

Autor: Sun Naposledy změněno: 2024-07-31

Možná je snadné získat datum ukončení měsíce, ale pokud v aplikaci Excel existuje více dat data, jak můžete rychle získat všechna data konce každého měsíce najednou? Nyní vám představím několik rychlých triků, jak vyřešit tento problém v aplikaci Excel.

Získejte datum konce měsíce pomocí vzorců v aplikaci Excel

Získejte datum konce měsíce pomocí VBA v aplikaci Excel


Získejte datum konce měsíce pomocí vzorců v aplikaci Excel

Pomocí vzorce můžete zjistit datum ukončení každého měsíce pro každého uživatele aplikace Excel.

Vyberte buňku vedle dat data a zadejte tento vzorec = DATUM (ROK (A2), MĚSÍC (A2) +1,0) (A2 je buňka, ze které chcete získat datum konce měsíce) a stiskněte vstoupit na klávesnici a potom přetáhněte automatické vyplnění do rozsahu, který potřebujete k použití tohoto vzorce. Nyní se v buňkách zobrazuje datum ukončení každého měsíce. Zobrazit snímky obrazovky:

doc-get-end-of-month-date-1
doc-šipka dolů
doc-get-end-of-month-date-2

Tento vzorec můžete také použít = EOMONTH (A2,0) získat datum konce měsíce. (Před zadáním tohoto vzorce musíte výsledné buňky naformátovat jako formát data.)

Tip: Chcete-li použít vzorec v aplikaci Excel 2003 nebo nižší verzi = EOMONTH (A2,0), musíte nainstalovat Analytická sada nástrojů Kliknutím Tools > Add-Ins První. Zobrazit snímky obrazovky:

doc-get-end-of-month-date-3 doc-šipka-doprava doc-get-end-of-month-date-4

Získejte datum konce měsíce s definovanou funkcí v aplikaci Excel

Pokud jste obeznámeni s VBA, můžete použít níže uvedený kód VBA a vyhledat datum ukončení měsíce.

1. lis F11 + Alt klávesy společně na klávesnici otevřete Microsoft Visual Basic pro aplikace okno.

2. Pak klikněte na tlačítko Vložit > Modul pro vložení nového okna modulu. A potom zkopírujte následující kód VBA do okna.

VBA: Získejte datum na konci měsíce.

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. Uložte a zavřete okno. Poté vyberte buňku a zadejte tento vzorec = LastDayInMonth (A2) (A2 obsahuje datum, od kterého chcete získat datum konce měsíce), poté stiskněte vstoupit klíč a získáte datum ukončení měsíce.

Pozor: Tento VBA také vyžaduje, abyste před zadáním tohoto vzorce zformátovali výsledné buňky jako formát data = LastDayInMonth (A2).


Relativní články:


Nejlepší nástroje pro produktivitu v kanceláři

🤖 Kutools AI asistent: Revoluční analýza dat založená na: Inteligentní provedení   |  Generovat kód  |  Vytvořte vlastní vzorce  |  Analyzujte data a generujte grafy  |  Vyvolejte funkce Kutools...
Populární funkce: Najít, zvýraznit nebo identifikovat duplikáty   |  Odstranit prázdné řádky   |  Kombinujte sloupce nebo buňky bez ztráty dat   |   Kolo bez vzorce ...
Super vyhledávání: Více kritérií VLookup    VLookup s více hodnotami  |   VLookup na více listech   |   Fuzzy vyhledávání ....
Pokročilý rozevírací seznam: Rychle vytvořte rozevírací seznam   |  Závislý rozbalovací seznam   |  Vícenásobný výběr rozevíracího seznamu ....
Správce sloupců: Přidejte konkrétní počet sloupců  |  Přesunout sloupce  |  Přepnout stav viditelnosti skrytých sloupců  |  Porovnejte rozsahy a sloupce ...
Doporučené funkce: Zaměření mřížky   |  Návrhové zobrazení   |   Velký Formula Bar    Správce sešitů a listů   |  Knihovna zdrojů (Automatický text)   |  Výběr data   |  Zkombinujte pracovní listy   |  Šifrovat/dešifrovat buňky    Odesílat e-maily podle seznamu   |  Super filtr   |   Speciální filtr (filtr tučné/kurzíva/přeškrtnuté...) ...
Top 15 sad nástrojů12 Text Tools (doplnit text, Odebrat znaky, ...)   |   50+ Graf Typ nemovitosti (Ganttův diagram, ...)   |   40+ Praktické Vzorce (Vypočítejte věk na základě narozenin, ...)   |   19 Vložení Tools (Vložte QR kód, Vložit obrázek z cesty, ...)   |   12 Konverze Tools (Čísla na slova, Přepočet měny, ...)   |   7 Sloučit a rozdělit Tools (Pokročilé kombinování řádků, Rozdělit buňky, ...)   |   ... a více
Používejte Kutools ve vašem preferovaném jazyce – podporuje angličtinu, španělštinu, němčinu, francouzštinu, čínštinu a více než 40 dalších!

Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času.  Kliknutím sem získáte funkci, kterou nejvíce potřebujete...


Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci

  • Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
  • Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
  • Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!