انتقل إلى المحتوى الرئيسي

كيفية إضافة لون خلفية / تعبئة عشوائيًا للخلايا في Excel؟

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

أضف لون الخلفية / التعبئة عشوائيًا للخلايا باستخدام VBA

أضف لون الخلفية / الملء عشوائيًا للخلايا باستخدام Kutools for Excel

أدخل القيم بشكل عشوائي من القائمة أو العمود المحدد (بدون تكرار) في Excel

كوتولس ل إكسيل أدخل بيانات عشوائية تتيح الأداة المساعدة لمستخدمي Excel إمكانية إدراج القيم بشكل عشوائي من القائمة أو العمود المحدد في Excel.

ملء قائمة مخصصة بشكل عشوائي 3


يمكن أن يساعدك رمز الماكرو VBA التالي على إضافة لون الخلفية أو لون التعبئة لكل خلية في نطاق معين بألوان عشوائية. يمكنك القيام بما يلي:

الخطوة شنومك: اضغط قديم + F11 مفاتيح لفتح نافذة ميكروسوفت فيسوال باسيك للتطبيقات.

الخطوة 2: انقر على إدراج> وحدة ، ثم الصق رمز فبا التالي في نافذة الوحدة النمطية الافتتاحية.

فبا: أضف لون الخلفية أو لون التعبئة للخلايا ذات اللون العشوائي

Sub TrimExcessSpaces()
Dim rng As Range
Dim WorkRng As Range
Dim xRed As Byte
Dim xGreen As Byte
Dim xBule As Byte
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each rng In WorkRng
xRed = Application.WorksheetFunction.RandBetween(0, 255)
xGreen = Application.WorksheetFunction.RandBetween(0, 255)
xBule = Application.WorksheetFunction.RandBetween(0, 255)
rng.Pattern = xlSolid
rng.PatternColorIndex = xlAutomatic
rng.Interior.Color = VBA.RGB(xRed, xGreen, xBule)
Next
End Sub

الخطوة شنومك: اضغط على F5 مفتاح أو انقر فوق يجري زر لتشغيل هذا الماكرو VBA.

الخطوة 4: الآن يظهر مربع حوار ، فقط حدد النطاق الذي تريد إضافة خلفية بألوان عشوائية ، ثم انقر فوق OK .

الآن سترى جميع الخلايا في النطاق المحدد تمتلئ بألوان مختلفة بشكل عشوائي. انظر أدناه لقطة الشاشة:


في بعض الحالات ، قد تحتاج إلى إضافة لون الخلفية إلى الخلايا المحددة عشوائيًا في نطاق محدد. لإنجاز ذلك ، يمكنك تجربة Kutools for Excel's نطاق الفرز عشوائيا فائدة ، ثم قم بإضافة لون الخلفية لهذه الخلايا العشوائية.

كوتولس ل إكسيل - مزود بأكثر من 300 أداة أساسية لبرنامج Excel. استمتع بتجربة مجانية كاملة المواصفات لمدة 30 يومًا دون الحاجة إلى بطاقة ائتمان! التحميل الان!

الخطوة 1: حدد النطاق الذي تريد البحث فيه عن الخلايا بشكل عشوائي وإضافة لون الخلفية.

الخطوة شنومك: انقر فوق كوتولس > الفترة (من ... إلى) > نطاق الفرز عشوائيا.

خلفية عشوائية doc 3

الخطوة 3: في مربع الحوار "Sort Range Randomly" ، انتقل إلى أختار علامة التبويب ، اكتب رقمًا في ملف عدد الخلايا المراد تحديدها مربع الاختيار حدد الخلايا العشوائية الخيار، وانقر فوق OK زر. انظر أدناه لقطة الشاشة:

الخطوة 4: الآن يتم تحديد عدد الخلايا المحدد بشكل عشوائي في النطاق المحدد. ثم انقر فوق ملف سهم إلى جانب لون التعبئة زر على الصفحة الرئيسية علامة التبويب ، وحدد لون الخلفية من القائمة المنسدلة.

الآن سترى أن لون الخلفية يضاف إلى الخلايا المختارة عشوائيًا كما هو موضح أدناه:

خلفية عشوائية doc 5

كوتولس ل إكسيل - شحن برنامج Excel بأكثر من 300 أداة أساسية. استمتع بتجربة مجانية كاملة المواصفات لمدة 30 يومًا دون الحاجة إلى بطاقة ائتمان! احصل عليه الآن


كوتولس ل إكسيل: أكثر من 300 أداة مفيدة في متناول يدك! ابدأ تجربتك المجانية لمدة 30 يومًا دون أي قيود على الميزات اليوم. تحميل الآن!

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

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

عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت.  انقر هنا للحصول على الميزة التي تحتاجها أكثر...

الوصف


يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير

  • تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
  • فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
  • يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!
Comments (1)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hi, I am trying to do this same highlight macro with one small adjustment:is there a way to take the range selected an highlight it one random color so each time you run the macro the range of active cells is highlighted a different color Please help. Kennon
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations