لا يعرض Excel النص الوامض أو الوامض كخيار خط. ومع ذلك ، باستخدام Visual Basic للتطبيقات المضمنة في Excel ، يمكنك استخدام التعليمات البرمجية لتغيير لون النص في كل قسم ، مما يؤدي إلى إنشاء تأثير وامض.
الخطوة 1
افتح ملف Microsoft Excel 2010 الذي تريد جعل وميض النص فيه. اضغط على "Alt" و "F11" لفتح وحدة تحكم VBA.
فيديو اليوم
الخطوة 2
انقر بزر الماوس الأيمن فوق إدخال "ThisWorkbook" على الجانب الأيسر من وحدة تحكم VBA. حرك الماوس فوق "إدراج" واختر "وحدة".
الخطوه 3
انقر نقرًا مزدوجًا فوق الخيار "ThisWorkbook". انسخ الكود التالي والصقه في المساحة البيضاء على الجانب الأيمن من الشاشة:
Private Sub Workbook_Open () Blink End Sub
Private Sub Workbook_BeforeClose (إلغاء كـ منطقي) NoBlink End Sub
سيبدأ هذا الرمز والنص الوامض عند فتح هذا المصنف ، وإيقاف النص الوامض عند إغلاق المصنف ، بمجرد إدخال الرمز لإخبار Excel بما هو Blink و NoBlink في الواقع يعني.
الخطوة 4
انقر نقرًا مزدوجًا فوق "الوحدة 1" من القائمة الموجودة على الجانب الأيسر من الشاشة. ضع المؤشر على الجانب الأيمن من الشاشة وأدخل السطر التالي:
الوقت العام على أنه مزدوج
يؤدي هذا إلى إنشاء متغير يسمى "Timecount" يمكنك استخدامه في كل روتين فرعي.
الخطوة الخامسة
اضغط على Enter لنقل المؤشر إلى السطر التالي وأدخل الرمز التالي:
وميض فرعي () مع ThisWorkbook. أوراق العمل ("Sheet1"). Range ("A1: A10"). الخط إذا كان .ColorIndex = 3 ثم .ColorIndex = 2 آخر .ColorIndex = 3 End If End With Timecount = Now + TimeSerial (0، 0، 1) Application. OnTime Timecount ، "وميض" ، True End Sub
يؤدي هذا إلى إنشاء روتين فرعي يسمى "وميض" يؤدي إلى وميض كل النص داخل النطاق المحدد. يمكنك تغيير النطاق من "A1: A10" إلى النطاق الذي تريده ، بما في ذلك خلية فردية.
الخطوة 6
اضغط على "دخول" للوصول إلى السطر التالي وأدخل الرمز التالي:
رابط فرعي () ThisWorkbook. أوراق العمل ("Sheet1"). النطاق ("A1: A10"). الخط. ColorIndex = _ تطبيق xlColorIndexAutomatic. OnTime Timecount ، "وميض" ، False End Sub
سيؤدي هذا إلى إنشاء روتين فرعي سيتم تشغيله عند إغلاق المصنف. يقوم بإعادة كل النص إلى اللون الأسود ، بحيث لا يرى الشخص الذي يفتح المصنف بدون تمكين وحدات الماكرو شيئًا عن طريق الخطأ في مربعات النص.
الخطوة 7
أغلق وحدة تحكم VBA بالنقر فوق "X" في الزاوية العلوية اليمنى. انقر فوق علامة التبويب "ملف" أعلى الشاشة واختر "حفظ باسم". حدد "مصنف Excel الذي تم تمكينه بماكرو" من حقل القائمة المنسدلة واكتب اسمًا للمصنف. انقر فوق "حفظ".
الخطوة 8
أغلق ملف Excel ثم أعد فتحه. سيبدأ النص الخاص بك ، ضمن النطاق المحدد في الماكرو ، في الوميض. بناءً على إعدادات الأمان الخاصة بك ، قد تحتاج إلى النقر فوق الزر "تمكين وحدات الماكرو" أعلى الشاشة لرؤية النص الوامض.
