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

يمكن حذف السطر Me.Requery وهذا سطر رمهاني لعيون ابا جودي Private Sub a1_Click() Me.code.Visible = Not Me.code.Visible End Sub تحياتي

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

سؤالك غير واضح ياكبير ... يرجى توضيح المطلوب ليستطيع الجماعة مساعدتك .

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

::: ممكن سؤال لو سمحت ؟ لماذا لا تظهر كل الفواتير وعند البحث عن فاتورة يتم خلال مربع نص واحد ؟

ممكن ياكبير نعرف وين مربع البحث ؟ وممكن نعرف شو فائدة مربعات نص الفواتير ؟

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

طلعت محمد حسن ما شاء الله عليك

كود حميل .. فمت بتغيير الامتداد من xlsm- -- xlsb إلى xls قمت بإزالة الحمية من جميع الأوراق ومحرر الأكواد ( وقت طويل نسبيا ) ثم غيرت الامتداد إلى xlsb شكرا لكم

تفضل : مسح آخر سطر_v002.rar

السلام عليكم، محاولة، جربها. مسح آخر سطر_v001.rar

وعليكم السلام ورحمة الله هذه الرسالة تعني أن ملفك مرتبط (في معادلاته أو تنسيقاته) ببيانات خارجية من ملفات أخرى غير مفتوحة... ولتفادي هذه المشكلة إضغط على Data ثم Links واختر الخاصية التي تناسبك (قطع الارتباط أو غيرها)... لا أستطيع مساعدتك أكثر... بن علية

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

العفو اخي حسن

فعلا انا لاحظت هذا الشي ونمت ازاله Me.Requery مثل ماتفضل استاذنا رمهان ولكن حدثت لي مشكله جديدة ان بعض الاحيان احتاج اضغط الزر مرتين ليختفي او مرتين ليظهر وبعد ماستخدمت الكود السحري الرمهاني انحلت كل المشاكل 100 % اشكر الاساتذة الكرام رمهان وابا جودي جزيل الشكر تحياتي ,,,

ههههههه على راى استاذ محمد نجار والقافية تحكم وانت اللى عامل الرسالة كده على زر البحث تنبيه ! عذرا يا كبير السؤال مش كامل ومش واضح . انت عاوز تضيف ايه ايه وفين وضح البيانات وحاول توضح السؤال اعمل حسابى على الاقل انا فهمى على اد حالى

انا اسف فى شئ مخدتش بالى منه ::المطلوب في النموذج الفرعي details عندما ادخل السعر بالدينار اريد تعبئة حقل الدولار بقيمة الصرف , وبالعكس ... وبالعكس تم تنفيذها واتمنى اكون قدرت افهم المطلوب لان فهمى على اد حالى لان انا جاوبت على حسب فهمى انا مش على حسب السؤال .... هههههههههههه اتفضل يا استاذ محمدنجار ☺ سعر صرف العملات - 2010-2007.rar ☺ سعر صرف العملات - 2002-2003.rar طبعا يا استاذ محمدنجار ممكن اخفاء حقلين تحويل العملات convert_to_dr و convert_to_dn من النموذج ان كنت لا تريد رؤيتهم فالعبرة بالناتج النهائى تحويل كل قيم الفاتورة وتوحيد الاجمالى بكلا العملتين وعلى حسب العملة اللى مع العميل يتم محاسبته

استاذ محمد نجار ☺ سعر صرف العملات - 2002-2003.rar ☺ سعر صرف العملات - 2010-2007.rar

جلال الجمال_ابو أدهم ماشاء الله على هذا الابداع

من بعض ما عندكم أخي الكريم

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

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

السلام عليكم شاهد المرفق اخي حسين واخبرني عن رايك اصناف.rar

امممممممممممم تعجبك الفكرة دى ؟! ممكن يكون فى افضل بس دى فكرتى اللى على اد حالى >>-------------> لسه باتعلم test_ code visible change ☺ 2000-2003.rar test_ code visible change ☺ 2007-2010 .rar

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

شكرا شكرا شكرا يا استاذ فعلا انت عبقري فرحتني كثيرا وصلت للمطلوب

طلعت محمد حسن اخى الفاضل جزاك الله خيرا موضوعاتك اكثر من رائعه كنت مختفى فين من زمان تحياتى

لو صوتي حلو كان غنيتلك ما أروعك يا استاذ جلال على هذه الموضيع والافكار الرائعة التي تتحفنى بها ما شاء الله عليك

نور الله بصائرك أخ حسن. بالفعل هذا ما أريد

أخي الكريم فك الضغط عن ملفك ثم ضع الكود التالي في الموديول Sub trheel() Set myrange1 = Sheets("Myserch").Range("A1:D2") Set myrange2 = Sheets("Myserch").Range("B5:F5") Sheets("Mydata").Range("B1:F32").AdvancedFilter xlFilterCopy, myrange1, myrange2 Set myrange1 = Nothing Set myrange2 = Nothing End Sub في ورقة البحث اكتب في الخلية C5 النص "الرقم الوظيفى" وليس الرقم فقط ، لابد من تطابق أسماء الحقول ثم نفذ الكود

اخواني واساتذتي الكرام الموضوع قد سبق وانطرح من قبل الاستاذ/عبدالله باقشير، ولاكن لم اسطتيع تنفيذ طلبي على الملف المطروح مسبقاً وطلبي هو ان لدي برنامج واريد في عملية الادخال يتم ادراج المدخلات في ملف اكسس بشكل تراكمي وفي حال طلب التقرير من خلال البرنامج يتم استراد البيانات من الاكسس للاكسيل ليتم عمل المعادلات واستخراج القيم المطلوبة. ارجو ان يكون قد تم شرح الطلب بصورة واضحة. ولكم جزيل الشكر والتقدير. Qulity V16.rar