OVH Cloud OVH Cloud

Find, méthode... nothing... tester

3 réponses
Avatar
Philippe
Bonjour,

comme chacun sait, ;-)

la méthode find de range...
"...recherche une information spécifique dans une plage et renvoie un objet
Range qui représente la première cellule où cette information apparaît. Cette
méthode renvoie la valeur Nothing si l'information n'est pas trouvée.
N'affecte ni la sélection ni la cellule active."

Comment tester ce nothing ?

Merci à vous,
Philippe

3 réponses

Avatar
Pounet95
Bonjour,

Quand j'utilise cette fonction, je la couple à l'utilisation de
On Error Resume Next et je teste le code erreur généré :

On Erreur Resume Next
Selection.find ........
If Err<>0 then
.....
Else
....
End If

Mais il y a peut-être mieux et sûrement d'autres méthodes
Bon fin d'après-midi
--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
Conseillé :
http://dj.joss.free.fr/netiquet.htm
(charte, nétiquette, conseils, abréviations, souriettes...)
http://www.excelabo.net/mpfe/connexion.php
(connexion, conseils...)

"Philippe" a écrit dans le message de
news:
Bonjour,

comme chacun sait, ;-)

la méthode find de range...
"...recherche une information spécifique dans une plage et renvoie un
objet
Range qui représente la première cellule où cette information apparaît.
Cette
méthode renvoie la valeur Nothing si l'information n'est pas trouvée.
N'affecte ni la sélection ni la cellule active."

Comment tester ce nothing ?

Merci à vous,
Philippe


Avatar
papou
Bonjour
Si tu invoques l'aide d'Excel sur le mot Find, voici ce qui est donné :
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

Cordialement
Pascal

"Philippe" a écrit dans le message de
news:
Bonjour,

comme chacun sait, ;-)

la méthode find de range...
"...recherche une information spécifique dans une plage et renvoie un
objet
Range qui représente la première cellule où cette information apparaît.
Cette
méthode renvoie la valeur Nothing si l'information n'est pas trouvée.
N'affecte ni la sélection ni la cellule active."

Comment tester ce nothing ?

Merci à vous,
Philippe


Avatar
Philippe
Et je l'avais au milieu de la figure !
Merci


Bonjour
Si tu invoques l'aide d'Excel sur le mot Find, voici ce qui est donné :
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

Cordialement
Pascal

"Philippe" a écrit dans le message de
news:
Bonjour,

comme chacun sait, ;-)

la méthode find de range...
"...recherche une information spécifique dans une plage et renvoie un
objet
Range qui représente la première cellule où cette information apparaît.
Cette
méthode renvoie la valeur Nothing si l'information n'est pas trouvée.
N'affecte ni la sélection ni la cellule active."

Comment tester ce nothing ?

Merci à vous,
Philippe