Discussion :

[thomanneca]

Bonjour,

Je peine à utiliser la fonction IsDate.

Lorsque j'écris :

If IsDate ("29/04/2018") -> je ressors un TRUE

Par contre, si j'écris la date dans la cellule E17 par exemple et que j'écris mon code comme suit :

If IsDate (Range("E17")) -> je ressors un FALSE

j'ai testé de changer le format dans excel mais rien n'y fait.

Pourriez-vous m'aider ?

merci d'avance ;-)

[patricktoulon]

re
bonjour
ben oui c'est un peu normal baucoup meme

Code :

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

1
2
'ici tu teste le string du date (valide)
if isdate ("29/04/2018") -> je ressors un TRUE

Par contre, si j'écris la date dans la cellule e17 par exemple et que j'écris mon code comme suit :

Code :

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

1
2
'ici tu teste le string "e17"
 if isdate ("e17")' -> je ressors un FALSE

si le string injecté n'est pas une date forcement tu aura un retour false

maintenant si tu prends le string de la cellule "e17" ca va marcher beaucoup mieux bien evedement

Code :

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

if isdate ("29/04/2018")' -> je ressors un TRUE

Par contre, si j'écris la date dans la cellule e17 par exemple et que j'écris mon code comme suit :

Code :

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

if isdate (range("e17").text)' -> te ressortira true si la date dans E17 est valide

tu a compris la difference de variable string et object ?
cela peut s'ecrire aussi comme ca

Code :

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

if isdate ([E17].text)' -> je ressors un FALSE ou true si la date dans la cellule et valide ou non

et je ne saurais que trop te conseiller de preciser le parent au cas ou la cellule visée ne serait pas dans le sheets actif
exemple

Code :

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

if isdate (sheets("toto").[E17].text)' ->  je ressors un FALSE ou true si la date dans la cellule et valide ou non

ou

Code :

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

if isdate (sheets("toto").range("e17").text) '-> je ressors un FALSE ou true si la date dans la cellule et valide ou non

ou si tu dois travailler sur sheets apres ca tu ne met que le "." pour preciser que c'est l'enfant du with

Code :

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

1
2
3
4
 
 with sheets("toto")
if isdate (.range("e17").text)' ->  je ressors un FALSE ou true si la date dans la cellule et valide ou non 
end with

voila

[thomanneca]

Effectivement, ca marche déjà beaucoup mieux comme ca :-)

Un grand merci pour ton aide !

[pijaku]

Bonjour,

"E17" est une chaine de caractères, pas le contenu de la cellule E17...

Code :

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

IsDate(Range("E17").Value)