Méthode find + valeur formule

Bonjour,

j'ai vu plusieurs postes traitant du sujet de la méthode Find mais aucun malheureusement qui m'a permis de régler mon problème. Pouvez-vous m'aider ?

Je cherche simplement à retrouver intJourEnleve dans une feuille. Malheureusement, la méthode find renvoie à toutes mes tentatives Nothing.

Je précise que dans les deux feuilles (origine, destination), toutes les valeurs sont issues de formules.

Que puis-je faire ?

Merci pour votre aide, mon code ci-dessous :

Set rngSearchRangePrerequis = wshPrerequis.Range("P6", "AQQ6")
Set rngSearchRangePCDFSeq = wshPCDFSeq.Range("P6", "AQQ6")


For NbCol = 4 To NbTotal
    If wshCal.Cells(19, NbCol).Interior.ColorIndex = 3 Then
        intJourEnleve = wshCal.Cells(17, NbCol).Value
        Set rngDatePrerequis = rngSearchRangePrerequis.Find(intJourEnleve, LookAt:=xlWhole, LookIn:=xlValues)
        Set rngDatePCDFSeq = rngSearchRangePCDFSeq.Find(intJourEnleve, LookAt:=xlWhole, LookIn:=xlValues)
        
        If rngDatePrerequis Is Nothing Then
            MsgBox "Rien"
            Exit Sub
        End If
        
        With rngDatePrerequis
            .Interior.ColorIndex = 3
        End With
        
        With rngDatePCDFSeq
            .Interior.ColorIndex = 3
        End With
        
    End If
Next NbCol