Comparaison deux dates avec un format différent

Bonjour à tous !

Je suis actuellement en train d'automatisé mes présentations de réunions suite à mes extraction de GMAO, mais j'ai un petit soucis lors de la comparaison de deux dates.

Je vous écrit mon problème en vba :

Code:

---

1 2 3 4 5 6 7 8 9

dim dat_min as date dim dat _clot as date   dat_min = "01/07/2013" dat_clot = range ("C1").value   If dat_clot >= dat_min ... End If

---

Voilà mon problème est que le format de la date dans C1 est par exemple : "02/07/2013 02:06"

Donc je ne rentre jamais dans mon si.

Désolé c'est une question un peut de base, mais j'ai cherché un long moment sans trouvé de réponse, je me permets donc de vous demander afin de pouvoir avancer.

Je vous remercie par avance ! =)

Bonjour,

essayes comme çà :

Code:

---

If cdate(dat_clot) >= cdate(dat_min) then

---

loux69

Il faut comparer des dates avec des dates

Cordialement

Docmarti

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30

Sub ComparerDesDatesAvecDesStrings()   dat_min = "01/07/2013" dat_clot = Range("C1").Value   Debug.Print TypeName(dat_min); " "; TypeName(dat_clot)     If dat_clot >= dat_min Then Stop End If   End Sub   Sub ComparerDesDatesAvecDesDates()   Dim dat_min As Date Dim dat_clot As Date   dat_min = "01/07/2013" dat_clot = Range("C1").Value   Debug.Print TypeName(dat_min); " "; TypeName(dat_clot)     If dat_clot >= dat_min Then Stop End If   End Sub

---

Bonjour.

Tout d'abord merci de vos réponses. malheureusement ayant essayé vos deux solutions je reste bloqué.

J'ai essayé avec ce bout de code :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16

Sub comparer_deux_dates ()   Dim dat_min as date Dim dat_clot as date Dim nb_ot as integer     nb_ot = 0 dat_min = Cdate(#07/01/20013 12:00:01 AM#) dat_clot = Range("C11").Value   If Cdate(dat_clot) >= Cdate(dat_min) nb_ot = nb_ot +1 stop End If

---

Quand j'affiche dat_clot et dat_min sur des cases j'affiche bien des dates de même format et également les dates que je cherche. Mais je ne rentre toujours pas dans mon If.



EDIT : Ce dernier code fonctionne correctement. L'erreur était du à une case vide dans mon fichier source qui ne devrait pas exister.

Encore merci de votre aide.