Discussion :

[flo1411]

Bonjour à tous,

Je vous expose mon problème : je crée un planning dans lequel j'aimerais pouvoir rentrer mes congés. En gros, j'ouvre un userform, rentre mes dates de début et de fin de congés et le planning se remplit tout seul.
Mais j'ai la ligne suivante qui pose problème dans mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

If Format(Worksheets("Nom").Cells(i, j).Value, "dd/mm/yy") >= dbt And Format(Worksheets("Nom").Cells(i, j).Value, "dd/mm/yy") <= fin Then

En fait, Excel parcourt la ligne de la semaine où les dates sont inscrites et regarde si elles sont dans l'intervalle de mes congés. Si c'est le cas, il remplit la case du dessous et met congé à l'intérieur (je schématise mais globalement c'est ça). Le problème c'est que le If ne fonctionne pas bien : même si le if est faux, il lui arrive de l'exécuter quand même...
Auriez-vous quelque chose à me conseiller ?

Cordialement.

[casefayere]

Bonsoir,

sans savoir comment tes variables sont déclarées, essayes comme ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

If CDate(Worksheets("Nom").Cells(i, j)) >= CDate(dbt) And CDate(Worksheets("Nom").Cells(i, j)) <= CDate(fin) Then

[flo1411]

Bonjour,

Merci ça fonctionne parfaitement :-)

Cordialement.