Bonjour bounty,
Essaie avec ce code, à mettre dans le code de la feuil1 :
Private Sub Worksheet_Change(ByVal Target As Range)
Static temoin As Boolean
If temoin = False Then
If Not Intersect(Target, [b4:d6]) Is Nothing Then
temoin = True
Target.Value = Target.Value / 86400
Target.NumberFormat = "mm:ss"
End If
Else
temoin = False
End If
End Sub
Tu peux aussi mettre B7, C7, D7 au format personnalisé "mm:ss".