اذهب الي المحتوي
أوفيسنا

يوزرفورم بحث و تعديل وحذف مرن يصلح لأي قاعدة بيانات


الردود الموصى بها

  • الردود 86
  • Created
  • اخر رد

Top Posters In This Topic

في 12/06/2017 at 19:50, محمود أبوالدهب said:

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

هناك مشكل في التاريخ

رابط هذا التعليق
شارك

في 08/04/2017 at 15:24, شوقي ربيع said:

بسم الله الرحمان الرحيم

السلام عليكم

تحياتي لجميع اعضاء اوفيسنا المحترمين

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

لمتابعتي المنتدى في الاونة الاخيرة رئيت عدت تسائلات عن البحث والتعديل في الجداول و رئيت العديد من الحلول

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

لذى فكرة في برمجة فورم مرن يكون ملائم لاي جدول مهما كان عدد صوفوفه او عدد اعمدته

و لكي يتمكن اي عضو مهما كانت معرفته بالبرمجة ضعيفة من استعماله بسهولة

ووصلة الى هذا الفورم الذي ارجو ان اكون قد وفقت في فكرته وان يستفيد منه الاغلبية

Capture.PNG.f8819a5a27df5ac4aef64699bb8ba42d.PNG

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

كما ان البحث يتميز بالبحث بأول حرف من الكمة او اي جزء منها حسب احتياجك

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

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

نأتي الان الى طريقة استعمال الفورم هذا مع ملفك الخاص

اولا

اذهب الى محرر الاكواد تجد موديل باسم ModulePublic

تجد في بدايته هذين الكودين او التعريفين ان صح التعبير


Public Const sNomFeuil As String = "data"   'اسم ورقة العمل التي تحمل قاعدة البيانات
Public Const sTableau  As String = "tbData" ' اسم جدول قاعدة البيانات

اضن ان الامر واضح

تصع اسم الشيت الذي يحوي الجدول مكان عبارة "data"

واسم الجدول نفسه مكان عبارة "tbData"

ملاحظة : يجب ان تكون قاعدة البيانات عبارة عن جدول

58e8e0948a1a3_Capture3-Copie.PNG.e149fcc037588f72c95d7bf9408327c0.PNG

لايهم عدد اعمدة ولا صفوفه المهم ان يكون جدول

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

ثانيا

نأتي الى الاعمدة التي تحتاج قوائم في مثالنا لدين العمود 4 و العمود الاخير يحتاجون ان يمثلو في الفورم على شكر قوائم (كمبوبكس)

لتنفيذ ذالك

قم بأنشاء القوائم الازمة في اي شيت تريد و اعطي كل مدى قائمة اسم معين

في المثال الخاص بنا سمينا نطاق قائمة الجنس ب list1 كما هو موصح في الصورة

Capture4.PNG.42b96c1b1c27cd573c305ff709532cdf.PNG

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

Capture3.PNG.3d6ce2e65baeb73b2125002caf5d8247.PNG

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

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

            و الفورم يكتشف العمود الذي يحوي تواريخ تلقائيا

اي ملاحظة او استفسار او اضافة تحتاجونها للفورم لا تترددو في طلبي

اهدي هذا العمل الى الغائبين الحاضرين في قلوبنا

الاخ ضاحي الغريب و الاستاد عبد الله باقشير

تحياتي للجميع

 

 

UserForm Flexibles.rar

 

استاذ ربيع هناك مشكلة في التاريخ بحيث الشهر يصبح مكان الايام و الايام كان الاشهر ...كيف يمكن تصحيح هذا المشكل

رابط هذا التعليق
شارك

  • 2 weeks later...

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

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

بس عندى طلب وهو زر على نفس الفروم لترحيل البيانات الى شيت ثانى للستفادة فى طباعه المعلومات

واكون لك شاكر 

 

  • Like 1
رابط هذا التعليق
شارك

أخى الكريم / شوقي ربيع

لا يكفى الكلام مدى التقدير و الاعجاب بهذا العمل الرائع و لكن السؤال هنا هل من الممكن زيادة الاختيارات فى الليست بوكس لتكون الاختيارات اكثر من 50 اختيار ؟

 

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

رابط هذا التعليق
شارك

On 4/8/2017 at 3:24 PM, شوقي ربيع said:

بسم الله الرحمان الرحيم

السلام عليكم

تحياتي لجميع اعضاء اوفيسنا المحترمين

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

لمتابعتي المنتدى في الاونة الاخيرة رئيت عدت تسائلات عن البحث والتعديل في الجداول و رئيت العديد من الحلول

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

لذى فكرة في برمجة فورم مرن يكون ملائم لاي جدول مهما كان عدد صوفوفه او عدد اعمدته

و لكي يتمكن اي عضو مهما كانت معرفته بالبرمجة ضعيفة من استعماله بسهولة

