الى المنتدى العظيم لا اعرف سبب المشكلة

[جمال الفار]

السلام عليكم ورحمة الله وبركاته ارجو منكم مساعدتى فانا مازلت اتعلم عندما قمت بعمل هذه المعادلة لم تقم بجلب البيانات المطلوبة من ورقة السجل مع العلم ان المعادلة صحيحة ولكن لا اعرف المشكلة ارجو حل المشكلة

ادرك ان طلباتى زادت عن حدها فارجو المساعدة

قاعدة بيانات.rar

تم تعديل يونيو 19, 2011 بواسطه جمال الفار

[جمال الفار]

للرفع

[الـعيدروس]

السلام عليكم

اخي جمال اطلع على المرفق

يمكن كذا انحلت المشكله ام ماذا

منتظر ردك

قاعدة بيانات.rar

[جمال الفار]

اخى فى اللهalidroos لم تحل المشكلة حيث انه يوجد فى المعادلة الموجودة فى الايتام رقم على اساسه يتم استدعاء البيانات من ورقة السجل فانظر الى المعادلة IF(COUNTIF(السجل!$C$5:$C$274;3 سنكتب رقم 3او اى رقم اخر موجود فى ورقة السجل مثلا فيتم استدعاء كل البيانات الموجودة فى ورقة السجل والتى امامها رقم 3 مثلا فى الايتام

قاعدة بيانات 2.rar

[جمال الفار]

للرفع

[الـعيدروس]

السلام عليكم

اخي جمال الفار

على مافهت من الغرض من الداله

انها تجلب الايتام اي بمعنى الذي ارقامهم 3

او 4 موش فاهم دي النقطه بس ماعلينا

اختار من الكمبكوس 3 او 4 الذي تريده

واضغط زر جلب وراح يظهر لك كل اسم مقابله 3

او 4 على حسب الاختيار

هذا من عمل الاستاذ القدير احمد فضيله (هانكوك)حفظه الله

تحياتي

والسلام عليكم

قاعدة بيانات.rar

تم تعديل يونيو 20, 2011 بواسطه alidroos

[عادل حنفي]

مع القيام بتعديل بسيط علي المدي داخل الكود

Sheets("الايتام").Select

Range("a6: c274").ClearContents

Sheets("السجل").Select

     [u]Range("a5")[/u].Select

    Selection.AutoFilter

    Selection.AutoFilter Field:=3, Criteria1:=Sheets("الايتام").Range("D1")

    Range([u]"A5:c274")[/u].Select

    Selection.Copy

    Range("a6").Select

    Sheets("الايتام").Select

    Range("a6").Select

    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

        :=False, Transpose:=False

    Application.CutCopyMode = False

              Range("a6").Select

    Sheets("السجل").Select

    Range("a5").Select

    Selection.AutoFilter

    Sheets("الايتام").Select

End Sub

[جمال الفار]

شكرا للك اخى فى الله alidroos واخىaah_aah2008

ولكن الايوجد حل لحل هذه المعادلة