Bonjour,
Conversion par macro :
Sub ConverTemps()
Dim aa, tt, i%
aa = ActiveSheet.Range("A1").CurrentRegion
For i = 2 To UBound(aa)
If InStr(1, aa(i, 1), "min") Then
tt = Split(aa(i, 1), "min")
Else
tt = Split("0;" & aa(i, 1), ";")
End If
tt(1) = Replace(tt(1), "s", "")
If tt(1) = "" Then tt(1) = 0
tt = "0:" & Join(tt, ":")
aa(i, 2) = TimeValue(tt)
Next i
With ActiveSheet.Range("A1").CurrentRegion
.Value = aa
.Columns(2).NumberFormat = "h:mm:ss"
End With
End Sub
Clic sur le bouton pour tester...
Cordialement.