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

كيفية تطبيق التدرج اللوني عبر خلايا متعددة؟

المؤلف: شياويانغ آخر تعديل: 2024-08-26

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

التدرج اللوني لخلية واحدة
التدرج اللوني لخلية واحدة
التدرج اللوني عبر خلايا متعددة
التدرج اللوني عبر خلايا متعددة

قم بتطبيق لون متدرج على خلية واحدة باستخدام ميزة تنسيق الخلايا

قم بتطبيق لون متدرج عبر خلايا متعددة باستخدام كود VBA


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

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

1. حدد خلية أو خلايا متعددة تريد تعبئتها بتدرج لوني لكل خلية ، ثم انقر بزر الماوس الأيمن للاختيار تنسيق الخلايا من قائمة السياق ، في تنسيق الخلايا مربع الحوار ، تحت شغل علامة التبويب ، الرجاء الضغط تأثيرات التعبئة زر ، انظر لقطة الشاشة:

انقر فوق تأثيرات التعبئة في مربع الحوار تنسيق الخلايا

2. في تأثيرات التعبئة الحوار ، حدد لونين تريد استخدامهما من القائمتين المنسدلتين الألوان ، ثم حدد أحد أنماط التظليل كما تريد ، مثل أفقي وعمودي وما إلى ذلك. انظر لقطة الشاشة:

قم بتعيين الخيارات في مربع حوار تأثيرات التعبئة

3. ثم اضغط OK > OK لإغلاق مربعات الحوار ، ويتم تعبئة لون التدرج لكل خلية كما هو موضح في لقطة الشاشة التالية:

يتم تعبئة لون التدرج لكل خلية

لقطة شاشة لـ kutools لبرنامج Excel ai

افتح Excel Magic باستخدام Kutools AI

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

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

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

1. أولاً ، قم بتعبئة لون خلفية معين في نطاق من الخلايا.

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

3. انقر إدراج > وحدة، والصق الكود التالي في ملف وحدة نافذة او شباك.

كود فبا: تطبيق لون متدرج عبر خلايا متعددة:

Sub colorgradientmultiplecells()
'Updateby Extendoffcie 
    Dim xRg As Range
    Dim xTxt As String
    Dim xCell As Range
    Dim xColor As Long
    Dim I As Long
    Dim K As Long
    Dim xCount As Long
    On Error Resume Next
    If ActiveWindow.RangeSelection.Count > 1 Then
      xTxt = ActiveWindow.RangeSelection.AddressLocal
    Else
      xTxt = ActiveSheet.UsedRange.AddressLocal
    End If
LInput:
    Set xRg = Application.InputBox("please select the cells range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    If xRg.Areas.Count > 1 Then
        MsgBox "does not support multiple selections", vbInformation, "Kutools for Excel"
        GoTo LInput
    End If
    On Error Resume Next
    Application.ScreenUpdating = False
    xCount = xRg.Rows.Count
    For K = 1 To xRg.Columns.Count
        xColor = xRg.Cells(1, K).Interior.Color
        For I = xCount To 1 Step -1
            xRg.Cells(I, K).Interior.Color = xColor
            xRg.Cells(I, K).Interior.TintAndShade = (xCount - (I - 1)) / xCount
        Next
    Next
End Sub

4. ثم اضغط F5 مفتاح لتشغيل هذا الرمز ، ويظهر مربع موجه لتذكيرك بتحديد الخلايا الملونة التي تريد أن تملأ لون التدرج ، انظر الصورة:

 

كود vba لتحديد النطاق

5. ثم انقر فوق OK الزر ، تم عرض اللون داخل خلايا متعددة كلون متدرج ، انظر لقطة الشاشة:

 

كود vba لملء اللون المتدرج لخلايا متعددة

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

🤖 مساعد 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٪ ، ويقلل مئات النقرات بالماوس كل يوم!