Re : VBA - fonction Find avec un What: non pas = mais <> d'un montant
Bonsoir Staple 1600
Merci pour ta réponse.
Je ne peux pas passer par un filtre car toutes les cellules doivent être apparentes (celles à zéro et celles différentes de zéro )et c'est seulement en cliquant sur un bouton que j'aurais crée et qui sera relié à la macro que, je sais pas comment dire, que le "curseur", selectionnera directement la 1ere cellule de ma colonne A dont le contenu est différente de zéro.
Pour le moment ta solution vient de me donner l'idée qu'en fait, je peux très bien insérer une autre colonne avec cette fois un critère qui effectivement, comme tu le suggères, renvois une donnée de type Vrai ou faux et de là, dans ma macro dire que What:="FAUX" ce qui donne ceci.
Sub Macro1()
'
'Sub AtteindreCelluleDifZero()
' Active ma plage de selection
Dim PlageTravail As Range
Range("a1", "a50000").Select
Dim Recherche As Double
Set PlageTravail = Selection
' Trouve la valeur et la sélectionne
PlageTravail.Find(What:="FAUX", _
After:=PlageTravail.Range("A1"), _
LookIn:=xlValues, _
LookAt:=xlWhole, _
SearchOrder:=xlByRows, _
SearchDirection:=xlNext, MatchCase:=False _
).Select
End Sub
C'est pas la panacée mais cela fonctionne. En attadant, je vais utiliser cette solution.
Merci encore pour ta suggestion.
Je reste ouvert à toutes autres suggestions qui permettraient, dans l'idéal, de me passer de cette autre colonne.
Merci à tous.
Cordialement
Dominique