Comment obtenir la date de fin de mois dans Excel ?

Peut-être que trouver la date de fin d'un mois est facile pour vous, mais s'il y a plusieurs données de dates dans Excel, comment pouvez-vous rapidement obtenir toutes les dates de fin de chaque mois en une seule fois ? Maintenant, je vais vous présenter quelques astuces rapides pour résoudre ce problème dans Excel.

Obtenir la date de fin de mois avec des formules dans Excel

Obtenir la date de fin de mois avec VBA dans Excel

Obtenir la date de fin de mois avec des formules dans Excel

Utiliser une formule pour trouver la date de fin de chaque mois peut être très simple pour chaque utilisateur d'Excel.

Sélectionnez une cellule à côté des données de date, puis tapez cette formule =DATE(ANNEE(A2),MOIS(A2)+1,0) (A2 est la cellule dont vous souhaitez obtenir la date de fin de mois), puis appuyez sur la touche Entrée du clavier, et faites ensuite glisser la poignée de recopie automatique vers la plage où vous souhaitez appliquer cette formule. Maintenant, la date de fin de chaque mois est affichée dans les cellules. Voir les captures d'écran :

De plus, vous pouvez utiliser cette formule =FIN.MOIS(A2,0) pour obtenir la date de fin du mois. (Vous devez formater les cellules de résultat au format Date avant d'entrer cette formule.)

Astuce : Dans Excel 2003 ou version antérieure, si vous souhaitez utiliser la formule =FIN.MOIS(A2,0), vous devez d'abord installer l'Utilitaire d'analyse en cliquant sur Outils > Macros complémentaires. Voir les captures d'écran :

Obtenir la date de fin de mois avec une fonction définie dans Excel

Si vous êtes familiarisé avec VBA, vous pouvez utiliser le code VBA ci-dessous pour trouver la date de fin du mois.

1. Appuyez simultanément sur les touches F11 + Alt du clavier pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.

2. Cliquez ensuite sur Insertion > Module pour insérer une nouvelle fenêtre de module. Copiez ensuite le code VBA suivant dans la fenêtre.

VBA : Obtenir la date de fin de mois.

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. Enregistrez et fermez la fenêtre. Sélectionnez ensuite une cellule et tapez cette formule =DernierJourDuMois(A2) (A2 contient la date dont vous souhaitez obtenir la date de fin de mois), puis appuyez sur la touche Entrée et vous obtiendrez la date de fin du mois.

Remarque : Ce VBA nécessite également que vous formatiez les cellules de résultat au format Date avant d'entrer cette formule =DernierJourDuMois(A2).

Articles connexes :

• Trouver le premier/dernier jour ouvrable d'un mois dans Excel