أيهاب ممدوح قام بنشر مارس 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
الردود الموصى بها
انشئ حساب جديد او قم بتسجيل دخولك لتتمكن من اضافه تعليق جديد
يجب ان تكون عضوا لدينا لتتمكن من التعليق
انشئ حساب جديد
سجل حسابك الجديد لدينا في الموقع بمنتهي السهوله .
سجل حساب جديدتسجيل دخول
هل تمتلك حساب بالفعل ؟ سجل دخولك من هنا.
سجل دخولك الان