Remplacer données par une valeur sous forme nombre

Résolu/Fermé
mimilendo35 Messages postés 8 Date d'inscription mercredi 27 avril 2016 Statut Membre Dernière intervention 10 mai 2016 - 6 mai 2016 à 08:50
mimilendo35 Messages postés 8 Date d'inscription mercredi 27 avril 2016 Statut Membre Dernière intervention 10 mai 2016 - 10 mai 2016 à 12:21
Bonjour,
J'ai écrit une VBA qui me permet de remplacer mes "NR" par des 0 et mes "<LOQ" par des 0,001. Cependant, ils sont sous la forme texte.. Comment arranger cela ?
Je vous envoie un exemple de fichier :)
Merci d'avance !

https://www.cjoint.com/c/FEggYx1Yyfn


1 réponse

michel_m Messages postés 16593 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 7 mars 2023 3 291
6 mai 2016 à 08:55
Bonjour
For Each c In Feuil1.Range("A1:C20")
If InStr(1, c, "NR") Then c = 0
If InStr(1, c, "<LOQ") Then c = 0.001

1
mimilendo35 Messages postés 8 Date d'inscription mercredi 27 avril 2016 Statut Membre Dernière intervention 10 mai 2016
10 mai 2016 à 12:21
Merci michel_m :) Je n'avais pas tilté..
0