'Si tu veux que ça "clignote", passage obligé par le VBA !
'Un exemple de "clignotement" particulier pour le MIN de la plage A1:D10 :
'Dans le module de la feuille (clic droit sur l'onglet > Visualiser le code)
'Private Sub Worksheet_Change(ByVal Target As Range)
' If Not Intersect(Target, Range("A1:D10")) Is Nothing Then CLIGNOTE
' Target.Select
'End Sub
'Dans un module standard :
Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Sub CLIGNOTE()
[A1:D10].Find _
(What:=Application.WorksheetFunction.Min([A1:D10]), LookAt:=xlWhole).Activate
mémo1 = ActiveCell.Font.ColorIndex
mémo2 = ActiveCell.Font.Size
For x = 1 To 5
For i = 10 To 20
ActiveCell.Font.ColorIndex = 3
ActiveCell.Font.Size = i
Sleep (5)
DoEvents
Next i
ActiveCell.Font.Size = 12
ActiveCell.Font.ColorIndex = 1
Next x
ActiveCell.Font.ColorIndex = mémo1
ActiveCell.Font.Size = mémo2
End Sub