Rechercher valeur dans colonne
Bonjour Messieurs,
A mon tour de reclamer de l’aide… sur un probleme des plus simples : rechercher une valeur dans une colonne…
Simple :
Columns("A:A").Select
Selection.Find(What:="2", After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False).Activate
Et on enchaine sur un ActiveCell.Select… Parfait…
Sauf que si a la place du “2” il y a une variable z (z=2 ou x)
Columns("A:A").Select
Selection.Find(What:=q, After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False).Activate
C’a coince !
J’ai presque honte de vous demander quelques lumieres sur ministricule probleme vebeaesque…..
(A1 = “”, A2 = 1, A3=””, A4 =2, A5,””,….. etc)
Bonjour
Tu ne trouves pas si à la place de la valeur tu y mets une variable contenant la valeur c'est ça ?
bert505 a écrit :Sauf que si a la place du “2” il y a une variable z (z=2 ou x)
bert505 a écrit :Columns("A:A").Select
Selection.Find(What:=q, After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False).Activate
Tu n'utilises pas la même variable
Si pas ça et si pas de réponses autres, ton fichier va devenir indispensable
bonjour je ne sais pas comment vous l'exécutez mais ton code fonctionne sur ma machine. vérifiez que la variable a été déclarée si vous travaillez en déclaration forcée.
Banzai : tu as tout a fait raison ! +1
Je me suis emmelé les pinceaux dans les copier/coller...
Mais c'est bien la meme variable : q ou z comme tu veux !!!
Yannicky : variable declarée Integer
Solution alternative…….
For w = 2 To 25
var0 = Cells(w, 1).Value
If var0 = z Then
ActiveCell.Select
(suite code)
End If
Next w
Pas gracieux, lourd... mais qui fonctionne....