Note: The other languages of the website are Google-translated. Back to English

كيف تراقب تغيرات الخلايا في Excel؟

كيف يمكنك مراقبة خلايا ورقة العمل إذا تم تغيير البيانات في Excel؟ قد يساعدك هذا في تحديد الخلايا المتغيرة بأسرع ما يمكن. في هذا المقال سوف أتحدث عن بعض الطرق الشيقة للتعامل مع هذه المهمة في Excel.

راقب تغييرات الخلية في Excel باستخدام وظيفة تعقب التغييرات

مراقبة التغييرات في الخلية في Excel باستخدام التعليمات البرمجية لـ VBA


السهم الأزرق الحق فقاعة راقب تغييرات الخلية في Excel باستخدام وظيفة تعقب التغييرات

يحتوي Excel على ملف تعقب التغيرات ميزة ، يمكن أن تساعدك على تمييز الخلايا المتغيرة ، يرجى القيام بما يلي:

1. انقر التقيم > تعقب التغيرات > تسليط الضوء على التغييرات، انظر لقطة الشاشة:

تغييرات شاشة doc 1

2. في تسليط الضوء على التغييرات في مربع الحوار ، قم بالعمليات التالية:

(1.) تحقق تعقب التغييرات أثناء التحرير. هذا أيضا يشارك المصنف الخاص بك.

(2.) تحت تسليط الضوء على التغييرات ، حدد عناصر متى ، ومن ، وأين حسب حاجتك.

(3.) أخيرًا ، تحقق قم بتمييز التغييرات على الشاشة الخيار.

تغييرات شاشة doc 2

3. بعد الانتهاء من الإعدادات ، انقر فوق OK ، الآن ، عند تغيير أي قيم خلية في الخلايا المحددة ، يوجد حد برمز مثلث حول الخلايا المتغيرة ، انظر الصورة:

تغييرات شاشة doc 3

ملاحظة: باستخدام هذه الطريقة ، سيصبح المصنف مصنفًا مشتركًا.


السهم الأزرق الحق فقاعة مراقبة التغييرات في الخلية في Excel باستخدام التعليمات البرمجية لـ VBA

يمكن أن يساعدك رمز VBA التالي أيضًا في مراقبة قيم الخلايا عند تغييرها ، يرجى القيام بذلك على النحو التالي:

1. انقر بزر الماوس الأيمن فوق علامة تبويب الورقة التي تريد مراقبة تغييرات الخلية فيها ، واختر عرض الرمز من قائمة السياق ، في فتح ميكروسوفت فيسوال باسيك للتطبيقات نافذة ، يرجى نسخ ولصق رمز فبا التالي في الوحدة النمطية:

كود فبا: راقب تغييرات الخلايا في ورقة عمل Excel:

Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice 20160728
    Dim xrng As Range
    Set xrng = Range("A1:E7")
    If Not Application.Intersect(xrng, Range(Target.Address)) _
           Is Nothing Then
        MsgBox "Cell " & Target.Address & " has changed.", vbInformation, "Kutools for Excel"
    End If
End Sub

تغييرات شاشة doc 4

ملاحظة: في التعليمات البرمجية أعلاه، A1: E7 هو نطاق البيانات الذي تريد مراقبته إذا تغيرت الخلية ، يمكنك تغييره حسب حاجتك.

2. ثم احفظ وأغلق نافذة الكود هذه ، والآن ، عندما تقوم بتغيير قيمة الخلية في النطاق المحدد ، سيظهر مربع رسالة لتذكيرك ، انظر لقطة الشاشة:

تغييرات شاشة doc 5


أفضل أدوات إنتاجية المكتب

Kutools for Excel يحل معظم مشاكلك ويزيد إنتاجيتك بنسبة 80٪

  • إعادة استخدام: أدخل بسرعة الصيغ المعقدة والرسوم البيانية وأي شيء استخدمته من قبل ؛ تشفير الخلايا مع كلمة السر إنشاء قائمة بريدية وإرسال رسائل البريد الإلكتروني ...
  • سوبر فورميولا بار (بسهولة تحرير أسطر متعددة من النص والصيغة) ؛ تخطيط القراءة (قراءة وتحرير أعداد كبيرة من الخلايا بسهولة) ؛ لصق في النطاق المصفى
  • دمج الخلايا / الصفوف / الأعمدة دون فقدان البيانات ؛ تقسيم محتوى الخلايا ؛ ادمج الصفوف / الأعمدة المكررة... منع تكرار الخلايا؛ قارن النطاقات
  • حدد مكرر أو فريد صفوف حدد صفوف فارغة (جميع الخلايا فارغة) ؛ البحث الفائق والبحث الغامض في العديد من المصنفات. تحديد عشوائي ...
  • نسخة طبق الأصل خلايا متعددة بدون تغيير مرجع الصيغة ؛ إنشاء المراجع تلقائيًا إلى أوراق متعددة أدخل الرموز النقطية، مربعات الاختيار والمزيد ...
  • استخراج النص، إضافة نص ، إزالة حسب الموضع ، إزالة الفضاء؛ إنشاء وطباعة المجاميع الفرعية لترحيل الصفحات ؛ التحويل بين محتوى الخلايا والتعليقات
  • سوبر تصفية (حفظ وتطبيق مخططات التصفية على أوراق أخرى) ؛ فرز متقدم حسب الشهر / الأسبوع / اليوم ، التكرار والمزيد ؛ مرشح خاص بواسطة bold، italic ...
  • اجمع بين المصنفات وأوراق العمل؛ دمج الجداول على أساس الأعمدة الرئيسية ؛ تقسيم البيانات إلى أوراق متعددة; تحويل دفعة xls و xlsx و PDF
  • أكثر من 300 ميزة قوية. يدعم Office / Excel 2007-2021 و 365. يدعم جميع اللغات. سهولة النشر في مؤسستك أو مؤسستك. الميزات الكاملة نسخة تجريبية مجانية لمدة 30 يومًا. ضمان استرداد الأموال لمدة 60 يومًا.
