OVH Cloud OVH Cloud

test sur date

6 réponses
Avatar
andre
Bonjour,
je reviens sur le post d'hier soir
en fait la private sub ....
ne reconnait pas les dates tout simplement
j'ai bien rajouté dans la variable "as date" mais cela ne change rien
pourquoi ? si vous avez un debut de reponse
merci
andre

--
andre

6 réponses

Avatar
anonymousA
Bonjour,

je ne me souviens plus vraiment de ta proc, mais il me semble qu'elle
fait une comparaison entre une date saisie en AF1 et une date en H1, non
?
Si tes dates ne sont pas reconnues, à tout hasars transforme les valeurs
contenues dans les cellules par Cdbl(range("A1").value)) auquel cas,
VBA transforme la date en un nombre réel et ta comparaison n'a aucune
chance de ne pas fonctionner .

A+


Bonjour,
je reviens sur le post d'hier soir
en fait la private sub ....
ne reconnait pas les dates tout simplement
j'ai bien rajouté dans la variable "as date" mais cela ne change rien
pourquoi ? si vous avez un debut de reponse
merci
andre



Avatar
andre
andre à dit
regarde le 10/02 a 19h26
mais si tu veux la procedure fonctionne tres bien dans une sub
elle compare les dates me retourne les messages adequat
(avec un bouton formulaire)
mais j'ai decidé de mettre mes codes dans des boutons vba
afin de tout proteger j'ai bien declaré mes variables as date
en fait en H1 j'ai "=INDEX(datesortie;F1)"
en AG1 "=AUJOURDHUI()"
et la mystere ca ne passe pas
Bonjour,

je ne me souviens plus vraiment de ta proc, mais il me semble qu'elle fait
une comparaison entre une date saisie en AF1 et une date en H1, non ?
Si tes dates ne sont pas reconnues, à tout hasars transforme les valeurs
contenues dans les cellules par Cdbl(range("A1").value)) auquel cas, VBA
transforme la date en un nombre réel et ta comparaison n'a aucune chance de
ne pas fonctionner .


--
andre

Avatar
andre
tu peux m'en dire un plus sur cette methode
pas tout compris "Cdbl(range("A1").value)) "

--
andre
Avatar
anonymousA
OK, Cbdl transforme quelque chose en Valeur de type double donc un
nombre réel.Or une date est avant toute chose un nombre réel bien que le
format puisse t'en faire douter.

par ailleurs, j'ai essayé ta procédure avec un bouton et ne vois pas de
problèmes particuliers. Tout ce que je t'ai envoyé ne sont que des
workarounds pour y arriver.

A+


tu peux m'en dire un plus sur cette methode
pas tout compris "Cdbl(range("A1").value)) "



Avatar
magid
Bonjour à tous,

j'ai besoin d'aide, aimerais une formule simple me permettant d'identifier
les doublons sur une feuille de calcul et de les supprimer automatiquement.
Aujourd'hui j'utilise cette méthode. Je sélectionne la colonne A, je vais
dans format et je met la formule suivante:

=NB.SI($A$2:$A$2000;A2)>1

Cette formule m'indique les doublons mais ne me les supprimes pas.

si la recherche de doublon avec suppression automatique n'existe pas avez
vous une meilleur méthode?

Merci d'avance.

Cordialement
Avatar
Ange Ounis
Une formule ne peut rien supprimer. Il faut passer par une macro. Quelques
morceaux tout faits sur cette page :

http://frederic.sigonneau.free.fr/Tris.htm

----------
Ange Ounis
----------

Bonjour à tous,

j'ai besoin d'aide, aimerais une formule simple me permettant d'identifier
les doublons sur une feuille de calcul et de les supprimer automatiquement.
Aujourd'hui j'utilise cette méthode. Je sélectionne la colonne A, je vais
dans format et je met la formule suivante:

=NB.SI($A$2:$A$2000;A2)>1

Cette formule m'indique les doublons mais ne me les supprimes pas.

si la recherche de doublon avec suppression automatique n'existe pas avez
vous une meilleur méthode?

Merci d'avance.

Cordialement