كيفية تمييز جميع الخلايا مع التعليقات في Excel؟
يعد التعليق ميزة مفيدة لنا لكتابة بعض المعلومات المهمة في Excel ، بعد إدخال التعليق ، سيكون هناك مؤشر أحمر صغير معروض في الخلية. لكن في بعض الأحيان ، لا تكون المؤشرات الحمراء ملفتة للنظر ، لذا يمكننا تمييز جميع الخلايا ذات التعليقات بلون معين لجعلها أكثر بروزًا. يرجى قراءة هذه المقالة لمعرفة المزيد من التفاصيل.
قم بتمييز جميع الخلايا التي تحتوي على تعليقات باستخدام Go To Special function
قم بتمييز كل الخلايا التي تحتوي على تعليقات برمز VBA
قم بتمييز جميع الخلايا التي تحتوي على تعليقات باستخدام Go To Special function
في Excel ، يمكننا تحديد جميع خلايا التعليقات أولاً ، ومن ثم إعطائها اللون الذي نفضله ، يرجى القيام بما يلي:
1. حدد نطاق البيانات أو ورقة العمل بأكملها التي تريد تمييز الخلايا مع التعليقات.
2. ثم اضغط الصفحة الرئيسية > بحث وتحديد > انتقل إلى خاص، انظر لقطة الشاشة:
معلومه- سرية: يمكنك الضغط على الاختصارات كترل + G لفتح إذهب إلى الحوار ، وانقر ملصقات خاصة لفتح انتقل إلى خاص الحوار.
3. في انتقل إلى خاص مربع الحوار ، تحقق التعليقات الخيار ، انظر لقطة الشاشة:
4. ثم اضغط OK لإغلاق مربع الحوار هذا ، وتم تحديد جميع الخلايا التي تحتوي على تعليقات في اختيارك ، انظر لقطة الشاشة:
5. بعد تحديد خلايا التعليق ، انقر فوق لون التعبئة رمز تحت الصفحة الرئيسية علامة التبويب ، واختر لونًا واحدًا تريده ، سيتم تلوين جميع تعليقات الخلية المحددة مرة واحدة ، انظر لقطة الشاشة:
قم بتمييز كل الخلايا التي تحتوي على تعليقات برمز VBA
يمكنك أيضًا تمييز جميع تعليقات الخلية وتلوينها في ورقة العمل النشطة فورًا باستخدام التعليمات البرمجية لـ VBA التالية:
1. قم بتنشيط ورقة العمل الخاصة بك التي تريد تمييز خلايا التعليق.
2. اضغط باستمرار على ALT + F11 مفاتيح لفتح نافذة ميكروسوفت فيسوال باسيك للتطبيقات.
3. انقر إدراج > وحدة، والصق الكود التالي في ملف نافذة الوحدة.
كود فبا: قم بتمييز جميع الخلايا بالتعليقات
Sub ColorComments()
'Update 20141110
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)
Application.ScreenUpdating = False
For Each Rng In WorkRng
Rng.Interior.ColorIndex = 36
Next
Application.ScreenUpdating = True
End Sub
4. ثم اضغط F5 مفتاح لتشغيل هذا الرمز ، وسيظهر مربع موجه لتذكيرك بتحديد النطاق الذي تريد تمييز خلايا التعليق ، انظر لقطة الشاشة:
5. ثم انقر فوق OK، تم تمييز جميع التعليقات في اختيارك بالألوان.
ملاحظات:
في الكود أعلاه ، يمكنك تغيير مؤشر اللون في البرنامج النصي Rng.Interior.ColorIndex = 36 على إعجابك.
مقالات ذات صلة:
كيفية إعادة تعيين جميع مواقف التعليقات في إكسيل؟
كيفية تغيير لون مؤشر التعليق في إكسيل؟
كيفية إضافة التاريخ والوقت تلقائيًا للتعليق في إكسيل؟
أفضل أدوات إنتاجية المكتب
عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!