ticrain
Messages postés178Date d'inscriptionjeudi 15 mars 2007StatutMembreDernière intervention 2 janvier 2015
-
5 mai 2008 à 18:58
cs_MPi
Messages postés3877Date d'inscriptionmardi 19 mars 2002StatutMembreDernière intervention17 août 2018
-
6 mai 2008 à 03:37
Bonjour les ptis loups
Voici mes mignes de code :
Private Sub Label170_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
chariot = InputBox("Entrez le numéro de chariot que vous voulez remplacer")
Columns(1).Find(what:=chariot).Activate
Selection.Cut
Range("B4").Select
ActiveSheet.Paste
Ce petit code me permet de retrouver le contenu d'une cellule par l'intermediaire d'une inputbox au meme titre que le système de recherche d'excel.
Mon problème et le suivant si par exemple je tape 9 dans ma inputbox pas de souci il me retrouve la cellule contenant la valeur 9 et la coupe et la colle en B4.
Par contre si je demande le numero 109 par exemple, il me prend pas 109 exactement mais soit 10,101,102,103,104,105,106... car dans 109 il y'a la valeur 10 donc il me prend le premier pareil que la recherche d'excel.
mortalino
Messages postés6786Date d'inscriptionvendredi 16 décembre 2005StatutMembreDernière intervention21 décembre 201118 5 mai 2008 à 20:15
Salut,
je suis scéptique sur ton problème. Quelque soit le type de donnée de ta variable chariot (String ou Integer), si je cherche 9, il me sélectionne bien 9, idem pour 109.
Tes données sont-elles bien dans la première colonne ?
Ces valeurs sont écrites ou est-ce le résultat d'une formule ?