كيفية إظهار نص الخلية المحددة بالوميض أو الوميض في Excel؟
لجعل خلية معينة بارزة في ورقة العمل الخاصة بك، ما رأيك في جعل النص الخاص بهذه الخلية يتوهج؟ سيوضح لك هذا المقال طريقة جعل نص الخلية المحددة يتوهج في Excel.
الوميض أو التوهج للنص في الخلية المحددة باستخدام كود VBA
الوميض أو التوهج للنص في الخلية المحددة باستخدام كود VBA
يرجى اتباع الخطوات التالية لجعل النص في الخلية المحددة في Excel يتوهج.
1. اضغط على مفاتيح Alt + F11 معًا لفتح نافذة Microsoft Visual Basic for Applications.
2. في نافذة Microsoft Visual Basic for Applications، انقر فوق إدراج > وحدة. ثم قم بنسخ ولصق الكود التالي في نافذة الكود.
كود VBA: جعل النص في الخلية المحددة يتوهج في Excel
Sub StartBlink()
'Updated by ExtendOffice 20181010
Dim xCell As Range
Dim xTime As Variant
On Error Resume Next
Set xCell = Range("Sheet2!A1")
On Error Resume Next
If xCell.Font.Color = vbRed Then
xCell.Font.Color = vbWhite
Else
xCell.Font.Color = vbRed
End If
xTime = Now + TimeSerial(0, 0, 1)
Application.OnTime xTime, "'" & ThisWorkbook.Name & "'!StartBlink", , True
End Sub
ملاحظة: في هذا الكود VBA، Sheet2 و A1 يشيران إلى أن النص الموجود في الخلية A1 من Sheet2 سيتم جعله يتوهج في المصنف الحالي.
3. اضغط على مفاتيح Alt + Q معًا لإغلاق نافذة Microsoft Visual Basic for Applications.
الآن تحتاج إلى زر لبدء وإيقاف الوميض.
4. انقر فوق Developer > إدراج > زر (عنصر تحكم النموذج). انظر لقطة الشاشة:
5. ارسم زرًا في ورقة العمل الخاصة بك، ثم ستظهر مربع حوار تعيين ماكرو، يرجى النقر فوق StartBlink في ماكرو اسم المربع، ثم انقر فوق الزر موافق. انظر لقطة الشاشة:
6. انقر بزر الماوس الأيمن على الزر الذي تم إدراجه، وانقر فوق تعديل النص من قائمة النقر بزر الماوس الأيمن. ثم قم بتغيير نص الزر إلى النص الذي تحتاجه مثل بدء / إيقاف الوميض.
من الآن فصاعدًا، عند النقر على الزر، يبدأ نص الخلية A1 في الوميض. وعند النقر على الزر مرة أخرى، يتوقف نص الخلية A1 عن الوميض.

اكتشف سحر Excel مع Kutools AI
- التنفيذ الذكي: قم بعمليات الخلية، وتحليل البيانات، وإنشاء المخططات - كل ذلك يتم من خلال أوامر بسيطة.
- الصيغ المخصصة: قم بإنشاء صيغ مصممة خصيصًا لتسهيل سير عملك.
- برمجة VBA: كتابة وتطبيق أكواد VBA بسهولة.
- تفسير الصيغ: فهم الصيغ المعقدة بسهولة.
- ترجمة النصوص: تجاوز الحواجز اللغوية داخل جداول البيانات الخاصة بك.
أفضل أدوات زيادة الإنتاجية لمجموعة Office
عزز مهاراتك في Excel مع Kutools لـ Excel، وتمتع بكفاءة غير مسبوقة. يقدم Kutools لـ Excel أكثر من300 ميزة متقدمة لتعزيز الإنتاجية وتوفير وقت الحفظ. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
Office Tab يجلب تجربة التبويبات إلى Office، ويجعل عملك أسهل بكثير
- فعّل تحرير وقراءة المستندات عبر التبويبات في Word وExcel وPowerPoint
- افتح وأنشئ مستندات متعددة في تبويبات جديدة ضمن نفس النافذة، بدلاً من فتحها في نوافذ جديدة.
- يمنحك زيادة إنتاجية تصل إلى50% ويوفر عليك مئات النقرات يومياً!