Hoe krijg je de einddatum van de maand in Excel?
Misschien is het voor jou gemakkelijk om de einddatum van een maand te vinden, maar als er meerdere datumgegevens in Excel zijn, hoe kun je dan snel alle einddata van elke maand tegelijk krijgen? Hier introduceer ik enkele snelle trucs om dit probleem in Excel op te lossen.
Einddatum van de maand verkrijgen met formules in Excel
Einddatum van de maand verkrijgen met VBA in Excel
Einddatum van de maand verkrijgen met formules in Excel
Het gebruik van een formule om de einddatum van elke maand te vinden, is misschien heel eenvoudig voor elke Excel-gebruiker.
Selecteer een cel naast de datumgegevens en typ vervolgens deze formule =DATE(YEAR(A2),MONTH(A2)+1,0) (A2 is de cel waarvan je de einddatum van de maand wilt verkrijgen) erin, en druk op de Enter-toets op het toetsenbord, en sleep vervolgens de automatische vulling naar het bereik waarop je deze formule wilt toepassen. Nu wordt de einddatum van elke maand weergegeven in de cellen. Zie screenshots:
 |
 |
 |
Ook kun je deze formule =EOMONTH(A2,0) gebruiken om de einddatum van de maand te krijgen. (Je moet de resultaatcellen formatteren als datumformaat voordat je deze formule invoert.)
Tip: In Excel 2003 of lagere versie, als je de formule =EOMONTH(A2,0) wilt gebruiken, moet je eerst Analysis Toolpak installeren door op Tools > Add-Ins te klikken. Zie screenshots:
 |  |  |
Einddatum van de maand verkrijgen met gedefinieerde functie in Excel
Als je bekend bent met VBA, kun je onderstaande VBA-code gebruiken om de einddatum van de maand te vinden.
1. Druk tegelijk op de toetsen F11 + Alt op het toetsenbord om het Microsoft Visual Basic for Applications-venster te openen.
2. Klik vervolgens op Insert > Module om een nieuw modulevenster in te voegen. Kopieer vervolgens de volgende VBA-code naar het venster.
VBA: Einddatum van de maand verkrijgen.
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. Sla het venster op en sluit het. Selecteer vervolgens een cel en typ deze formule =LastDayInMonth(A2) (A2 bevat de datum waarvan je de einddatum van de maand wilt verkrijgen), druk vervolgens op de Enter-toets en je krijgt de einddatum van de maand.
Opmerking: Deze VBA vereist ook dat je de resultaatcellen formatteert als datumformaat voordat je deze formule =LastDayInMonth(A2) invoert.
Gerelateerde artikelen:
Beste productiviteitstools voor Office
Verbeter je Excel-vaardigheden met Kutools voor Excel en ervaar ongeëvenaarde efficiëntie. Kutools voor Excel biedt meer dan300 geavanceerde functies om je productiviteit te verhogen en tijd te besparen. Klik hier om de functie te kiezen die je het meest nodig hebt...
Office Tab brengt een tabbladinterface naar Office en maakt je werk veel eenvoudiger
- Activeer tabbladbewerking en -lezen in Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster, in plaats van in nieuwe vensters.
- Verhoog je productiviteit met50% en bespaar dagelijks honderden muisklikken!
Alle Kutools-invoegtoepassingen. Eén installatieprogramma
Kutools for Office-suite bundelt invoegtoepassingen voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro, ideaal voor teams die werken met Office-toepassingen.
- Alles-in-één suite — invoegtoepassingen voor Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Eén installatieprogramma, één licentie — in enkele minuten geïnstalleerd (MSI-ready)
- Werkt beter samen — gestroomlijnde productiviteit over meerdere Office-toepassingen
- 30 dagen volledige proef — geen registratie, geen creditcard nodig
- Beste prijs — bespaar ten opzichte van losse aanschaf van invoegtoepassingen