Bonsoir !

J'ai un problème un peu bête

Je fais un classique :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
  For l = 10 To Cells(65536, "B").End(xlUp).Row
         Set e = Cells(l, "B").Find(What:="INTERFACE : A définir", lookat:=xlPart)
         If Not e Is Nothing Then
               MsgBox l
         End If
  Next
Le problème c'est que les cellules où je peux trouver les résultats de mon .Find sont toutes fusionnées de B à V. Comment puis-je donc obtenir quelque chose ? Si je mets une simple condition, par contre, sur un
Code : Sélectionner tout - Visualiser dans une fenêtre à part
Range("B" & l)
, je trouve un résultat.

Une idée?

Merci d'avance.