تعديل معادلة التاريخ للتغلب على مشكلة المرجع الدائري

[محمد هشام.]

السلام عليكم ورحمة الله أستاذتي الكرام 

المرجوا من حضراتكم تعديل المعادلة الموجودة في الملف وهي لإظهار تاريخ اليوم ورقم الأسبوع تلقائيا عند كتابة أي قيمة في العمود المقابل المعادلة شغالة تمام المشكل أنه كل مرة تظهر عندي رسالة  circular reference خطأ .ويتم حلها من الإعدادات عاوز طريقة تستخرج نفس النتيجة لاكن بدون ما كل مرة أغير في الإعدادات 

الملف مع مزيدا من الشرح في المرفق 

Ech1.xlsx

[Ali Mohamed Ali]

وعليكم السلام-فقط عليك استخداك هذا الكود

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Target, Range("E5:AB80")) Is Nothing Then
Range("A" & Target.Row) = Date
End If
End Sub

Ech1.xlsm

[محمد هشام.]

شكرا لك استاذي الفاضل   Ali Mohamed Ali هو ده المطلوب بالظبط بارك الله فيكم دايما تعبينك معانا 👍👍👍

 بس هل مفيش طريقة عند إفراغ السطر من اي قيمة يتم إخفاء رقم الأسبوع والتاريخ تلقائيا  

[alliiia]

رائعة ما شاء الله

كنت محتاجها

أرجو أن يتم الإجابة على طلب الأخ هشام الأخير

 

لو قدرنا نضيف كود إفراغ السطر من التاريخ في حال عدم وجود قيمة

وجزاكم الله خيرا.

 

[محمد هشام.]

ياريت احد من الأساتذة يتكرم ويشوف لنا حل للموضوع ده