Difficulté avec un IF

[Cipic]

Bonjour tous !

Merci à ceux qui me liront et merci beaucoup à ceux qui répondront !

Voici mon problème : je souhaite effectuer une recherche sur "yahoo" dans une feuille. Si la valeur est trouvée il faut effectuer la suite du code, sinon, il faut continuer la lecture un peu plus loin

Sub Macro1()

    Set test1 = Nothing
    Set test1 = Cells.Find(What:="yahoo", LookAt:=xlWhole)
        
    If test1 = "yahoo" Then
        (suite du code)

    Else Go To ancre1

    End If

ancre1:

End Sub

mais il n'accepte pas mon IF

>> Plus généralement, j'ai besoin de quelques lignes qui me permettent de sauter quelques lignes de code dans le cas ou la case recherchée n'est pas trouvée.

Si vous pouvez m'aiguiller...

Merci bcp !

 

[Le Pierre]

Re : Difficulté avec un IF

Bonjour

Je ne connais pas l'ensemble de ton code mais personnellement j'enlèverais le "Else Go To ancre1"

à plus

 

[dixit]

Re : Difficulté avec un IF

bonjour,
il me semble qu'il manque la plage dans Cells.Find...
exemple : Cells(1,5).Find...
donc Range serait mieux par exemple : Range("A1:a50").Find(....
bye

 

[Gruick]

Re : Difficulté avec un IF

Bonjour Cipic

essayes ce code "biscornu" mais c'est dans l'aide excel alors !

If Not test1 Is Nothing Then

A plus,

Gruick

en Italien : Arrivederci
en néerlandais : Aan - herzien
en russe : до свидания (da svidaniya)
en chinois : 再见 (zài jiàn)
en japonais : さようなら (sayônara)

 

[ledzepfred]

Re : Difficulté avec un IF

bonjour à tous,

à Dixit: cells.find... indique que la recherche doit se faire sur toutes les cellules d'un feuillet (donc de A1 à IV65536)

a+