Salut ptkntz,
avec ton fichier excel, ALT + F11
Onglet "Insertion", tu sélectionnes "Module", dans ce module tu colles ce code :
Dim t As Integer
Dim temps
Sub clignote()
If t = 0 Then
Range("C3:D6").Interior.ColorIndex = 6 'valeur en fonction de la couleur voulue
t = 1
Else
Range("C3:D6").Interior.ColorIndex = 2 'valeur en fonction de la couleur voulue
t = 0
End If
temps = Now + TimeValue("00:00:01")
Application.OnTime EarliestTime:=temps, Procedure:="clignote"
End Sub
Sub clignote_pas()
Application.OnTime EarliestTime:=temps, Procedure:="clignote", Schedule:=False
End Sub
dans ThisWorbook, tu colles ce code :
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Call clignote_pas
End Sub
Private Sub workbook_Open()
Call clignote
End Sub
tu enregistres, tu fermes ton fichier, tu le relances et la plage de cellule va clignoter