إبراهيم ابوليله

الاخوه الافاضل تحية طيبه وبعد مرفق شيت يقو باستخراج كشف حساب للعميل الرقم السرى 123 اضغظ على الزر الموجود فى لاشيت ثم زر ENTER OR CORRECT ثم ادخل التاريخ ثم رقم العميل 20100100401 ثم اكتب فى خانة PAYED اى مبلغ تريده وليكن 10500 ثم قم بعمل SAVE اذهب الى الشيت ستلاحظ الاخطاء التالية 1- يوجد كود ضمن اليوزر فورم 12 يتم استدعاءه اسمه CALL CODE هذا الكود لا يعمل فلماذا 2- اضغط على الزر الموجود فى الشيت ثم REPORT ثم ادخل التاريخ من 1/1/2013 الى التاريخ الذى قمت بادخاله مسبقا ثم اكتب رقم العميل 20100100401 واى اسم تريد فى خانة SHEET NAME ثم اضغط على زر BALLANCE ثم اذهب الى الشيت الذى قمت بانشائه ستلاحظ ان البيانات التى قمت باضافتها لا تظهر ضمن كشف الحساب 3-اذا ذهبت الى شيت INVOICE ثم قمت بعمل دبل كليك على التاريخ ثم قمت بعمل ريبورت ستجد ان البيانات قد ظهرت ارجو المساعده LXR-2013.rar

اخى الفاضل طارق بارك الله فيك ولكن ماذا لو اردنا الكود بزر

الاخ الكريم احمد عبد الناصر بارك الله فيك وفعلا الكود شغال تمام جزاء الله خيرا

اخى الحبيب رجب بارك الله فيك وفعلا اعمال عظيمه لا تخرج الا من رجال عظماء امثالك انت وكل اعضاء المنتدى الاحباء

الاخوه الافاضل تحيه طيبه وبعد اريد كود يقوم باستخراج اسماء معينه بناء على معطيات معينه كما فى المرفق كود استخراج اسماء بناء على معطيات.rar

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

الاخوه الافاضل مشكورين على الاهتمام الاخ رجب كود رائع وجميل بارك الله فيك

الاخ حماده مشكورا على الاهتمام بارك الله فيك

اخى رجب بارك الله فيك ولكنى اريدها بدون زر وماذا لو كانت البيانات المدخله فى شيت والزر فى شيت اخر اى فى نفس الشيت الذى سيتم فيه الاستخراج

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

الاخ عبد الله اسف لاننى لم اجرب الكود جيدا ولكن عن ملئ المدى المحدد فى الكود بالارقام مثلا من الرقم 1 الى 5 وعند كتابة الرقم 1 فى التيكست بوكس الا ان الرساله تظهر ان الرقم خطأ مع انه صحيح ارجو التعديل

الاخوه الافاضل ماذا لو اردت استخراج الاسماء الجديده افقيا وليس رأسيا ارجو الافاده استخراج الاسماء الجديده.rar

اخى الكريم عبدالله مشكور على الرد وبارك الله فى اعمالك

الاخ عبد الله اعمال رائعه بارك الله فيك

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

اخى طارق مشكورا على الرد وهذا مارايده فعلا

للرفع

اارفع

اخى الكريم طارق Sub code001() Application.ScreenUpdating = True code ... code Application.ScreenUpdating = False End Sub هذا الكود على حد علمى يستخدم لمعالجة بطئ الاكواد ولكن هل كلمة FALSE تكون فى بداية الاكواد ام فى نهايتها بمعنى انها ستكون بالشكل الاتى Application.ScreenUpdating = FALSE Application.ScreenUpdating = TRUE

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

للرفع

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

اخى الكريم احمد عبد الناصر بارك الله فيك ولكن لى سؤالين الاول- اين يوجد ما اسميته انت ب لي ملاحظة : العمودين J و L لايؤثر فيهما الكود الاصلي و لذلك فكود التعديل الذي وضعته جعلته لا يؤثر كذلك فيهما . الثانى- انك لو قمت بعمل بحث على الرقم 101 سوف تجده متكرر مرتين مره يكون العمود الثانى به الحرف A ومره يكون العمود الثانى به wq ولكن عن تحديد الصف الخاص بالعمود الثانى الذى به الحرفa فى الليست بوكس ,ومحاولة التغير فى التيكست بوكسات يتم التغير فى الصف الذى بع العمود الثانى يحتوى على wq وليس فى a فما هو الخطأ

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

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