ووصلة الى هذا الفورم الذي ارجو ان اكون قد وفقت في فكرته وان يستفيد منه الاغلبية

Capture.PNG.f8819a5a27df5ac4aef64699bb8ba42d.PNG

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

كما ان البحث يتميز بالبحث بأول حرف من الكمة او اي جزء منها حسب احتياجك

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

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

نأتي الان الى طريقة استعمال الفورم هذا مع ملفك الخاص

اولا

اذهب الى محرر الاكواد تجد موديل باسم ModulePublic

تجد في بدايته هذين الكودين او التعريفين ان صح التعبير


Public Const sNomFeuil As String = "data"   'اسم ورقة العمل التي تحمل قاعدة البيانات
Public Const sTableau  As String = "tbData" ' اسم جدول قاعدة البيانات

اضن ان الامر واضح

تصع اسم الشيت الذي يحوي الجدول مكان عبارة "data"

واسم الجدول نفسه مكان عبارة "tbData"

ملاحظة : يجب ان تكون قاعدة البيانات عبارة عن جدول

58e8e0948a1a3_Capture3-Copie.PNG.e149fcc037588f72c95d7bf9408327c0.PNG

لايهم عدد اعمدة ولا صفوفه المهم ان يكون جدول

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

ثانيا

نأتي الى الاعمدة التي تحتاج قوائم في مثالنا لدين العمود 4 و العمود الاخير يحتاجون ان يمثلو في الفورم على شكر قوائم (كمبوبكس)

لتنفيذ ذالك

قم بأنشاء القوائم الازمة في اي شيت تريد و اعطي كل مدى قائمة اسم معين

في المثال الخاص بنا سمينا نطاق قائمة الجنس ب list1 كما هو موصح في الصورة

Capture4.PNG.42b96c1b1c27cd573c305ff709532cdf.PNG

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

Capture3.PNG.3d6ce2e65baeb73b2125002caf5d8247.PNG

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

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

            و الفورم يكتشف العمود الذي يحوي تواريخ تلقائيا

اي ملاحظة او استفسار او اضافة تحتاجونها للفورم لا تترددو في طلبي

اهدي هذا العمل الى الغائبين الحاضرين في قلوبنا

الاخ ضاحي الغريب و الاستاد عبد الله باقشير

تحياتي للجميع

 

 

UserForm Flexibles.rar

 

هل من الممكن مزيد من التوضيح لكيفية تسمية نطاق القائمة ؟

 

رابط هذا التعليق
شارك

4 ساعات مضت, أستيكا said:

هل من الممكن مزيد من التوضيح لكيفية تسمية نطاق القائمة ؟

 

تكون التسمية كالاتى 

نحدد  مجموعة الخلايا المراد تحديدها كنطاق وليكن كما بالصورة من c3:c7

ثم نذهب لرقم اتنين كما بالصورة والتحديد مازال موجود ولم يتم الغائة

ثم نقوم بها بكتابت ما نريد ثم نظغط انتر كمابالصورة الثانية 

وهذا هو القائمة الجديده

 

123.png

1234.png

12345.png

4 ساعات مضت, أستيكا said:

هل من الممكن مزيد من التوضيح لكيفية تسمية نطاق القائمة ؟

 

او 1-  بتحدد الخلايا

2- قائمة صيغ 

3- تعريف باسم

4- لاحظ ان الى تم تحديده مكتوب بها وممكن تغير فيه عادى للنطاق الى حبه 

5- اكتباسم النطاق

6- تضغط موافق

 

123.png

1234.png12345.png

تم تعديل بواسطه محمود أبوالدهب
رابط هذا التعليق
شارك

  • 2 weeks later...

كيف يمكن تحميل الصورة مباسرة من الملف الى اليوزفورم حتى يتسنى لي من إنشاء قائمة تلاميذ مدرسة بالصور

 

رابط هذا التعليق
شارك

  • 2 weeks later...

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

رابط هذا التعليق
شارك

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

اشكر مجهوووووووودك اخي الفاضل على ماتقدمه عساها تكون في ميزان حسناتك ... لدي استفسار اخي

 كيف يمكن ان اضيف 2 فورم لكل فورم  قاعدة بيانات مستقله

 

ورقة فيها العملاء  (نفس هذا الفورم )

وورقة فيها الاصناف فورم اخر (نفس هذا الفورم )

 

رابط هذا التعليق
شارك

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

رابط هذا التعليق
شارك

السلام عليكم استاذ شوقي جهد رائع

بارك  الله فيك وذادك من علمه. 

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

حساب خزينه.rar

تم تعديل بواسطه kh34d
رابط هذا التعليق
شارك

رائع

رابط هذا التعليق
شارك

زائر
هذا الموضوع مغلق.
×
×
  • اضف...

Important Information