قوائم مخصصة على الفورم باستخدام كومندبار مع اضافة قوائم فرعية (اختياري)

[ابراهيم الشال]

استاذنا عبد الله باقشير

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

                                اعمال متقنه ورائعه ندعوا الله ان يزيدك

[عبدالله باقشير]

استاذنا عبد الله باقشير

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

                                اعمال متقنه ورائعه ندعوا الله ان يزيدك

جزاكم الله خيرا وبارك فيكم

 

تقبلوا تحياتي وشكري

[شوقي ربيع]

الشلام عليكم

الاستاد عبد الله باقشير

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

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

فعلا عمل متقن بطريقة رائعة

جزاك الله خيرا وجعله في ميزان حسناتك

[عبدالله باقشير]

الشلام عليكم

الاستاد عبد الله باقشير

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

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

فعلا عمل متقن بطريقة رائعة

جزاك الله خيرا وجعله في ميزان حسناتك

 

جزاكم الله خيرا وبارك فيكم

 

تقبلوا تحياتي وشكري

[الجزيرة]

ما شاء الله عليك

 

ماذا عسانا أن نقول غير الدعاء لك

 

اللهم أجعل أعماله في ميزان حسناته

[عبدالله باقشير]

ما شاء الله عليك

 

ماذا عسانا أن نقول غير الدعاء لك

 

اللهم أجعل أعماله في ميزان حسناته

 

جزاكم الله خيرا وبارك فيكم

 

تقبلوا تحياتي وشكري

[انسان27]

موضووووع رائع اخى الكريم

[عبدالله باقشير]

موضووووع رائع اخى الكريم

جزاكم الله خيرا وبارك فيكم

 

تقبلوا تحياتي وشكري

[هاني بدر]

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

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

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

انت وظفت  ورقة العمل لخدمة الفورم بشكل خرافي . وليس العكس كما اعتدنا

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

Private Sub Lbl_ST_1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
kh_Set1 sNeme & 1

 

 

End Sub

تقبل تحياتي وشكري العميق لشخصكم الكريم

اخوك هاني بدر

تم تعديل مايو 28, 2013 بواسطه هاني بدر

[قصي]

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

واهديك هذه الباقه من النغمات الطيبه للمحمول

[عبدالله باقشير]

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

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

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

انت وظفت  ورقة العمل لخدمة الفورم بشكل خرافي . وليس العكس كما اعتدنا

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

Private Sub Lbl_ST_1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)

kh_Set1 sNeme & 1

 

 

End Sub

تقبل تحياتي وشكري العميق لشخصكم الكريم

اخوك هاني بدر

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

جربتها حسب طلبك لم تعجبنا

عموما التجارب جارية

تقبلوا تحياتي وشكري

[عبدالله باقشير]

 

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

واهديك هذه الباقه من النغمات الطيبه للمحمول

 

 

جزاكم الله خيرا وبارك فيكم

 

تقبلوا تحياتي وشكري

[مصطفى كمال متولى]

[عبدالله باقشير]

 

جزاكم الله خيرا وبارك فيكم

 

تقبلوا تحياتي وشكري

[الشهابي]

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

أسأل الله العظيم رب العرش العظيم أن يبارك الله فيك ويحفظك ويرفع قدرك ويزيدك علماً ورفعة

تعجز الألسن عن التعبير بالإعجاب بما ترى الأعين  

دائما مبدع ومتجدد في عطائك

تقبل تحياتي وتقديري

والعفو على تأخر الرد لغياب عن الشبكة لأكثر من شهر

تلميذكم / عبد الله بن شهاب

[عبدالله باقشير]

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

أسأل الله العظيم رب العرش العظيم أن يبارك الله فيك ويحفظك ويرفع قدرك ويزيدك علماً ورفعة

تعجز الألسن عن التعبير بالإعجاب بما ترى الأعين  

دائما مبدع ومتجدد في عطائك

تقبل تحياتي وتقديري

والعفو على تأخر الرد لغياب عن الشبكة لأكثر من شهر

تلميذكم / عبد الله بن شهاب

 

نورت المنتدى

 

جزاكم الله خيرا وبارك فيكم

واثابكم بدعائكم واعطاكم بمثله اضعاف مضاعفة

 

تقبلوا تحياتي وشكري

[Xima Alfadni]

السلام عليكم

 

استاذى باقشير

ابداعاتك رائعة و لكن حضرتك لا ترد دائما على الاستفسارات

جزاك الله خير

[وائل احمد المصري]

السلام عليكم

 

قوائم مخصصة على الفورم باستخدام كومندبار مع اضافة قوائم فرعية (اختياري)

 

القوائم الرئيسية

هي النطاقات المسمى باسم الليبلات

النطاق الاول: Lbl_ST_1

النطاق الثاني: Lbl_ST_2

النطاق الثالث: Lbl_ST_3

النطاق الرابع: Lbl_ST_4

اذا اردت زيادة قائمة اخرى اضف جدول آخر وسميه Lbl_ST_5

واضف ليبل آخر بنفس التسمية  واعمل له كودين مشابهين لاكواد الليبلات الاخرى مع تغيير الرقم الى 5

 

مثال :

الكود الاول

Private Sub Lbl_ST_5_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
kh_AddBar sNeme & 5
End Sub

الكود الثاني

