السلام عليكم
اخي الحل موجود في مشاركتي السابقة و لكن في خليتين مختلفتين عما طلبت الان
على العموم تم التعديل ارجو ان يكون طلبك
عفواً اخي حصل خطأ في الكود وتم تعديله
ارجو اعادة التحميل
وهذا هو الكود ويكتب في نفس الصفحة
If Target.Cells(6, 2) > 0 Then
Cells(3, 15) = Now
شرح الكود:
اذا كان الهدف (6,2) وهي تمثل الخلية B2
اكبر من صفر فقم بإدراج التاريخ والوقت في الخلية (3,15 ) وهي تمثل الخلية O3
تم التعديل النهائي ان شاء الله
_________________.rar