كيفية ملء الخلايا الأخرى تلقائيًّا بعد اختيار قيمة من قائمة منسدلة في Excel: دليل شامل
عند العمل مع Excel، يمكن لأتمتة إدخال البيانات أن تعزز إنتاجيتك بشكل كبير. ومن بين المهام الشائعة ملء البيانات ذات الصلة تلقائيًّا بمجرد اختيار قيمة من قائمة منسدلة. ويستعرض هذا الدليل أربع طرق شاملة، بدءًا من الدوال الأصلية في Excel ووصولًا إلى VBA والأدوات الخارجية مثل Kutools.
الطريقة 1: الملء التلقائي باستخدام دالة VLOOKUP
الطريقة 2: الملء التلقائي باستخدام دالتي INDEX وMATCH
الطريقة 3: الملء التلقائي باستخدام Kutools لـ Excel
الطريقة 4: الملء التلقائي باستخدام دالة معرّفة
الطريقة 4: الملء التلقائي باستخدام دالة معرّفة
أولًا: أنشئ قائمة منسدلة
قبل تطبيق أي طريقة للملء التلقائي، يجب أن تكون لديك قائمة منسدلة، إذ تعمل هذه القائمة كمُحفِّز لملء الخلايا ذات الصلة.
الخطوات:
الخطوة 1. أعد تحديد نطاق المصدر.
الخطوة 2. أنشئ قائمة منسدلة بسهولة.
انتقل إلى الخلية التي تريد وضع القائمة المنسدلة فيها (مثلاً: Sheet1!D2)
انتقل إلىبيانات > التحقق من صحة البيانات > التحقق من صحة البيانات.
في مربع حوار التحقق من صحة البيانات، اخترقائمةمن قسم «السماح»، وحدد نطاق المصدر، ثم انقر فوق «موافق».
بمجرد أن تصبح قائمتك المنسدلة جاهزة، يمكنك المتابعة لتطبيق أيٍّ من طرق الملء التلقائي التالية.
الطريقة 1: الملء التلقائي باستخدام دالة VLOOKUP
تُعد VLOOKUP إحدى أكثر الدوال استخدامًا في Excel لاسترجاع البيانات، وعند دمجها مع قائمة منسدلة، تُمكّنك من جلب البيانات ذات الصلة بسرعة من جدول مرجعي.
الخطوات:
في الخلية المجاورة لـ قائمة منسدلة (مثلاً: E2)، أدخل:
🔓 شرح الصيغة:
- يبحث عن القيمة الموجودة في الخلية D2 ضمن العمود الأول من النطاق A2:B5، وعند العثور عليها، يُرجع القيمة المقابلة من العمود الثاني (العمود B). أما إذا لم تُوجد، فيُظهر خطأً (#N/A).
- تعني القيمة FALSE أنه يلزم وجود تطابق تام.
الخطوة 2. اضغط على مفتاحEnter.
✨ ملاحظات
- استخدم الدالة IFERROR() لإخفاء الأخطاء إذا لم يتم تحديد أي قيمة:
=VLOOKUP(D2,$A$2:$B$5,2,FALSE) - لا يمكن إجراء البحث إلى يسار العمود الرئيسي.
الطريقة 2: الملء التلقائي باستخدام دالتي INDEX وMATCH
يُعدّ زوج الدالتين INDEX وMATCH حلاً قويًّا يتفوّق على VLOOKUP من حيث المرونة، إذ يدعم عمليات البحث إلى اليسار ويظل مستقرًّا حتى عند إعادة ترتيب الأعمدة.
الخطوات:
في الخلية المجاورة لـ قائمة منسدلة (مثلاً: E2)، أدخل:
🔓 شرح الصيغة:
- MATCH(D2, $A$2:$A$5, 0)
تبحث عن القيمة في الخلية D2 ضمن النطاق A2:A5. وتشير القيمة 0 إلى تطابقٍ تام (تمامًا كما يفعل FALSE في دالة VLOOKUP).
وتُرجع رقم الصف (الموقع) الذي تم العثور فيه على القيمة المطلوبة. - INDEX($B$2:$B$5, ...)
تستقبل رقم الصف من دالةMATCH،
وتعيد القيمة المقابلة من النطاقB2:B5.
الخطوة 2. اضغط علىمفتاح Enter
✨ ملاحظات
- يجب أن يتطابق نطاق الإرجاع (INDEX) ونطاق البحث (MATCH) من حيث عدد الصفوف.
- يمكنه البحث يسارًا أو يمينًا.
- أكثر متانة من VLOOKUP.
الطريقة 3: الملء التلقائي باستخدام Kutools لـ Excel
يوفر Kutools نهجًا قائمًا على واجهة المستخدم الرسومية (GUI) يلغي الحاجة إلى الصيغ. وهو مفيد بشكل خاص للمستخدمين الذين يرغبون في الحصول على نتائج سريعة دون الخوض في دوال Excel.
الخطوات:
الخطوة 1. في الخلية المجاورة للقائمة المنسدلة (مثلاً: E2)، انتقل إلىKutools > مساعد الصيغة > البحث والمرجع > البحث عن قائمة قيم.
الخطوة 2. حدد مصفوفة الجدول وقيمة البحث ورقم العمود.ثم انقر فوق موافق.
✨ ملاحظات
- يتيح لك Kutools تطبيق هذا الإجراء على نطاق كامل دفعة واحدة.
- الأداة سهلة الاستخدام جدًّا للمبتدئين وتقلل الأخطاء اليدوية.
- سهلة الاستخدام.
- لا تتطلب استخدام صيغ.
هل سئمت من المهام المتكررة والصيغ المعقدة في Excel؟ Kutools لـ Excel هو معزز الإنتاجية الشامل لك!مع أكثر من 300 ميزة قوية—مثل التحرير الدفعي، والتعبئة الذكية، والتصفية التلقائية—ستعمل بسرعة تفوق ما كنت عليه بعشر مرات!حمّله الآن وارتقِ بمهاراتك في Excel إلى المستوى التالي!
الطريقة 4: الملء التلقائي باستخدام دالة معرّفة
للمستخدمين الذين يحتاجون إلى حل ديناميكي وأوتوماتيكي يتجاوز حدود الصيغ، تُوفِّر VBA أعلى مستويات التحكم وتخصيص المنطق.
الخطوات:
الخطوة 1. اضغط على مفتاحَي Alt + F11 لفتح محرر VBA.
الخطوة 2. انقر فوق **إدراج > وحدة نمطية**.
الخطوة 3. الصق الكود أدناه في الوحدة النمطية.
'Update by Extendoffice
Function GetProductInfo(productName As String, colIndex As Integer) As Variant
Dim ws As Worksheet
Set ws = ThisWorkbook.Sheets("Sheet1") 'the sheet that the data source in
Dim rng As Range
Set rng = ws.Range("A2:B5") 'the range of data source
Dim r As Range
For Each r In rng.Rows
If r.Cells(1, 1).Value = productName Then
GetProductInfo = r.Cells(1, colIndex).Value
Exit Function
End If
Next
GetProductInfo = "Not found"
End Function
الخطوة 4. عُد إلى الورقة، ثم في الخلية المجاورة للقائمة المنسدلة (مثلًا: E2)، أدخل:
الخطوة 5. اضغط مفتاح Enter.
✨ ملاحظات
- يتطلب ملفًا مفعّلًا للماكرو (.xlsm)
الأسئلة الشائعة
س1: ماذا لو كان نطاق البيانات يتغير باستمرار؟
استخدم نطاقات مسماة أو جداول ديناميكية للحفاظ على مراجعك سليمة ودقيقة.
س2: هل يمكنني استخدام دالة VLOOKUP للبحث إلى اليسار؟
لا، فكّر في استخدام INDEX+MATCH أو Kutools لهذه الحالة.
س3: هل يُعد Kutools آمنًا للاستخدام؟
نعم، يُستخدم على نطاق واسع ويحظى بثقة كبيرة، لكن نزّله دائمًا من الموقع الرسمي.
س4: هل تعمل VBA في جميع إصدارات Excel؟
تدعم معظم إصدارات Microsoft Office VBA، لكنها تكون معطَّلة افتراضيًّا ولا تدعمها Excel Online.
س5: هل يُمكن استخدام Kutools مجانًا؟
Kutools لـ Excel ليس أداة مجانية بالكامل، لكنه يقدّم نسخة تجريبية مجانية، تليها خيار شراء لمرة واحدة:
- 30‑يوم تجربة مجانية مع جميع الوظائف الكاملة—ولا حاجة لبطاقة ائتمان.
- ترخيص دائم لمستخدم واحد: حوالي $49 دولار أمريكي، بما في ذلك عامَين من التحديثات والدعم المجانيَّين.
- بعد انتهاء فترة الدعم البالغة عامَين، يمكنك مواصلة استخدام الإصدار الذي لديك إلى الأبد—ولكن دون تحديثات مستقبلية.
أفضل أدوات الإنتاجية لمكتبتك
عزِّز مهاراتك في 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.
- حزمة شاملة واحدة— إضافات Excel وWord وOutlook وPowerPoint بالإضافة إلى Office Tab Pro
- برنامج تثبيت واحد، ترخيص واحد— الإعداد خلال دقائق (جاهز لـ MSI)
- يعمل بشكل أفضل معًا— إنتاجية ميسَّرة عبر تطبيقات Office
- تجربة مجانية لمدة 30 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
- أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل