KutoolsforOffice — حل واحد، خمس أدوات قوية.تحقيق المزيد بجهد أقل.

كيف يمكن تغيير لون زر عنصر التحكم ActiveX في Excel؟

المؤلفXiaoyangتاريخ التعديل

في Excel، عندما تُدرج زر أمر، يكون لون الزر رماديًا بشكل افتراضي. ولكن في بعض الأحيان، قد تحتاج إلى تغيير اللون الرمادي إلى لون جميل لجعل ورقة العمل أكثر احترافية. اليوم، يمكنني أن أقدّم لك بعض الحيل السريعة لتغيير لون الزر في Excel.

تغيير لون زر عنصر التحكم ActiveX بتغيير الخصائص
تغيير لون زر عنصر التحكم ActiveX باستخدام كود VBA


تغيير لون زر عنصر التحكم ActiveX بتغيير الخصائص

عادةً في Excel، يوجد نوعان من الأزرار: أحدهما هو زرعنصر التحكم النموذجي (Form Control)، والآخر هو زرعنصر التحكم ActiveX. إذا كان الزر من نوع عنصر التحكم النموذجي، يمكنك تغيير لون الخط فقط، ولا يمكنك تغيير لون الخلفية. أما إذا كان زرًا من نوع عنصر التحكم ActiveX، فيمكنك تغيير لون خلفيته. يُرجى اتباع الخطوات التالية:

1.أدرج زرعنصر التحكم ActiveXبالنقر علىالمطوّر (Developer)>إدراج (Insert)، ثم اخترزر الأمر (Command Button)ضمن قسمعناصر التحكم ActiveX (ActiveX Controls)، انظر لقطة الشاشة:

حدد زر الأمر من تبويب المطور

ملاحظة: إذا لم تظهر علامة التبويبالمطوّر (Developer)في الشريط، يمكنك النقر علىملف (File) > خيارات (Options) > تخصيص الشريط، ثم فعّل خيارالمطوّر (Developer)في الجزء الأيمن لعرض علامة التبويبالمطوّر (Developer).

2. بعد ذلك، اسحب الماوس لرسم زر.

اسحب لرسم زر

3. بعد ذلك، حدد الزر وانقر بزر الماوس الأيمن، ثم اخترالخصائص (Properties)من قائمة السياق. في مربع حوارالخصائص (Properties)المنبثق، انقر على علامة التبويبأبجدي (Alphabetic)، ثم انقر على القائمة المنسدلةلون الخلفية (BackColor)لاختيار اللون الذي تفضّله. انظر لقطات الشاشة:

اختر الخصائص من القائمة السياقيةسهم يميناضبط الخيارات في مربع حوار الخصائص

4. بعد ذلك، أغلق مربع الحوار وسيتم تغيير لون زر الأمر الخاص بك كما يلي:

تم تغيير لون زر الأمر

5. أخيرًا، اخرج منوضع التصميم (Design Mode)بالنقر علىالمطوّر (Developer) > وضع التصميم (Design Mode)لتمكين الزر من العمل بشكل طبيعي.

لقطة شاشة لـ kutools for excel ai

افتح سحر إكسل مع KUTOOLS AI

  • التنفيذ الذكي: نفِّذ عمليات الخلايا، وحلِّل البيانات، وأنشئ المخططات البيانية — كل ذلك بأوامر بسيطة!
  • الصيغ المخصصة: أنشئ صيغًا مخصصة لتبسيط سير عملك.
  • برمجة VBA: اكتب وأَنفِذ أكواد VBA بسلاسة تامة.
  • تفسير الصيغ: افهم الصيغ المعقدة بسهولة!
  • ترجمة النصوص: اكسر الحواجز اللغوية في جداولك الإلكترونية!
حسِّن قدراتك في إكسل بأدوات مدعومة بالذكاء الاصطناعي.حمِّل الآنوجرِّب الكفاءة كما لم تفعل من قبل!

تغيير لون زر عنصر التحكم ActiveX باستخدام كود VBA

كما ترى، يوفّر Excel عددًا محدودًا من الألوان في مربع حوار الخصائص للاستخدام. ولكن مع كود VBA البسيط التالي، يمكنك فتح الباب أمام اختيار ألوان لا حصر لها!

1.أدرج زر أمر، ثم انقر بزر الماوس الأيمن، واخترعرض الكود (View Code)من قائمة السياق، انظر لقطة الشاشة:

اختر عرض الكود من القائمة السياقية

