vlookup بشرطين

[ayman ahmed]

مطلوب صيغه داله vlookup  ولاكن بشرطين او ثلاثه 

اعتقد اسمها vlookup 2

ولكم جزيل الشكر

[ياسر خليل أبو البراء]

أخي الكريم أيمن

يرجى تغيير اسم الظهور للغة العربية ، وقم بالإطلاع على الرابط التالي عله يفيدك

الرابط من هنا

[ayman ahmed]

الاخ الكريم ياسر

 ابحث عن داله Vlookup تحديد

علي ان تكون بشرطين او ثلاثه وهي كانت موجوده في المنتدي  استخدمتها مسبقا لاكن للاسف الذاكره ضعفت ولم اعد اجدها

[ياسر خليل أبو البراء]

لعلك تقصد هذه الدالة

Function VLOOKUPTOW2(Lookup_Value1 As Variant, Table_Array As Range, _
Lookup_Value2 As Variant, Range_Array As Range, Col_index_num As Integer)

Dim Rw As Long
VLOOKUPTOW2 = "#N/A"

For Rw = 1 To Table_Array.Rows.Count
   If Table_Array.Cells(Rw, 1).Value = Lookup_Value1.Value And _
   Range_Array.Cells(Rw, 1).Value = Lookup_Value2.Value Then
     VLOOKUPTOW2 = Table_Array.Cells(Rw, Col_index_num).Value
     Exit Function
   End If
Next Rw

End Function