TIme Format / صيغة الوقت

[M.Elmahmoudy]

السلام عليكم

محتاج اني اكتب صيغة الوقت بطريقة  معينة

Baraha - Feb.xls

[lionheart]

In worksheet module put the following code

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Row > 2 And (Target.Column = 5 Or Target.Column = 6) Then
        Application.EnableEvents = False
            Target.Value = Target.Value / 24
        Application.EnableEvents = True
        Target.NumberFormat = "hh:mm"
    End If
End Sub

 

[M.Elmahmoudy]

جزاك الله خير

عمل رائع