J'utilise cela dans une macro pour trouver des trucs sur ma feuille: Comment puis-je savoir s'il a trouvé quelque chose?
3 Réponses :
Recherche code> renvoie un objet de plage qui apera la valeur rien code> si Que code> est introuvable. De l'aide: With Worksheets(1).Range("a1:a500")
Set c = .Find(2, lookin:=xlValues)
If Not c Is Nothing Then
firstAddress = c.Address
Do
c.Value = 5
Set c = .FindNext(c)
Loop While Not c Is Nothing And c.Address <> firstAddress
End If
End With
Expliquant que la valeur est rien si l'instruction ne trouve pas vraiment aide vraiment, je testais si la variable était null avec isnull et que 'T Travailler!
Dim rng As Range
Set rng = Selection.Find(What:=email, After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False)
If Not rng Is Nothing Then 'when rng <> nothing means found something'
rng.Activate
End IF
Lecture sinon rng n'est rien, alors me fait mal à la tête .... Votre commentaire a aidé beaucoup! Merci
selection.find est comme à l'aide de Ctrl + F pour trouver une valeur. Vous pouvez ensuite vérifier contre ActiveCell.Value pour voir si vous avez le résultat souhaité.