Passer à un nouvel onglet si methode "find" ne retourne rien

Bonjour,

Tout est dans le titre en fait.

Je dispose d'un classeur qui doit faire une recherche dans un second (qui dispose de 3 onglets).

Je parcours la première colonne pour trouver le nom du client. Une fois le nom du client trouvé, je fait une recherche dans la seconde colonne pour trouver le nom de la facture associée.

Pour l'instant, ça fonctionne sur mon premier onglet:

dateref = ThisWorkbook.Worksheets("Clients").Range("B17")
Workbooks.Open "C:\Users\XXXX\Desktop\Ent\TABLEAUX AVANCEMENT PAIEMENT.xlsm"
y = Year(dateref)

Set an = ActiveWorkbook.Worksheets("Prévisionnel " & y)
Set ann = ActiveWorkbook.Worksheets("Prévisionnel " & y + 1)
Set annn = ActiveWorkbook.Worksheets("Prévisionnel " & y + 2)

With an.Range("A1:A5000")
    Set c = .Find(Copie(4), LookIn:=xlValues)
    col = c.Row
End With

Set MaPlage = Cells(col, 1)
plop = MaPlage.MergeArea.Cells(MaPlage.MergeArea.Cells.Count).Row

With an.Range(Cells(col, 2), Cells(plop, 2))
    Set b = .Find(Copie(5), LookIn:=xlValues)
    coll = b.Row
End With

Sur le code ci-dessus, je récupère le n° de ligne de la facture voulu du client

Je voudrais faire en sorte que si il ne trouve pas la facture correspondante dans le premier onglet, il passe au second (nommé "ann") et au troisième (nommé "annn") si on ne retrouve pas la facture dans le second.

J'ai tenté:

If b Is Nothing Then

Mais ça ne fonctionne pas (ou plutot, je ne dois pas bien l'utiliser) ...

Merci de votre aide,

Bonjour,

un essai sans tester :

Sub test()

End Sub

Je t'encourage à déclarer et typer toutes tes variables, tu seras gagnant.

eric

edit : question trouvée sur un 2e, puis un 3e forum, je retire donc ma réponse.

Bonjour,

Hello Eric !

J'allais poster quand j'ai vu ton "Edit" donc, je m'abstiens ! Bonne journée

Salut theze,

oui, il y a de très bons livres sur vba, ça lui prendra un peu plus de temps c'est tout

Bonne journée

eric

Je ne pense pas qu'il soit nécessaire d'être condescendant. Je ne cherche aucunement à ce qu'on me fasse le travail, mais seulement à ce qu'on m'aide pour comprendre mes erreurs. Je suis bloqué sur ce point depuis qq temps: tant mieux pour vous si vous trouvez la solution simple. Nous sommes sur un Forum d'entraide, je ne vois pas en quoi ma demande peut être déplacée.

Bonjour,

Je ne cherche aucunement à ce qu'on me fasse le travail, mais seulement à ce qu'on m'aide

Ok. J'ai donc bien fait d'enlever ma proposition où tout était mâché.

Tu as toutes les expliquations pour y arriver sur un des autres forums où tu as posté.

A toi de réfléchir et de comprendre... Ce n'est pas dur.

eric

Je m'acharne depuis ce matin, mais le pb reste le même