معرفة الخلية كم مره تم التحديث عليها

[almhagr]

السلام عليكم ورحمه الله وبركاته

اخوان عندي خلية بالجدول و اود ان اعرف كم مرة تم التحديث عليها

يعني اذا تغير الرقم داخل الخلية تكون هناك خليه تحسب عدد المرات التي تم التغيير علي الخلية

يوجد مرفق

ولكم جزيل الشكر

 

Microsoft Excel 22.rar

[خالد الرشيدى]

السلام عليكم

ضع الكود التالى فى حدث الصفحه علة المطلوب 

Private Sub Worksheet_Change(ByVal target As Range)

    If target = [C7] Then
        [D7] = [D7] + 1
    End If

End Sub

 

[almhagr]

مشكور اخي خالد الرشيدي

الطريقة نجحة عند الدخول علي الخلية و التعديل عليها

لاكن انا عندي الخلية تتحدث بشكل تلقائي و للاسف لم تنجح

و اشكرك علي الرد

واذا فية احد يقدر يساعدني في هذا الامر 

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

 

[خالد الرشيدى]

ماذا تقصد بتحدث بشكل تلقائي؟  -هل بها معادله ما؟  

عليك التوضيح اخي الكريم لكي يكون الحل من مره واحده..  الاكواد تكون حسب طبيعه الملف..  لا يوجد كود ثابت ينفذ اي شيء 

[almhagr]

اخي الكريم

الخلية C7 تاخذ البيانات من مصدر خارجي

فهيه تتحدث تلقائي

 

هذا الملف 

 اعتقد انه ما راح يشتغل عندك

لانه يحتاج مصدر البيانات

وهي برنامج ميتاتريدر4

 

DDE-Sample11.rar

[ياسر خليل أبو البراء]

السلام عليكم

جرب وضع السطر التالي في موديول عادي

Public o As Variant

ثم ضع الكود التالي في حدث المصنف

Private Sub Workbook_Activate()
    Range("N1").Value = ""
End Sub

Private Sub Workbook_Open()
    o = Sheet1.Range("C7").Value
End Sub

ثم ضع الكود التالي في حدث ورقة العمل

Private Sub Worksheet_Change(ByVal Target As Range)
    If Range("C7").Value <> o Then
        Application.EnableEvents = False
            Range("D7").Value = Range("D7").Value + 1
        Application.EnableEvents = True
    End If
    
    o = Range("C7").Value
End Sub