هل يوجد صيغه ممكن ان اكتبها في control sorce تسمح بابقاء المعادله فعال

[احمد حمور-ابوعبدالله]

السلام عليكم

الموضوع متكرر ولم اجد اجابه حتي الان

ومختصره مره اخرى انه في الملف المرفق استخدم control sorce

بشكل اساسي في ظهور خلايا معينه داخل الفورم

ولكن اجابني الاخ خبور انه يجب عدم استخدام control sorce

لانها تفقد الخاصيه او المعادله الموجوده داخل الخليه عند فتح الفورم الخاص بها

لذا هل يوجد صيغه ممكن ان اكتبها في control sorce تسمح بابقاء المعادله فعاله داخل الخليه

او اذا امكن ارساك كود معين يكتب في textbox لربما ان يفيدني

او اي مقترح لديكم

ارجوكم الرد

والسلام عليكم ورحمة الله وبركاته

______2009.rar

[omar1]

السلام عليكم

اخي لم افهم المطلوب بالضبظ و لكن علي حسب ما فهمت

اذا كانت المسئلة متعلقة بالمجموع فقط فيمكنك عمل الاتي

text3=val(text2.text)+val(text1.text)

اما اذا كانت المسئلة حتي في البيانات فابلغني

[احمد حمور-ابوعبدالله]

الاخ omar1

الموضوع باختصار

افتح الملف المرفق وادخل الى الصفحه الرئيسيه واختر الشيكات الشهريه

ومن ثم اذهب الى شهر 1 او ..... 12 واختر دخول

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

فان الخليه b2 تفقد خاصية المعادله

ولو دخلت الى vb ستجد الفورم الخاص بالشيكات وتختر textbox اي واحد وتنظر الى properites

في خانة control sorce ستجد ما اعنيه

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

وشكرا لك

[omar1]

السلام عليكم

الاخ / AHMADHAMOOR

جرب الملف المرفق حيث تم التعديل علي textbox الخاص بالشهر 4 فقط

ابلغني بالنتيجة

______2009.rar

[احمد حمور-ابوعبدالله]

الاخ omar1

بارك الله فيك

لان هذا ما اردته فعلا

زادك الله من علمه وسخرك لخدمة هذا المنتدى الرائع

ولي عندك ملف ارسله لك احتاج الى رد عليه ان امكن

وجزالك الله خيرا

Book1.rar

[omar1]

السلام عليكم

الاخ / AHMADHAMOOR

جرب الملف المرفق

Book1.rar

[amoudi]

اخي الكريم

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

فعليك ان تضع الغاء لأي تحديث للخلية بالطريقة التالية

Private Sub TextBox1_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean)
Cancel = True
End Sub

تحياتي

[احمد حمور-ابوعبدالله]

الاخ OMAR1

شكرا لك على الملف المرفق

فانه يلبي الغرض ولكني كنت اريده بدون زر البحث

اي بمجرد كتابة الاسم ان يعطيني البايانات في الاسفل دون ان اطلب بحث

اشكرك جزيلا على كل شئ

اما بالنسبه للاخ AMOUDI

شركا لك على ردك

ولكني جربت الطريقه التي بعثها OMAR1 فكانت النتيجه رائعه

ولم تتغير معي صيغة المعادله الموجوده بالخليه حيث انها اصبحت تتغير تلقائيا حسب متغيرات الخلايا المربوطه معها

وتظهر في TEXTBOX الخاص بها بشكل ممتاز

فان كان ما تقصده غير ذلك ارجوا التوضيح

والسلام عليكم

[omar1]

السلام عليكم

الاخ / AHMADHAMOOR

تستطيع فعل ما طلبت عن طريق استخدام نفس الكود السابق لزر البحث مع Textbox

[احمد حمور-ابوعبدالله]

الاخ omar1

شكرا لك

لقد تم ما بغيت

مع تحياتي

[amoudi]

اخي الكريم

عندما تعين خاصية source control لtextbox ولاتريد ان تغيير الخلية فقط ضع cancel=true في حدث BeforeUpdate ل TextBox

وخلي ال TextBox على Locked=True

ولن تتغير المعادلات او اي شي في الخلية المرتبطة مع ال TextBox

كما حصل معك

ارجو اكون وصلت المعلومة

تحياتي

[احمد حمور-ابوعبدالله]

شكرا لك اخ amoudi

الان وصلت الفكره كاملة

ولكني انهيت ترتيب البرنامج على طريقة الاخ omar1

وانتهى العمل بحمد الله

ولكني بالفعل اشكرك واشكر omar1

لانكما كنتم معي خطوه بخطوه حتى انهيت عملي بشكل متقن

وفقكم الله جميعا

ولا انسى جهد الاخ خبور خير والاخ احمد يعقوب

والسلام عليكم