كيف تحسب عدد التعليقات في Excel؟
عند التعامل مع أوراق عمل Excel الكبيرة، من الشائع استخدام التعليقات لإضافة ملاحظاتك أو توضيح البيانات أو تسليط الضوء على نقاط مهمة لك ولزملائك. لكن قد تحتاج أحيانًا إلى معرفة عدد التعليقات في ورقة العمل بسرعة—سواءً لأغراض تدقيق البيانات، أو ضمان الجودة، أو لمراجعة وثائق المصنف بشكلٍ عام. ويُعدّ عد الخلايا المعلَّقة بدقة وسيلة فعّالة للتأكد من عدم تفويت أي ملاحظات جوهرية أو حذفها عن غير قصد. في هذا البرنامج التعليمي، سنعرض لك عدة طرق عملية لحساب عدد الخلايا التي تحتوي على تعليقات في Excel، بما يشمل الأدوات المضمنة والأساليب المرنة القائمة على الأكواد—حتى تتمكن من اختيار الحل الأنسب بناءً على خبرتك في Excel ومتطلبات سير عملك.
عد عدد الخلايا التي تحتوي على تعليقات باستخدام وظيفة الانتقال إلى خاص
عد عدد الخلايا التي تحتوي على تعليقات باستخدام دالة معرَّفة من قبل المستخدم
عد عدد الخلايا التي تحتوي على تعليقات باستخدام كود VBA
عد عدد الخلايا التي تحتوي على تعليقات باستخدام وظيفة الانتقال إلى خاص
توفر وظيفةالانتقال إلى خاصفي Excel طريقة مباشرة لتحديد وحساب جميع الخلايا في ورقة العمل التي تحتوي على تعليقات (تُسمى أيضًا «ملاحظات» في إصدارات Excel الحديثة) بصريًّا. وتُعد هذه الطريقة سريعة وفعّالة بشكل خاص إذا كنت بحاجة إلى عدد بسيط وتعمل مع أوراق عمل تكون التعليقات فيها مرئية ومتاحة.
1. على الشريط، انقر فوقالصفحة الرئيسية > بحث وتحديد > الانتقال إلى خاص. سيؤدي ذلك إلى فتح مربع حوار «الانتقال إلى خاص». راجع لقطة الشاشة:
2. في مربع حوارالانتقال إلى خاص، ضمن قسمتحديد، اختر خيارالتعليقات. سيؤدي هذا الخيار إلى تمييز جميع الخلايا التي تحتوي على تعليقات تقليدية في ورقة العمل. راجع لقطة الشاشة:
3. انقر فوقموافقلتطبيق تحديدك. سيتم الآن تمييز جميع الخلايا التي تحتوي على تعليقات في ورقة العمل النشطة. يمكنك معرفة عدد الخلايا المحددة من شريط الحالة في أسفل نافذة Excel—حيث يظهر كعدد الخلايا المحددة. راجع لقطة الشاشة:
السيناريوهات المناسبة:هذه الطريقة مثالية للتحقق السريع أو عندما تريد فحص مواقع التعليقات بصريًّا. ولا تتطلب أي خبرة في البرمجة، وهي متاحة في جميع إصدارات Excel القياسية.
القيود:يُرجى ملاحظة أنه عند استخدام هذه الطريقة، قد لا يتم احتساب الخلايا الفارغة التي تحتوي على تعليقات في بعض إصدارات Excel، لأن التحديد قد يتخطى الخلايا التي لا تحتوي على قيم، وذلك حسب الإعدادات السابقة أو إصدار Excel المستخدم.
تلميح:يمكنك أيضًا استخدام اختصارCtrl + G لفتح مربع حوارالانتقال إلى، ثم انقر فوق زرخاصللوصول بسرعة إلىالانتقال إلى خاص.
نصيحة عملية:إذا كانت ورقة العمل تحتوي على مزيج من التعليقات التقليدية والملاحظات المتسلسلة الجديدة (المقدمة في إصدارات Excel الحديثة)، فإن وظيفةالانتقال إلى خاصتحسب فقط التعليقات القديمة. أما الملاحظات أو التعليقات المتسلسلة، فقد تحتاج إلى استخدام الطرق القائمة على VBA الموضحة أدناه للحصول على نتائج أكثر دقة.
استكشاف الأخطاء وإصلاحها:إذا لم يُظهر شريط الحالة «العدد»، فانقر بزر الماوس الأيمن على شريط الحالة وتأكد من تأشير خيار «العدد» في قائمة شريط الحالة. وإذا لم يكن هناك شيء محدد، فتأكد من أنك في ورقة العمل الصحيحة وأن التعليقات موجودة فعليًّا.
عد عدد الخلايا التي تحتوي على تعليقات باستخدام دالة معرَّفة من قبل المستخدم
على الرغم من أن وظيفة «الانتقال إلى خاص» سريعة، إلا أنها قد لا توفّر دائمًا عدًّا شاملاً أو ديناميكيًّا، خاصةً إذا كنت بحاجة إلى مراقبة عدد الخلايا المعلَّقة بانتظام—بما في ذلك الخلايا الفارغة أو تلك التي تحتوي على صيغ. ولأقصى درجات المرونة، يمكنك استخدام دالة معرَّفة من قِبل المستخدم (UDF) عبر محرر VBA في Excel، ما يمكّنك من عدّ جميع التعليقات—بما فيها تلك المرتبطة بالخلايا الفارغة—مباشرةً داخل صيغ أوراق العمل.
1. اضغط علىALT + F11 في نفس الوقت لفتح نافذةمايكروسوفت فيجوال بيسيك للتطبيقات.
2. في محرر VBA، انقر فوقإدراج > وحدة نمطية، ثم الصق الكود التالي في نافذة الوحدة النمطية الفارغة التي تظهر.
كود VBA: عد عدد الخلايا التي تحتوي على تعليق
Function CountComments(xCell As Range)
'Update by extendoffice
Application.Volatile
CountComments = xCell.Parent.Comments.Count
End Function
3. بعد لصق الكود والتأكد من صحته، احفظ وأغلق محرر VBA، ثم عُد إلى ورقة عمل Excel الخاصة بك. في أي خلية فارغة ترغب في عرض العدد فيها، أدخل الصيغة التالية (استبدل)A1:A100 بالنطاق الفعلي الذي تحتاجه):
=countcomments(A1:A100)
4. اضغط علىEnter لتنفيذ الدالة. ستعرض الخلية الآن العدد الإجمالي للتعليقات ضمن النطاق المحدد الخاص بك.
شرح المعامل:يُحدِّد النطاق المذكور في الصيغة (مثل A1:A100) الخلايا التي سيتم فحصها بحثًا عن تعليقات. غيِّر هذا النطاق ليتوافق مع الجزء الذي تهتم به في ورقة العمل.
المزايا:تحسب هذه الطريقة التعليقات حتى في الخلايا الفارغة، وتعمل بكفاءة في سيناريوهات البيانات الديناميكية، كما تنعكس التحديثات تلقائيًّا فور إضافة تعليق جديد أو حذفه.
احتياطات:يجب تمكين الماكرو لتشغيل الدالة. ولن تحسب هذه الطريقة التعليقات المتسلسلة الحديثة (التي تُسمى «ملاحظات» في بعض إصدارات Excel) ما لم يُحدَّث كود VBA خصيصًا للتعامل مع تلك التعليقات.
تلميح عملي:يُعدّ نهج الدالة المعرَّفة من قِبل المستخدم مفيدًا جدًّا إذا كنت بحاجة إلى تحديث عدد التعليقات تلقائيًّا عند تحديث ورقة العمل. وإذا نسخت هذه الصيغة إلى خلايا أخرى، فاحرص على تعديل مراجع الخلايا لتتوافق مع النطاقات المطلوبة.
عد عدد الخلايا التي تحتوي على تعليقات باستخدام كود VBA
إذا كنت تفضّل حلًّا لمرة واحدة لعدّ جميع التعليقات—بما في ذلك تلك الموجودة في خلايا فارغة—أو إذا أردت معالجة نطاقات كبيرة بسرعة، فاستخدم ماكرو VBA جاهزًا للتشغيل. يُعدّ هذا الأسلوب مثاليًّا للعدّ غير المتكرر أو لجمع إحصائيات حول استخدام التعليقات في مصنفاتك.
1. اضغط علىALT + F11 لفتح نافذةمايكروسوفت فيجوال بيسيك للتطبيقاتفي Excel.
2. في محرر VBA، انقر فوقإدراج > وحدة نمطيةلإضافة وحدة نمطية جديدة. الصق الكود التالي في نافذة الوحدة النمطية:
كود VBA: عد عدد الخلايا التي تحتوي على تعليق
Sub CountComments()
'Update by extendoffice
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Set WorkRng = WorkRng.SpecialCells(xlCellTypeComments)
If VBA.Err > 0 Then
MsgBox 0
Else
MsgBox WorkRng.Count
End If
End Sub
3. بعد لصق الكود، اضغط علىF5(أو انقر فوق زر التشغيل)
) لتشغيل الماكرو. سيظهر مربع حوار يطلب منك تحديد النطاق الذي تريد عدّ التعليقات فيه. راجع لقطة الشاشة:
4.بعد تحديد النطاق المطلوب، انقر فوقموافق. سيعرض مربع الرسالة العدد الإجمالي للتعليقات الموجودة ضمن نطاق التحديد.
المزايا:الماكرو مثالي لأوراق العمل الكبيرة والمعقدة، ويُعالج التعليقات الفارغة والممتلئة بكفاءة عالية.
احتياطات:يتطلب هذا الماكرو تمكين الماكرو في مصنفك، وقد يظهر تحذير أمان عند فتحه. احفظ عملك قبل تشغيل الماكرو، لأن التغييرات غير المقصودة لا يمكن التراجع عنها باستخدام أمر التراجع القياسي.
استكشاف الأخطاء وإصلاحها:إذا لم يطلب منك الماكرو تحديد نطاق، فتأكد من أن الوحدة النمطية قد أُدخلت بشكل صحيح وأن الكود خالٍ من الأخطاء النحوية. ولا تنسَ حفظ مصنفك كملف يدعم الماكرو لتجنب فقدان الكود!
القابلية للتطبيق:مثالي للتدقيقات العرضية أو لإعداد تقارير حول استخدام التعليقات في المصنف، خاصةً عندما تحتاج إلى نتيجة موجزة بدلًا من خلية تعتمد على صيغة.
اقتراح إضافي:في البيئات التي تفرض قيودًا صارمة على الماكرو أو الأمان، أو عند التعاون مع مستخدمين غير مطلعين على VBA، جرّب طريقة الانتقال إلى خاص، أو اطلب المساعدة من الإضافات مثلKutoolsللحصول على ميزات إدارة تعليقات أكثر تقدمًا.
مقالات ذات صلة:
كيف يمكن عرض جميع التعليقات في ورقة عمل جديدة أو في المصنف بأكمله في Excel؟
كيفية البحث والاستبدال النص الموجود داخل التعليقات في Excel؟
كيفية إدراج تعليق بسرعة على خلايا متعددة في Excel؟
أفضل أدوات الإنتاجية لمكتبتك
عزِّز مهاراتك في Excel باستخدام Kutools لـ Excel، وعايش الكفاءة كما لم تفعل من قبل.يقدّم Kutools لـ Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية ووقت الحفظ.انقر هنا للحصول على الميزة التي تحتاجها أكثر من غيرها...
يجلب Office Tab واجهة ذات علامات تبويب إلى Office، ويجعل عملك أسهل بكثير
- تمكّن من التحرير والقراءة باستخدام علامات التبويب في Word وExcel وPowerPoint، وPublisher وAccess وVisio وProject.
- افتح وأنشئ مستندات متعددة في علامات تبويب جديدة داخل النافذة نفسها، بدلاً من فتح نوافذ جديدة.
- يزيد إنتاجيتك بنسبة 50% ويوفّر لك مئات نقرات الفأرة كل يوم!
جميع الإضافات من Kutools في برنامج تثبيت واحد!
Kutools for Office حزمةٌ تحتوي على إضافاتٍ مخصصة لتطبيقات Excel وWord وOutlook وPowerPoint، إلى جانب Office Tab Pro، مما يجعلها الخيار المثالي للفِرق التي تعمل عبر تطبيقات Office.
- حزمة شاملة واحدة— إضافات Excel وWord وOutlook وPowerPoint بالإضافة إلى Office Tab Pro
- برنامج تثبيت واحد، ترخيص واحد— الإعداد خلال دقائق (جاهز لـ MSI)
- يعمل بشكل أفضل معًا— إنتاجية ميسَّرة عبر تطبيقات Office
- تجربة مجانية لمدة 30 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
- أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل