Bonjour à tous
j'utilise la macro ci-dessous trouvée sur ce forum il y a quelque temps
(merci à l'auteur) pour simplifier la saisie des heures dans un tableau : je
tape 1400 qui devient automatiquement 14:00.
Le problème est que celà ne fonctionne pas pour 6h00,12h00,18h00
Quelqu'un aurait-il une idée ?
Merci d'avance pour vos solutions
Dim bil As String
If Target.Column = 2 Then
bil = Cells(Target.Row, Target.Column)
If Len(Cells(Target.Row, Target.Column)) = 4 Then
Cells(Target.Row, Target.Column).Value = (Left(bil, 2) * 60 + Right(bil, 2)
* 1) * 6.94444444444444E-04
End If
If Len(Cells(Target.Row, Target.Column)) = 3 Then
Cells(Target.Row, Target.Column).Value = (Left(bil, 1) * 60 + Right(bil, 2)
* 1) * 6.94444444444444E-04
