نصيحة: اللغات الأخرى مترجمة من قبل Google. يمكنك زيارة English نسخة من هذا الرابط.
تسجيل الدخول
x
or
x
x
التسجيل
x

or

كيفية تسليط الضوء على الخلية النشطة أو التحديد في إكسيل؟

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

قم بتمييز الخلية النشطة أو التحديد باستخدام رمز فبا

علامة تبويب Office تمكين التحرير والتصفح في Tabbed ، وجعل عملك أسهل بكثير ...
Kutools for Excel يحل معظم مشاكلك ، ويزيد من إنتاجيتك بنسبة 80٪
  • إعادة استخدام أي شيء: أضف الصيغ الأكثر استخدامًا أو تعقيدًا والمخططات وأي شيء آخر إلى مفضلاتك ، ثم أعد استخدامها سريعًا في المستقبل.
  • أكثر من ميزات نص 20: استخراج الرقم من سلسلة النص ؛ استخراج أو إزالة جزء من النصوص ؛ تحويل الأرقام والعملات إلى الكلمات الإنجليزية ...
  • دمج الأدوات: العديد من المصنفات والأوراق في واحد ؛ دمج خلايا / صفوف / أعمدة متعددة دون فقدان البيانات ؛ دمج الصفوف المكررة ومجموع ...
  • أدوات الانقسام: تقسيم البيانات إلى أوراق متعددة بناءً على القيمة ؛ مصنف واحد إلى ملفات Excel أو PDF أو CSV متعددة ؛ عمود واحد إلى أعمدة متعددة ...
  • لصق الطفر الصفوف المخفية / المصفاة ؛ عدد ومبلغ بواسطة لون الخلفية. إنشاء قائمة بريدية و إرسال رسائل البريد الإلكتروني حسب قيمة الخلية...
  • فلتر سوبر: إنشاء مخططات تصفية متقدمة وتطبيقها على أي أوراق ؛ فرز حسب الأسبوع ، اليوم ، التردد وغير ذلك ؛ تصفية / فلترة بواسطة جريئة ، الصيغ ، التعليق ...
  • أكثر من ميزات 300 القوية ؛ يعمل مع Office 2007-2019 و 365 ؛ يدعم جميع اللغات ؛ سهولة النشر في مؤسستك أو مؤسستك.

السهم الأزرق الفقاعة اليمنى قم بتمييز الخلية النشطة أو التحديد باستخدام رمز فبا


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

1. اضغط باستمرار ALT + F11 مفاتيح لفتح نافذة ميكروسوفت فيسوال باسيك للتطبيقات.

2. ثم اختر ThisWorkbook من اليسار مستكشف المشاريع، انقر نقرا مزدوجا لفتحه وحدة، ومن ثم نسخ ولصق التعليمات البرمجية فبا التالية في وحدة فارغة:

رمز فبا: تسليط الضوء على الخلية النشطة أو التحديد

Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Excel.Range)
'Update 20140923
Static xLastRng As Range
On Error Resume Next
Target.Interior.ColorIndex = 6
xLastRng.Interior.ColorIndex = xlColorIndexNone
Set xLastRng = Target
End Sub

وثيقة تسليط الضوء نشط خلايا-1

3. ثم حفظ وإغلاق هذه التعليمات البرمجية، والعودة إلى ورقة العمل، الآن، عند تحديد خلية أو تحديد، سيتم تمييز الخلايا المحددة، وسيتم نقلها حيوي كما يتغير الخلايا المحددة.

الملاحظات:

1. إذا لم تتمكن من العثور على جزء مستكشف المشاريع في النافذة، يمكنك النقر فوق مشاهدة > مستكشف المشاريع في ال نافذة ميكروسوفت فيسوال باسيك للتطبيقات لفتحه.

2. في التعليمات البرمجية أعلاه، يمكنك تغيير .ColorIndex = شنومكس اللون إلى لون آخر تريد.

3. يمكن تطبيق هذا الرمز فبا على كافة أوراق العمل داخل المصنف.

4. إذا كانت هناك بعض الخلايا الملونة في ورقة العمل الخاصة بك، سيتم فقدان اللون عند النقر فوق الخلية ثم الانتقال إلى خلية أخرى.


مقالة ذات صلة:

كيفية تسليط الضوء التلقائي الصف وعمود الخلية النشطة في إكسيل؟


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

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

علامة تبويب Office توفر واجهة مبوبة لـ Office ، واجعل عملك أسهل بكثير

  • تمكين تحرير علامات التبويب والقراءة في Word و Excel و PowerPointوالناشر والوصول ، Visio ومشروع.
  • افتح مستندات متعددة وقم بإنشائها في علامات تبويب جديدة لنفس النافذة ، وليس في نوافذ جديدة.
  • يزيد إنتاجيتك بنسبة 50٪ ، ويقلل مئات نقرات الماوس لك كل يوم!
أسفل مكتبه
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    pyroto · 1 years ago
    Anyway you can do the left adjacent cell to highlight instead of active cell? Or a range of cells around the activecell?
  • To post as a guest, your comment is unpublished.
    Joa · 1 years ago
    Thank you, but use this with caution. It has the undesirable counter effect of not letting undo. Is there any solution for that?
  • To post as a guest, your comment is unpublished.
    Sud · 1 years ago
    But i am unable to do undo option and lose the previously assigned cell color also.
    Please provide solution
  • To post as a guest, your comment is unpublished.
    Pravin Shinde · 2 years ago
    Perfect solution as I always tend to loose the track of the highlighted cell during "Find and Select" operation. Thanks a lot.
  • To post as a guest, your comment is unpublished.
    Rana Banik · 2 years ago
    Great!!
    But what if I don't want to lose the previously assigned cell color?

    That would be greater to know.
    • To post as a guest, your comment is unpublished.
      Barney · 1 years ago
      Use a conditional format on the cells you want to protect.
    • To post as a guest, your comment is unpublished.
      Mark Anderson · 1 years ago
      Instead of "ColorIndex" which has a limited set of 255 values (meaning any custom colors are lost), use "Color" instead. You'll need to store the old value in a new static long variable and also generate the highlight color you want with the RGB function. The only problem with having this code active is that you can no longer change the active cell color as it changes back to what it was before you clicked it. I suggest that if you need to change the highlight colors on the sheet, do so with macros disabled or change the sub name for a second so it doesn't trigger when you are clicking on cells, then just rename it back to normal to "re-activate" it. Here is my code:

      Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Excel.Range)

      Static xLastRng As Range
      Static xLastRngColor As Long

      On Error Resume Next

      xLastRng.Interior.Color = xLastRngColor
      xLastRngColor = Target.Interior.Color
      Target.Interior.Color = RGB(255, 255, 0) 'compose whatever highlight color you want with RGB values, I am using yellow here
      Set xLastRng = Target

      End Sub
    • To post as a guest, your comment is unpublished.
      Lee · 2 years ago
      Yes, I would like to know this as well. How would you keep the previously selected cells highlight for tracking purposes?
  • To post as a guest, your comment is unpublished.
    Malcolm Davidson · 2 years ago
    Brilliant! I've used your code to highlight a cell. It works perfectly for what I am doing. Using hundreds of hyperlinks to move between work sheets and work books. makes the traversing so much easier. Thank you for your little VBA script.