نجوم المشاركات

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

تم التعديل بطريقة الأستاذ سليم حاصبيا sub total loop.rar وأتمنى أن يوافق صوابكم

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

استعملات اخرى لدالة Vlookup عند تحديد اي صف باللست بوكس يتم جلب بياناتة بالتكست بوكس ارجوا ان يكون الكود مفيد للجيع ستعمالات اخرى للدالة Vlookup.rar

شاهد المرفق اخي الكريم واي شيئ تراه مكرر غير قيمتة من جدول 1 وجدول 2 فقط نسخة11.rar

السلام عليكم ورحمة الله تفضل اخى الكريم Nouveau dossier.rar

وعليكم السلام اخي صالح فيه ملاحظة بسيطة : لو كان التعديل بالسجل الاول . هنا عليك صيد الخطأ حيث لن يذهب للسابق وانت باول سجل وبعد ذلك سيننتقل السجل للسجل الذي يلي السجل الحالي تحياتي

طلعت محمد حسن اخى الفاضل جزاك الله خيرا ما شاء الله عليك تحياتى :))))))))))))))))))))))))))متابع

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

مثال : ترحيل_v002.rar

اخي حسين الحل المقدم بالنسبة لي تم عملة من خلال الكود البرمجي وليس التنسيق الشرطي

اسعد الله اوقاتكم والمعذره على التاخير طبعا حاولت ولكن للاسف لم تعمل

السلام عليكم ورحمة الله تم تعديل الكود ولكنه يستغرق وقتا فى التنفيذ استبدل الكود السابق بهذا الكود Sub Tra_Data3() Application.ScreenUpdating = False LR = Sheet12.Range("B" & Rows.Count).End(xlUp).Row For R = 13 To LR For F = 13 To Cells(Rows.Count, "C").End(xlUp).Row If Cells(F, "C") = Sheet12.Cells(R, "B") Then Sheet12.Range("C" & R).Range("A1:D1").Copy Range("D" & F).PasteSpecial xlPasteValues End If Next Next Application.CutCopyMode = False MsgBox " تم بحمد الله " Application.ScreenUpdating = True End Sub

السلام عليكم وبعد اذن السادة الخبراء هذا هو التعديل حسب فهمي Database14.rar

تفضل اخي الكريم Database3.rar

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

السلام عليكم ورحمة الله و بركاته استاذي رمهان تحية طيبة بعد التمعن في المرفقات و التجارب كانت النتائج الآتية مرفق اخينا صالح حمادي فهو كما تفضلت اذا كان التعديل في منتصف السجلات سيذهب الى السجل الاخير مما يجعلك تعيد البحث عن السجل المطلوب مرفق اخينا ابا جودي كان هو الحل الشافي و كما تفضلت يكفي استخدام التراجع عن الحدث ( بعد التجربة كانت النتيجة واحدة ) الغريب في الموضوع اني جربت التراجع عن الحدث سابقا ولكن دون فائدة !! ولله حكمته في ان يكون الحل على يد اخينا ابا جودي اما استخدام cancel=true فهو لم يجدي نفعا ابدا !!!!

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

السلام عليكم تفضل اخي العزيز تم عمل التنيسق الشرطي للخليه AMAN.rar

السلام عليكم احبتي بعد التمعن قليلا نتج معي التالي : 1. عند تجربتي لم استخدم المفتاح انتر بعد الادخال وانما استخدمت الماوس فلم تظهر المشكلة وعند التجربة قد قمت بحذف الكود الزائد وهنا اعتقدت ان المشكلة تكمن في الكود بينما المشكلة تظهر عند استخدام الانتر وحصرا فقط عندما يكون الادخال في السجل الاخير . وهنا اعتذر منكم احبتي 2. كانت هي ليست مشكلة وانما من الطبيعي انه عند الوصول للسجل الاخير بالنموذج الفرعي ثم الضغط على انتر ان يتقل التركيز للرئيسي ومن ثم سجلا جديدا لان الخيارات في الاكسس ومن خيار اعدادات العميل تجد الانتقال للحقل التالي لسلوك مفتاح الادخال . كما يمكن اظهار نافذة tab order لمعرفة تسلسل التاب فالنموذج الفرعي هو احد العناصر للنموذج الرئيسي . المقترحات : 1. وضع خاصية دورة للنموذج الرئيسي ومن التاب غير ذلك الى = السجل الحالي . فهنا عند الضغط على انتر بعد الرسالة وانت في السجل الاخير لا يذهب للرئيسي وسجل جديد الا اذا كنت محتاج وعمدا انه بالضغط على الانتر باستمرار ان يلف على سجلات الفرعي وعند الاخير يبدا بسجل تالي في الرئيسي وهكذا 2. الاستاذ اباجودي قام بتغيير موقع الحدث وعلى مستوى النموذج الفرعي وقبل التحديث فلافضل الاستفادة من الباراميتر cancel وبوضع cancel=true بديلا للتراجع والغاء الحدث 3. الاستاذ صالح حمادي استخدم الانتقال للسجل الاخير مما اجبر الاكسس عدم الذهاب للنموذج الرئيسي وهنا لو كان التعديل في وسط السجلات سيذهب دائما للاخير مما يجعلك تعيد البحث عن السجل الآنف تعديله وبصعوبة قليلا اتمنى ان ظهر السبب استاذنا محمد ايمن لعله يبطل العجب ولكم اجمل التحايا

تفضل اخي حسين واسف على عدم الانتباه AMAN جديد.rar

حبيبى ولك ولكل اساتذتنا الكرام مثل ما دعوت واكثر ان شاء الله

جرب هذا الملف Add_sheets.rar

شريط المتحرك ازرق فلاش ممكن شرح كامل له

السلام عليكم أخي العزيز إنسخ مابداخل ملف التيكست الذي ارفقته لأنني لاأستطيع قراءته عندي مشاكل مع اللغة العربية في الجهاز