Private Sub Lbl_ST_5_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
kh_Set1 sNeme & 5
End Sub

وهكذا اذا اردت اضافة ليبل آخر

القوائم الفرعية

تحتاج فقط لاضافتها اضافة نطاق وسميه باي اسم وضع هذا الاسم في القائمة الذي تريد اظهار القائمة الفرعية فيها مع وضع العلامة <<< لكي يفهم الكود انها قائمة .

ويمكنك اضافة قائمة فرعية بداخل قائمة فرعية اخرى.

يمكنك ايضا التحكم في النطاقات بادخال ما تريده من اكواد او الحذف او الاضافة .

================================================

لاختيار ارقام صور الكومندبار حمل الملف التالي

http://www.officena.net/ib/index.php?app=core&module=attach&section=attach&attach_id=58279

 

================================================

 

المرفق 2003-2010

قوائم مخصصة على الفورم باستخدام كومندبار+2.rar

 

أستاذنا الكبير بارك الله فيك وجزاك خيرا" عن كل من استفاد من اعمالك

هل تعلم ان اول فورم فاتورة شاهدته لك قضيت ايام" اتدارسة واحاول ان استوعب المنطق وراء تعبئة التيكست بوكس ولم أشاء ان اسلك الطريق السهل بالسؤال حتى وصلت للفكرة ورائة وقد وجدت لك تعليق منذ فترة قريبة تشرح الفكرة والحمد لله طابقت ما وصلت الية سابقا وغيرها من اعمالك التي تتلمذت عليها واعمال عمالقة المنتدي فجزاكم الله خيرا" عنا وجمعنا بكم في رحاب رحمة المليك المقتدر طبت اينما حللت :)

[محمد لطفى]

السلام عليكم

عبدالله باقشير

تحيه طيبه ومعطره بالورد

مهما اقول لن توفى الكلمات اسلوبك وافكارك الجميله

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

[ابو حمادة]

في ٢٣‏/٥‏/٢٠١٣ at 17:36, عبدالله باقشير said:

السلام عليكم

 

قوائم مخصصة على الفورم باستخدام كومندبار مع اضافة قوائم فرعية (اختياري)

 

القوائم الرئيسية
هي النطاقات المسمى باسم الليبلات
النطاق الاول: Lbl_ST_1
النطاق الثاني: Lbl_ST_2
النطاق الثالث: Lbl_ST_3
النطاق الرابع: Lbl_ST_4

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

 

مثال :

الكود الاول

Private Sub Lbl_ST_5_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
kh_AddBar sNeme & 5
End Sub

الكود الثاني

Private Sub Lbl_ST_5_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
kh_Set1 sNeme & 5
End Sub

وهكذا اذا اردت اضافة ليبل آخر

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


يمكنك ايضا التحكم في النطاقات بادخال ما تريده من اكواد او الحذف او الاضافة .

================================================

لاختيار ارقام صور الكومندبار حمل الملف التالي

http://www.officena.net/ib/index.php?app=core&module=attach&section=attach&attach_id=58279

 

================================================

 

المرفق 2003-2010

قوائم مخصصة على الفورم باستخدام كومندبار+2.rar
 

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

يعني مثال عند اختيار اضافه يظهر فورم لادخال بيانات معينه في شيت معين مثلا اعمل كدا ازى اتمنى الرد

 

[علي حيدر]

اخي حمادة وبعد اذن اخي واستاذي عبدالله بقشير الذي تعلمنا منه الكثير في ههذا المنتدى الكبير والعزيز وبعد اخي حماده ما عليك عمله خطوتان الأولى ان تذهب الصفحه KH وتكتب اسم الكود او علامة التمييز للقائمة الفرعية العامود C او G بعدها اذهب الى محرر الاكواد واضف في Module2 مثلا كود الأستاذ عبدالله بقشير KH_1 انظر الموديل هكذا

Sub kh_1()
        MsgBox "تم الحفظ"
End Sub
ضع مثلا

Sub kh_1()
      USERFORM.SHOW
End Sub
او أي اسم يوزر فورم موجوده في البرنامج بتاعك

ارجو ان تكون الفكره واضحه في هذا الشرح

[ابو حمادة]

34 دقائق مضت, علي حيدر said:

اخي حمادة وبعد اذن اخي واستاذي عبدالله بقشير الذي تعلمنا منه الكثير في ههذا المنتدى الكبير والعزيز وبعد اخي حماده ما عليك عمله خطوتان الأولى ان تذهب الصفحه KH وتكتب اسم الكود او علامة التمييز للقائمة الفرعية العامود C او G بعدها اذهب الى محرر الاكواد واضف في Module2 مثلا كود الأستاذ عبدالله بقشير KH_1 انظر الموديل هكذا

Sub kh_1()
        MsgBox "تم الحفظ"
End Sub
ضع مثلا

Sub kh_1()
      USERFORM.SHOW
End Sub
او أي اسم يوزر فورم موجوده في البرنامج بتاعك

ارجو ان تكون الفكره واضحه في هذا الشرح

شكرا لاهتمامك استاذ عادي

الفكره وصلت وجزاك الله خيرا

[علي حيدر]

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

[دغيدى]

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

[مجدى يونس]

استاذنا الفاضل/ 

 

نورت بيتك منتدى اوفيسنا طال غيابك عنا