2. بعد ذلك، ستظهر نافذةMicrosoft Visual Basic for Applications. انظر لقطة الشاشة:

سيظهر نافذة مايكروسوفت Visual Basic for Applications

3. بعد ذلك، انسخ والصق نص الكود البسيط هذا: CommandButton1.BackColor = 12713921 في النافذة بين سطري الكود. راجع لقطة الشاشة التالية:

انسخ والصق الكود في الوحدة النمطية

ملاحظة:في نص الكود أعلاه، يشيرCommandButton1 إلى اسم الزر الخاص بك، والرقم12713921 هو رقم اللونMS-Access الخاص، وكلاهما قابل للتغيير ويمكنك تعديلهما حسب احتياجاتك.

4.بعد ذلك، اضغط على مفتاحF5 لتشغيل هذا الكود، وسيتغير لون الزر فورًا.

تشغيل الكود لتغيير لون الزر

تلميح: يمكنك زيارة هذا الموقع الإلكتروني: http://www.endprod.com/colors/ لعرض المزيد من قيم ألوانأرقام MS-Access، حيث يحتوي الموقع على مئات الألوان الجاهزة للاستخدام! بعد فتح الموقع، كل ما عليك فعله هو اختيار اللون المطلوب، ثم نسخ الرقم الموجود تحت عنوان «MSAccess»، واستبدال الرقم في كود البرنامج أعلاه بهذا الرقم الجديد.

لقطة شاشة لكود اللون

أفضل أدوات الإنتاجية لمكتبتك

🤖KUTOOLS AI مساعد: ثوّر تحليل البيانات استنادًا إلى:التنفيذ الذكي   |  إنشاء الكود|  إنشاء الصيغ المخصصة  |  تحليل البيانات وإنشاء المخططات البيانية|  استدعاء الوظائف المحسنة
الميزات الشائعة:البحث، التمييز أو وضع علامة على المكررات   |  حذف الصفوف الفارغة   |  دمج الأعمدة أو الخلايا دون فقدان البيانات   |  التقريب بدون استخدام الصيغة...
بحث متقدم:VLookup متعدد المعايير  |  VLookup متعدد القيم  |   VLookup عبر أوراق متعددة   |   مطابقة غامضة....
قائمة منسدلة متقدمة:إنشاء قائمة منسدلة بسرعة   |  قائمة منسدلة تابعة   |  قائمة منسدلة متعددة الاختيار....
مدير الأعمدة:إضافة عدد محدد من الأعمدة|نقل الأعمدة|تبديل حالة ظهور الأعمدة المخفية|مقارنة النطاقات والأعمدة...
ميزات مميزة:التركيز على الشبكة   |  عرض التصميم   |شريط الصيغ المحسن   | مدير الدفتر والورقة   |  مكتبة الموارد(نص تلقائي)|  أداة اختيار التاريخ   |  تجميع ورقات العمل  |  تشفير/فك تشفير الخلايا   | إرسال رسائل البريد الإلكتروني حسب القائمة   |  مرشح متقدم   |   تصفية خاصة(تصفية الخلايا التي تحتوي على خط عريض/مائل/يتوسطه خط...) ...
أفضل 15 مجموعات الأدوات:12 أدواتالنصوص(إضافة نص،حذف الأحرف المحددة، ...)|   50+أنواعالمخططات البيانية(مخطط جانت، ...)|   40+ صيغعملية(حساب العمر بناءً على تاريخ الميلاد، ...)|   19 أدواتالإدراج(إدراج رمز QR،إدراج صورة من المسار، ...)|   12 أدواتالتحويل(تحويل إلى كلمات،تحويل العملة، ...)|   7 أدواتدمج وتقسيم(دمج متقدم للصفوف،تقسيم الخلايا، ...)|... وأكثر من ذلك
استخدم Kutools باللغة التي تفضلها – يدعم الإنجليزية والإسبانية والألمانية والفرنسية والصينية و40+ لغات أخرى!

عزِّز مهاراتك في 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.

ExcelWordOutlookTabsPowerPoint
  • حزمة شاملة واحدة— إضافات Excel وWord وOutlook وPowerPoint بالإضافة إلى Office Tab Pro
  • برنامج تثبيت واحد، ترخيص واحد— الإعداد خلال دقائق (جاهز لـ MSI)
  • يعمل بشكل أفضل معًا— إنتاجية ميسَّرة عبر تطبيقات Office
  • تجربة مجانية لمدة 30 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
  • أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل