Bonsoir,
Une solution par code :
Function GetValue(Tgt As Range)
If Tgt.NumberFormatLocal = "jj/mm/aaaa" And Tgt.Parent.Range("C8") = "TEXTE" Then
GetValue = Tgt.Offset(1, 0).Value
End If
End Function
A mettre dans un module. Avec Tgt la cellule C9. Tient compte de la casse.
Cdt,
Darzou