علامة تبويب kte 201905

يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير

  • تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
  • فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
  • يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!
أوفيسيتاب القاع
فرز التعليقات حسب
التعليقات (7)
لا يوجد تقييم. كن أول من يقيم!
تم تصغير هذا التعليق بواسطة المشرف على الموقع
واو ، هذا ليس في أي مكان آخر إلا هنا! مدهش!

هل توجد أي طريقة لإدراج صف أسفل صف الخلية مباشرةً حيث تم تحديث الخلية؟

لجعل الأمر أكثر صعوبة ، إذا تم تمكين التحقق من صحة القائمة أو تمكين الصيغة ، فهل يمكن نسخ ذلك أيضًا إلى الصف الجديد؟
تم تصغير هذا التعليق بواسطة المشرف على الموقع
مرحبا عمار
لإدراج صف أسفل القيمة المتغيرة ، يمكن أن يساعدك رمز فبا التالي ، يرجى المحاولة.

ورقة عمل فرعية خاصة تغيير (هدف ByVal كنطاق)
خافت xRg كمدى
خافت xStrPre ​​، xStr كسلسلة
على خطأ استئناف التالي
تعيين xRg = Range ("A1: E7")
إذا كان التقاطع (xRg ، الهدف) لا شيء ، فاخرج من Sub
Application.EnableEvents = خطأ
xStr = الهدف
التطبيق
xStrPre ​​= الهدف. القيمة
الهدف. الإزاحة (1 ، 0). الصف الكامل. إدراج xlShiftDown
الهدف. الإزاحة (1 ، 0). القيمة = xStrPre
الهدف. القيمة = xStr
Application.EnableEvents = صحيح
نهاية الفرعية
تم تصغير هذا التعليق بواسطة المشرف على الموقع
مرحبًا ، لدي نسخ الرقم القديم إلى سطر جديد - كيف يمكنني نقل السطر الجديد إلى علامة تبويب جديدة بدلاً من ذلك؟
تم تصغير هذا التعليق بواسطة المشرف على الموقع
مرحبا كيف يمكننا تتبع التاريخ والوقت في التغيير في الخلية
تم تصغير هذا التعليق بواسطة المشرف على الموقع
إذا كان لدي قدر كبير من البيانات في ملف Excel ، وأريد فقط معرفة الحالة في عمود واحد مختلف أنه إذا تغيرت أي خلية من قيمتها ، فيجب أن تشير من صف تلك الخلية ، يجب تغيير الحالة ، كيف يمكنني افعل هذا
تم تصغير هذا التعليق بواسطة المشرف على الموقع
تلقيت "خطأ في بناء الجملة" مع "Dim xrng As Range" عندما أدخلت الكود أدناه في حدث تغيير ورقة العمل الخاص بي :-(
كود فبا: راقب تغييرات الخلايا في ورقة عمل Excel:

ورقة عمل فرعية خاصة تغيير (هدف ByVal كنطاق)
'تحديث بواسطة Extendoffice 20160728
    خافت xrng كمجموعة
    تعيين xrng = Range ("A1: E7")
    If Not Application.Intersect (xrng، Range (Target.Address)) _
           ثم لا شيء
        MsgBox "Cell" & Target.Address & "تغير." ، vbInformation ، "Kutools for Excel"
    إنهاء حالة
نهاية الفرعية
تم تصغير هذا التعليق بواسطة المشرف على الموقع
مرحبا. WhatsApp üzerinden bana gelen bir excel dosyası var. Bunu bilgisayar üstünden açıp. Bunda ki hareketleri ve değişiklikleri görme şansım var mı؟
لا توجد تعليقات منشورة هنا حتى الآن
اترك تعليقاتك
النشر كضيف
×
قيم المنشور:
0   الشخصيات
المواقع المقترحة

تواصل معنا

حقوق التأليف والنشر © 2009 - شبكة الاتصالات العالمية.extendoffice.com. | كل الحقوق محفوظة. مشغل بواسطة ExtendOffice. | | خريطة الموقع
Microsoft وشعار Office هما علامتان تجاريتان أو علامتان تجاريتان مسجلتان لشركة Microsoft Corporation في الولايات المتحدة و / أو دول أخرى.
محمي بواسطة Sectigo SSL