طلب مطابقة قيم بين جدولين

[cjman122]

ارجو من الاخوة الافاضل المساعدة

حيث لدي جدولين (أ) و (ب) و اريد مطابقة قيم ارقام الاقامات الموجودة في الجدول أ مع الجدول ب

بحيث يكون اول رقم اقامة في الجدول الاول مطابق تماما لنفس الرقم في الجدول الثاني مع تطابق الاسماء.

المثال في المرفق

ارجو المساعده

 

و لكم الشكر و التقدير

ramp area.zip

تم تعديل أكتوبر 30, 2016 بواسطه cjman122

[ياسر العربى]

جرب المرفق لعله المطلوب

ramp area.rar

[cjman122]

منذ ساعه, ياسر العربى said:

جرب المرفق لعله المطلوب

ramp area.rar

الاخ ياسر العربي

من لا يشكر الناس لا يشكر الله..

كل الشكر و التقدير لتقديم الحل المناسب و في الزمن المناسب.

فقط لدي استفسار .. هل قمت بالمطابقة ما بين الجدولين بالطريقة التقليدية ( فرز الارقام من الاصغر الى الاكبر في كلا الجدولين ) لاني جربتها اكثر من مرة و لم تنجح معي.

 

مرة اخرى لك شكري و تقدري..

[ياسر العربى]

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

الكود المستخدم

Sub Yasser_Sort()
Dim X, Z
Application.ScreenUpdating = False
    For X = 6 To Cells(Rows.Count, 5).End(xlUp).Row
        For Z = 6 To Cells(Rows.Count, 14).End(xlUp).Row
            If Cells(X, 5) Like Cells(Z, 14) Then Cells(X, 9) = Cells(Z, 13): Cells(X, 10) = Cells(Z, 14)
        Next Z
    Next X
Application.ScreenUpdating = True
End Sub

تقبل تحياتي