Lister Dates vba

Bonjour tout le monde,

Je souhaiterai créer une macro qui me permettrai à partir de 2 dates données de me lister toutes les dates fin de mois entre ces 2 dates, je m'explique :
Par exemple date debut : 31/03/2017 date fin : 31/03/2018 et à partir de ces 2 dates de me lister toutes les autres dates fin du moi entre ces dates, c'est à dire 30/04/2017,31/05/2017...

Je vous remercie d'avance

Merci beaucoup

Bonjour,

Il y a de multiples façons de le faire à mon avis.
Ne connaissant pas votre fichier et sous quelle forme vous voulez lister ces dates, je peux vous dire que :

Code:

---

1 2	VotreDate = VotreDate + 1 'Renvoie le jour suivant NumMois = Month(VotreDate) 'Renvoie le mois de la date

---

Avec ça vous pouvez créer quelques algorithmes

Cordialement,

Shin

Il suffit de faire une boucle sur l'ensemble des lignes et dans laquelle on met un test pour vérifier la date, avec une copie en cas de réponse positive.

Mais, à mon avis, pas besoin de faire une macro pour ça.
Un filtre peut se mettre en place en 2 secondes et faire la même chose.

Au pire, si tu veux copier l'ensemble des lignes concernées pour les mettre à part, tu peux passer par un filtre avancé.
Voir ce tutoriel : http://philippetulliez.developpez.co...dvancedfilter/
Une solution qui, d'ailleurs, peut être aussi mise en place en VBA.

Salut,

Tu peux le faire sans VBA avec l'outil Segment chronologie avec un tableau de croisé dynamique. C'est un filtre améliorer.

Info : https://support.office.com/fr-fr/art...2-f2105d79dcb5

Par contre il faut que tu aies une version d'Excel de 2013 minimum.

Edit: Tu est plus rapide Menhir :P

Citation:

---

Envoyé par ShinRyumen

Bonjour,

Il y a de multiples façons de le faire à mon avis.
Ne connaissant pas votre fichier et sous quelle forme vous voulez lister ces dates, je peux vous dire que :

Code:

---

1 2	VotreDate = VotreDate + 1 'Renvoie le jour suivant NumMois = Month(VotreDate) 'Renvoie le mois de la date

---

Avec ça vous pouvez créer quelques algorithmes

Cordialement,

Shin

---

Bonjour,
je vous remercie pour votre réponse
Ma date de debut se trouve en cellule B1 et ma date fin en cellule B2 et j'aimerai à partir de la cellule C1 avoir toutes les dates fin de mois entre ces deux dates sans passer par une formule Excel mais une macro
Je vous remercie

Citation:

---

Envoyé par McLister213

Salut,

Tu peux le faire sans VBA avec l'outil Segment chronologie avec un tableau de croisé dynamique. C'est un filtre améliorer.

Info : https://support.office.com/fr-fr/art...2-f2105d79dcb5

Par contre il faut que tu aies une version d'Excel de 2013 minimum.

Edit: Tu est plus rapide Menhir :P

---

Bonjour,
j'ai besoin d'utiliser une macro car je l'insère dans un autre code.

Merci

Citation:

---

Envoyé par dido123123

Bonjour,
je vous remercie pour votre réponse
Ma date de debut se trouve en cellule B1 et ma date fin en cellule B2 et j'aimerai à partir de la cellule C1 avoir toutes les dates fin de mois entre ces deux dates sans passer par une formule Excel mais une macro
Je vous remercie

---

à modifier selon votre code

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21

Sub dido() Dim debut As Date, fin As Date Dim DateTest As Date Dim ligne As Integer   debut = Cells(1, 2) fin = Cells(2, 2)   DateTest = debut   ligne = 1 While DateTest <= fin If Month(DateTest) <> Month(DateTest - 1) Then Cells(ligne, 3) = DateTest - 1 ligne = ligne + 1 End If DateTest = DateTest + 1 Wend     End Sub

---