برنامج إيصال استلام عهدة نقدية

[أنس دروبي]

اخى العزيز Creation World

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

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

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

فمثلا عندما اضغط على ايصال جديد يخبرنى باننى سوف اذهب الى صفحه ايصال جديد

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

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

برنامجك رائع ومفيد فى مجاله وملاحظاتى السابقه ضعها فى اعتبارك لاداء افضل للمستخدمين (دائما اى مبرمج يحاول ان يقلل من عدد الحركات سواء الماوس او الكيبورد لكى يصل المستخدم الى الهدف المطلوب)

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

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

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

وقد نجحت بامتياز فى عملية التحديث

خالص تحياتى

السلام عليكم

أخي عمرو الله يجزيك الخير على هذا الرد والنصيحة الجميلة

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

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

ومرة أخرى الله يجزيك الخير

أنس دروبي

[خالد الشاعر]

استاذ Creation World

عمل رائع تسلم ايدك

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

لى تساؤل 1 - كيفية جعل الصفحة الاولى تظهر فى حجكم صغير لا يكبر

2- كيفية اخفاء علامة تبويب الاوراق

ولكم جزيل الشكر والاحترام

[الـعيدروس]

السلام عليكم

بعد اذن الاخ الفاضل Creation World

والذي اشكرة على الملف القيم والأكثر من رائع

تفضل اخي Khhanna

Public Sub Ali_Scrol()

With ActiveSheet

Activewindow.DisplayWorkbookTabs = False ' False = إخفار الأوراق ' True = الوضع الطبيعي

.ScrollArea = "$A$2:$C$25" ' فرضاً المدى المراد تحديدة فقط هو

End With

End Sub

[أنس دروبي]

الله يجزيك الخير أخي أبو نصار على هذا الكود الرائع

انت اخي أفضالك علي كثيرة

صراحة كنت سوف أعلم الأخ Khhanna الطريقة من خلال خيارات إكسل

ولكن انت سبقتني في هذا الكود المتميز

شكراً لك

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

أنس دروبي

[خالد الشاعر]

اشكرك استاذ عباد

لسرعة الاهتمام و الرد

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

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

تم تعديل ديسمبر 17, 2012 بواسطه khhanna