kalll

لااله الا الله حضرتكم هو انا تجاوزت فى شيئ حتى تتجاهلو مشاركاتى ارجو الرد من الادارة ارجو الرد من الادارة

نرجو التدخل من الاخوة الخبراء فى ادارة المنتدى نرجو من حضرتكم المساعدة وجزاكم الله خير عبدالعزيز محمد-عاشق البرمجة ارجو من سيادتكم التخل

السلام عليكم هذا الكود لاحد الاخوة فى هذا الجروب الكود للبحث شيت حركة الموردين وشيت البحث ================== 'اسم ورقة البيانات Private Const Mydate As String = "حركة الموردين" ' اسم ورقة البحث Private Const MyFind As String = "البحث" Sub Kh_Filter() Dim Last As Long Last = Worksheets(Mydate).UsedRange.Rows.Count '----------------------------- Worksheets(Mydate).Range("A1:G" & Last).AdvancedFilter xlFilterCopy _ , Worksheets(MyFind).Range("K2:L3"), Worksheets(MyFind).Range("A5:G5"), False '----------------------------- ActiveWindow.ScrollRow = 1 ' Sheets("حركة الموردين").Range("A1:G270").AdvancedFilter Action:=xlFilterCopy, _ CriteriaRange:=Range("البحث"), CopyToRange:=Range("البحث") _ , Unique:=False End Sub ======================== المطلوب المساعدة فى تعديل الكود ليجلب ايضا من شيت حركة النقدية (عمودا"لمبلغ المسدد" و عمود "رقم الايصال") وجزاكم الله كل خيرا اي هيكون عندنا ورقة "حركة الموردين" وورقة "حركة النقدية " وورقة "البحث" ارجو ان اكون وصلت المطلوب لحضرتكم وشكرا

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

الاخوة الخبراء فى الادارة ارجو المساعدة

السلام عليكم اخى الفاضل ناصر سعيد ممكن مساعدة هذا كود للبحث من شيت حركة الموردين كيف اجعله يجلب بيانات من شيت حركة النقدية ايضا Sub Kh_Filter() Dim Last As Long Last = Worksheets(Mydate).UsedRange.Rows.Count '----------------------------- Worksheets(Mydate).Range("A1:D" & Last).AdvancedFilter xlFilterCopy _ , Worksheets(MyFind).Range("K2:L3"), Worksheets(MyFind).Range("A5:D5"), False '----------------------------- ActiveWindow.ScrollRow = 1 ==================== ممكن المساعدة استاذنا ناصر سعيد وجزاك الله خير Book3330.rar

يا اهل الخير هل من مجيب

محدش بيرد اخى يبدو ان المنتدى خاوى

لاحول ولاقوة الابالله اين الاخوة الافاضل

لا اله الا الله هل من مجيب

لااله الاالله اتمنا من الله توفيق احد الاخوة فى المساعدة

نتمنا من احد الاخوة الخبراء المساعدة

السلام عليكم ممكن المساعدة فى اتمام هذا البحث مرفق بالملف بيان بالمطلوب وبارك الله فيكم جميعا وجزاكم خير على ما تقدمونه من مساعدة Book3330.rar

جزاك الله كل خير اخى الفاضل shreif mohamed ممكن اعرف كانت ايه المشكلة ربنا يبارك فى عمرك وعلمك شكرا ربنا يبارك فى عمرك شكرا ربنا يبارك فى عمرك

السلام عليكم الاخوة الخبراء ارجو المساعدة فى حل الخطاء الذى يظهر عند عمل كشف الحساب هذا رغم انى نفذت الشرح بالضبط ولكن لا اعلم اين الخطاء وجزاكم الله خير كشف حساب.rar

اخى الفاضل shreif mohamed هل ممكن التعديل يكون بالمعادلات وليس ألاكواد

شكرا لك اخى الفاضل shreif mohamed وجزاك الله خير عمل رائع ولك كل الشكر على مجهودك وصبرك معى جعله الله فى ميزان حسناتك ان شاء الله

والله انا مش عارف اقول لحضرتك ايه ولا املك الا الدعاء لك ولكن هناك مشكلة تظهر ..وهى عند البحث يظهر المطلوب صح فى شيت البحث ولكن بيتم ابضا حذف البيانات الموجوده فى شيت الموردين وشيت النقدية وتظهر ايضا نتيجة البحث كما فى شيت البحث وتختفى بااقى بيانات الموردين مثال .. لو تم البحث عن المورد سيد على البضاعة من تاريخ كذا الى تاريخ كذا بيتم اخفاء حسابات باقى الموردين من شيت الموردين والنقدية وتظهر فقط نتيجة البحث اى بتظهر نتيجة البحث فى ال 3 شيتات ارجو ان اكون وضحة لحضرتك المشكلة واسف على تعبك معى وان شاء الله ربنا يجازيك خير عن هذا المجهود

اخى الفاضل عند البحث يظهر بيانات البضاعة ولا تظهر بيانات النقدية وتظهر هذه الرسائل اكسل.rar

اخى الفاضل تعبتك معى ولكن نفس المشكلة عند الضغط على بحث لايظهر اى بيانات فى صفحة البحث بالعكس بيحذف صفوف البيانات من شيت حركة الموردين وحركة النقدية

اخى الفاضل شكرا لمساعدتك لى جعلها الله فى ميزان حسناتك ولكن حدث لغبطه ارجو النظر فى المرفق Book5822-2.rar

shreif mohamed جزاك الله خير اخى الفاضل

اولا شكرا اخى الفاضل على التفاعل والمساعدة وجزاك الله خير حضرتك المفروض هيجلب النقدية من شيت النقدية بتاريخ تسجلها والبضاعة من شيت البضاعة بتاريختسجلها ارجو ان اكون وصلت المطلوب لحضرتك مثال)) عند البحث عن مدة مثلا من 31/1/2017 الى 1/1/2017باسم مورد يتم جلب البضاعة التى تم تسجلها فى هذا التاريخ وايضا اذا كان تم تسليم نقدية تظهر ايضا اتفضل حضرتك Book5822-1.rar

لا اله الا الله هو مفيش احد فى المنتدى ولا ايه اين المشرفين

ارجو المساعدة من الاخوة الخبراء بالمنتدى