[résolu]rechercher un numérique

[gillesdemev]

Bonjour à tous
Voici mon problème j'ai une macro qui me permets de vérifier si j'ai bien saisie mes carte pass dans mon compte feuille BNP si j'ai bien la saisie je colore la zone CP qui contient X pour les visa et P pour les cartes pass couleur .ColorIndex = 7 et si la date saisie est différente .ColorIndex = 8 les données sont dans la feuille cartepass et je colore en rouge si je ne trouve pas dans la feuille BNP
mais ma recherche Set c = ActiveSheet.Columns(col).Cells.Find(what:=px) ne trouve pas si la valeur est entière exemple 4.00 n'est pas trouvé alors que 4.02 est trouvé et la valeur 400.00 est trouvée
Un grand merci à ceux qui m'auront lu et encore plus à ceux qui cherchent

 

[fhoest]

Re : rechercher un numérique

Bonjour,
Test avec cette ligne pour voir si cela fonctionne:

Set c = ActiveSheet.Columns(col).Cells.Find(what:=px, MatchCase:=True)

A+

 

[gillesdemev]

Re : rechercher un numérique

Bonjour,
Test avec cette ligne pour voir si cela fonctionne:

Set c = ActiveSheet.Columns(col).Cells.Find(what:=px, MatchCase:=True)

A+

Merci d'avoir cherché,
Hélas ça ne marche pas chez moi

 

[pierrejean]

Re : rechercher un numérique

Bonjour à tous

A tester:

 Set c = Worksheets("BNP").Columns(col).Find(px, LookIn:=xlFormulas, lookat:=xlWhole)

 

[gillesdemev]

Re : rechercher un numérique

Bonjour à tous

A tester:

 Set c = Worksheets("BNP").Columns(col).Find(px, LookIn:=xlFormulas, lookat:=xlWhole)

Trop fort Pierrejean ça marche mais ça m'énerve
Pourquoi es-tu si fort ???
merci encore une solution que je vais mettre de coté comme toutes les excellentes idées des participants à ce forum
Bon Dimanche à tous