كيفية استخدام vlookup في vba (مع أمثلة)

يمكنك استخدام بناء الجملة الأساسي التالي لإجراء VLOOKUP باستخدام VBA:

 Sub Vlookup()
   Range(" F2 ").Value = WorksheetFunction.Vlookup(Range(" E2 "), Range(" A2:C11 "),3,False)
End Sub

يبحث هذا المثال تحديدًا عن القيمة الموجودة في الخلية E2 في النطاق A2:C11 ويعثر على القيمة المطابقة في العمود الثالث من النطاق، ثم يقوم بتعيين النتيجة للخلية F2 .

ملاحظة : تحدد الوسيطة الأخيرة للخطأ أننا نريد تطابقًا تامًا.

يوضح المثال التالي كيفية استخدام بناء الجملة هذا عمليًا.

مثال: كيفية استخدام VLOOKUP في VBA

لنفترض أن لدينا مجموعة البيانات التالية في Excel والتي تحتوي على معلومات حول العديد من لاعبي كرة السلة:

لنفترض أننا نريد البحث في مجموعة البيانات عن اسم الفريق “Kings” وإرجاع القيمة المقابلة في عمود المساعدة.

يمكننا إنشاء الماكرو التالي للقيام بذلك:

 Sub Vlookup()
   Range(" F2 ").Value = WorksheetFunction.Vlookup(Range(" E2 "), Range(" A2:C11 "),3,False)
End Sub

عندما نقوم بتشغيل هذا الماكرو، نحصل على الإخراج التالي:

يقوم الماكرو بإرجاع قيمة 3 تمريرات للملوك بشكل صحيح.

إذا قمنا بتغيير اسم الفريق في الخلية E2 ثم قمنا بتشغيل الماكرو مرة أخرى، فسوف يجد بشكل صحيح القيمة المساعدة لاسم الفريق الجديد.

على سبيل المثال، لنفترض أننا قمنا بتغيير اسم الفريق إلى “Warriors” وقمنا بتشغيل الماكرو مرة أخرى:

يقوم الماكرو بإرجاع قيمة 4 تمريرات حاسمة للمحاربين بشكل صحيح.

ملاحظة : يمكنك العثور على الوثائق الكاملة لأسلوب VBA VLookup هنا .

مصادر إضافية

تشرح البرامج التعليمية التالية كيفية تنفيذ المهام الشائعة الأخرى في VBA:

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