Discussion :

[Patnel]

excuse j'ai du faire un doublon

bon merci pour ton explication sur la différence d'interprétation entre excel et vba, c'est ça qui me met la tête à l'envers

alors j'ai essayé ta méthode et voilà les conclusions

si je mets 30/11/09 dans cells(1,1) excel force à 30/11/2009 donc il reconnait bien une date valide alignement à droite

si je mets 31/11/09 excel me laisse 31/11/09, alignement à gauche, donc il a un comportement différent

si je teste avec Isdate dans les deux cas ça renvoie vrai
isnumber répond faux dans les deux cas


si je force le format à jj/mm/aaaa alors
excel ne hurle pas mais laise la cellule cells(2,1) à gauche et ne change rien
je force la cellule cells(2,1) à 31/11/2009

alors Isdate réagit correctement: donne vrai pour cells(1,1)
et faux pour cells(2,1)
isnumber reste toujours à faux

donc je reste toujours dépendant du format saisi par l'opérateur et le pb reste indeterminé

[Pierre Fauconnier]

As-tu essayé l'outil de validation d'Excel? Il permet de forcer la saisie d'une date valide dans une cellule, et sera beaucoup plus fiable qu'une technique par VBA...

Et, FORCEMENT que cela ne fonctionne pas avec 31/11/09, il n'y a que 30 jours en novembre!!!! (on te l'a déjà fait remarquer plus haut dans la discussion...)

Si tu veux faire des tests, fais-les au moins avec des valeurs correctes!

Et c'est pour cela que je pense que tu t'en sortiras avec l'outil de validation... mais comme tu t'entêtes à ne pas vouloir l'essayer...

[EmmanuelleC]

heu il fait des comparatifs avec le 30/11/09 et le 31/11/09 pour vérifier avec une date valide et une date invalide le résultat de ce qu'il teste non?

[Pierre Fauconnier]

C'est bien pour cela que je propose de passer par la validation de la cellule. Ainsi, il sera impossible de saisir 31/11/09 et il n'y aura plus besoin de recourir à du VBA pour tester si la date est valide.

Mais quand il dit

si je teste avec Isdate dans les deux cas ça renvoie vrai

Ce n'est pas possible que cela renvoie VRAI avec 31/11/09 => erreurs de test, et plus personne ne sait finalement ce qui a été testé ni comment cela a été testé.

[Patnel]

ouh la la
ne nous fachons pas
effectivement ce que je cherche c'est bien que lorsque l'utilisateur saissise une date idiote comme 31/11/09, je puisse offrir le moyen de le corriger
c'est la source même de cette discussion

fauconnier me donne une bonne indication :
faire valider la date par excel autrement que par VBA
trés bien mais comment fait-on ?

[Pierre Fauconnier]

Suis pas fâché...

Via Données/Validation (XL < 2007), ou onglet Données/Outils de données/Validation de données (XL 2007)



Avec possibilité de personnaliser le message de saisie et les niveaux d'alerte en cas d'erreur de saisie.

[Patnel]

eh ben voilà

donc ça me va, j'ai essayé sur mon fichier et effectivement ça hurle quand on met une date de blonde

merci Pierre

en tout cas il me reste le pb irrésolu d'imposer le calcul de date en français,
car j' le pb par ailleur à chaque fois que je veux faire des calculs de dates
mais ce sera l'objet d'autres discussion
je retiens surtout que excel et vba ne réagissent pas pareil sur les dates
et ça c'est dur

Patnel

[Didier Gonard]

Bonjour,

D'un autre côté, si on déclare ses variables typées comme on le dit toujours...

ce genre de code fournit tout de suite une indication..

Code :

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

1
2
3
4
5
6
7
Option Explicit
 
Sub toto()
Dim date_ko As Date
date_ko = Cells(2, 1).Value ' contient 31/11/2010 renvoie une erreur 13
'etc...
End Sub

cordialement,

Didier

[Fvandermeulen]

Bonjour Ormonth,
Tout à fait d'accord avec toi pour la déclaration
Mais si on saisi 31/11/10 en A2 le code ne renvoi pas d'erreur, date_ko renvoi 10/11/1931, c'est ça le principal souci.
A+