Recherche

Bonjour,

Je voudrais savoir comment recherches des informations dans une feuille excel dans un autre feuille excel. Je m'explique. Dans la COPIE VERS SUIVI_EA (feulle 1) se trouve des numéros que je cherche dans la feuille Suivi Facturation EA 2014 (feuille 2). Si le numéro de la feuille 1 existe dans la feuille 2 je supprime ce numéro de la feuille 1. Et je voudrais que si je ne trouve pas le numéro de la feuille 1 dans la feuille 2, la macro passe au numéro suivant de la feuille 1. Mais la macro plante dès qu'elle ne trouve pas le numléro de la feuille 1 dans la feuille 2....Voici le code :

Sub Macro3()

'

' Macro3 Macro

'

Sheets("COPIE VERS SUIVI_EA").Select

NBR_LIGNES = 26

Range("A26").Select

Nb_Lignes = ActiveCell.CurrentRegion.Rows.Count

Range("D23").Select

ActiveCell.FormulaR1C1 = Nb_Lignes

For i = 1 To Nb_Lignes

TEMPS_BL1 = Range(Cells(NBR_LIGNES, 4), Cells(NBR_LIGNES, 4)).Value

Range("E32").Select

ActiveCell.FormulaR1C1 = TEMPS_BL1

Range("E33").Select

ActiveCell.FormulaR1C1 = _

"=LOOKUP(R[-1]C,'[Suivi Facturation EA 2014.xls]RECAP'!C5)"

TEMPS_BL2 = Range("E33").Value

If TEMPS_BL1 = TEMPS_BL2 Then

Range(Cells(NBR_LIGNES, 1), Cells(NBR_LIGNES, 7)).Select

Selection.Delete Shift:=xlUp

End If

Next

End Sub

Quelqu"un a une idée ?

Merci !!!!

Bonjour,

Tu devrais joindre une copie anonymisée de ton classeur afin que nous puissions voir comment corriger et optimiser ton code.

A+

Bonjour

Voici les fichiers

Bonjour,

Une solution avec une gestion de l'erreur intégrée à la formule de recherche

A+