أيهاب ممدوح قام بنشر مارس 30, 2014 قام بنشر مارس 30, 2014 ارجوا من الاخوة الاعزاء معرفه داله لمعرفه الوقت الحالي فقط شكرا
أيهاب ممدوح قام بنشر مارس 30, 2014 الكاتب قام بنشر مارس 30, 2014 شكرا اخي الكريم ممكن اعرف الطريقه لجعلها داله داخل كود شكرا
عبدالله باقشير قام بنشر مارس 30, 2014 قام بنشر مارس 30, 2014 شكرا اخي الكريم ممكن اعرف الطريقه لجعلها داله داخل كود شكرا Sub Macro1() MsgBox Format(Now, "hh:mm:ss") End Sub
أيهاب ممدوح قام بنشر مارس 30, 2014 الكاتب قام بنشر مارس 30, 2014 Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("A:A")) Is Nothing Then If Target.Offset(0, 1) = "" Or Not IsNumeric(Target.Offset(0, 1).Value) Then Cells(Target.Row, 3) = Date End If End If End Sub الاخ العزيز لا تعمل معي بالشكل الصحيح مرفق الكود الذي اعمل به ارجوا تغير مكان التاريخ بالوقت فقط شكرا
عبدالله باقشير قام بنشر مارس 30, 2014 قام بنشر مارس 30, 2014 تفضل Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("A:A")) Is Nothing Then If Target.Offset(0, 1) = "" Or Not IsNumeric(Target.Offset(0, 1).Value) Then Cells(Target.Row, 3) = Format(Now, "hh:mm:ss") End If End If End Sub
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.