waffaa_qm قام بنشر نوفمبر 2, 2007 قام بنشر نوفمبر 2, 2007 لو سمحتم عندى شيت فى بيانات كتيره خالص خالص عايزه ابحث عن بيان معين فيطلع لى فى شيت اخر هذا البيان وما يرتبط به من الصف ومرفق ملف للتوضيح وشكرا Book1.rar
احمدزمان قام بنشر نوفمبر 2, 2007 قام بنشر نوفمبر 2, 2007 الحل موجود شرحة في ما يلي من شرح حاولي ان تطبقية واذا لم تستطيعي ذلك ممكن نساعدك ونعملة وهذا الحل مأخوذ من هذا الموقع ومن احد الأساتذة الكبار الموجودين في هذا الموقع جزاه الله عنا جميعا خير الجزاء - وبدل سيئاته بالحسنات معالجة المشكة بأستخدام ( التصفية المتقدمة ) ولكن ليس من خلال قوائم الاكسيل المتاحة فى شريط قوائم العمل - من قائمة (بيانات / تصفية / تصفية متقدمة ) ولكن من خلال التصفية المتقدمة بأستخدام اوامر الفجوال بيسك - لتخطى العقبات والعراقيل التى تم وضعها فى قاعدة البيانات الشرح : الكود المستخدم : كود Range("db").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Range( _ "MyCri"), CopyToRange:=Range("Des"), Unique:=False ويتم تمرر ثلاث نطاقات الى هذا الكود ويجب ان تحتوى هذه النطاقات ضمنيا على السطر الاول ذو عناوين الحقول : النطاق اول وهو نطاق قاعدة البيانات : 1 - يتم تسمية نطاق قاعد البيان بأسم (db) ( اذا لم تكن تعرف معنى تسمية النطاق يوجد بالمنتدى الكثير من المشاركات تشرح ذلك ) النطاق الثانى وهو نطاق الشروط : 2 - يتم تسمية نطاق الشروط بأسم (MyCri) النطاق الثالث وهو نطاق استخراج البيانات : 3 - يتم تسمية نطاق استخراج البيانات بأسم (Des) ومن المفروض عمل زر لتشغيل هذا الكود فى الورقة ولكنى فضلت ان تتم الفلترة بمجرد ادخال اى شرط او زيادة عدد الشروط لأكثر من شرط واحد حتى تكون ذو تأثير مرئ جيد . لعلى اكون قد وفقت فى الشرح
waffaa_qm قام بنشر نوفمبر 4, 2007 الكاتب قام بنشر نوفمبر 4, 2007 شكرا على الرد بس ياريت مثال عملى وتوضيح اكثر وجزاك الله خيرا
عبدالله باقشير قام بنشر نوفمبر 4, 2007 قام بنشر نوفمبر 4, 2007 السلام عليكم اضافة الى مشاركة لاخ / يعقوب جزاه الله الف خير في الملف المرفق طريقتين للبحث : 1 - عبر كود التصفية المتقدمة 2 - كود آخر خبور خير _____________.rar
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.