اخى الفاضل
تفضل الملف المرفق .. كود طباعة الشيتات المحددة كملف PDF .. في نفس مسار الملف الاصلي ... يمكنك تغيير الشيتات من هذا السطر من الكود
ThisWorkbook.Sheets(Array("1", "2")).Select
تحياتي
PDF.rar
اخى الفاضل
كما تفضل أستاذنا القدير بن علية حاجى ... اذا كنت تريد ترحيله كمعادلة فقم باجراء التغيير الذي تفضل استاذنا الكريم بذكره لك ، واذا كنت تريد عدم ترحيله نهائيا مرفق الملف به ذلك
تحياتي
ترحيل.rar
اخى الفاضل
أولاً : أنشئ ملف إكسل جديد واحفظه باى اسم وليكن باسم الإستمارة CS017001 ... تمام
ثانيا: من قائمة Data (بيانات ) ومن المجموعة Get External Data (احضار بيانات خارجية ) ... اضغط على From Access ... ثم اختر قاعدة البيانات الخاصة بك من الجهاز كما في الصورة 1 بالمرفقات
ثالثا: من الإطار الذي أمامك اختر الإستمارة أو جدول الأكسيس الذي تريد وضع بياناته بشيت الإكسل وهنا سنختار جدول CS017001 كما بالصورة 2 في المرفقات
رابعاً: سيظهر لك اطار تحدد من خلاله اين سيتم وضع البيانات هل في هذا الشيت ام شيت جديد وبداية من اى خلية ... هنا في الصورة اخترت من هذا الشيت وبداية من الخلية A1 كما في الصورة 3 بالمرفقات
خامساً: ستجد ان كافة البيانات بالجدول أصبحت موجودة لديك بالشيت ... يلزمنا النقطة الأخيرة وهى تزبيط خصائص الاتصال لجعل تحديث البيانات يتم كل فترة وجيزة وكذلك تحديث البيانات يتم عند فتح ملف الإكسل دائما .... وذلك من قائمة Data (بيانات) ثم اختر اتصالات Connections .. ثم حدد قاعدة البيانات واضغط Properties (خصائص ) من اليمين ومن الإطار الظاهر أمامك اجعل فترة تحديث البيانات كما تريد انا هنا في الصورة 4 بالمرفقات جعلتها دقيقة واحدة وكذلك تحديث البيانات عند فتح الملف
أرجو من الله أن أكون وفقت في ايصال المعلومة وأن يكون هذا طلبك .... وجمعه مباركة
تحياتي
Access-Excel-Pic.rar
اخى الفاضل
لا أعلم ان كان هذا طلبك ام لا .. وان كنت ارى انه لا داعى لكل هذا فهي دالة SumIFS كما تفضل أ.سليم تحقق المطلوب ... مرفق الملف
تحياتي
جمع بشرطين.rar
اخى الفاضل
بعد إذن أستاذنا الكريم أ.سليم، ولإثراء الموضوع مرفق ملف به مقارنة العمودين باستخدام الكود البرمجي ووضع المكرر في العمود الثالث
تحياتي
CompareA&B.rar
أستاذي الفاضل أ.جلال، مرورك على موضوعى شرف لى .. بارك الله فيك استاذي الكريم
أخي شكيب، جزانا الله واياك أخى الفاضل كل الخير .. شاكر لمرورك العطر
وفيك أخى الحبيب .. وكل عام وانتم جميعا بألف خير
تحياتي
اخى الفاضل
مرفق الملف به طلبك بدون معادلات وباستخدام الكود البرمجي ... اكتب في F1 علامة التمييز التى تريدها واختر من F2 جارى او خاص .. ثم اضغط زر احضار البيانات
تحياتي
استخراج أوجلب البيانات المميزة بشرط .rar
ما الخلل الذي يظهر معك أستاذي أ.ياسر .. حيث أنه يعمل عندي بشكل جيد جدا .. عامة مرفق مرة أخري بعد تعديل اسم الورقة للغة الإنجليزية حيث أننى لا أحبذ أسماء الأوراق بالعربي .. كما يجب أن تكون العلامة Capital Letter هكذا X
جرب أستاذي وأخبرنى
تحياتي
استخراج الاسماء المميزة .rar
اخى الفاضل أ.طاهر
هل تقصد استبدال الكمبوبوكس . بقائمة منسدلة ListBox والمستخدم يكتب ما يريده في مربع نص ويتم تصفية القائمة بمجرد الكتابة في مربع النص
تحياتي
اخى الكريم أ.عادل، خالص امتنانى وشكرى لدعواتك الكريمة ولك بمثلها وزيادة .. جزاك الله كل خير، وكل عام وانت واسرتك الكريمة بألف خير
الاجمل هو مرورك العطر أستاذي الفاضل أ.مختار .. لك منى كل الإحترام والتقدير وكل عام وانت واسرتك الكريمة بألف خير
تحياتي
أخى الفاضل أبو تراب
كلماتك الرقيقة وسام على صدري .. وشهادة أعتز بها من معلم واستاذ قدير مثلك .. منكم تعلمنا وعلى ايديكم تتلمذنا استاذي الفاضل وكل عام وانت واسرتك الكريمة بألف خير
تحياتي