اخى العزيز قصي .... اشكرك جزاك الله خيرا
اخى العزيز نجيب البقلي...اشكرك جزاك الله خيرا
اخى العزيز عبدالموجود بدر...اشكرك جزاك الله خيرا
اخى العزيز علاء زيدان .... تحت امرك تفضل ما طلبته عله يفى بالغرض .....
الحمد لله الذي جعل العلم ضياء والقرآن نوراً الحمد لله الملك الحق المبين ، الذي هدانا إلى الإيمان واليقين
نحمــده تعالى وهـــو الرب الجليل ، الهادي إلى ســـواء الســـبيل ، الذي لا يخفى عليه الكــثير ولا القليــل .
والصلاة والسلام على المبعوث في الأميين معلماً ورسولاً ومرشداً وحكيماً وأشهد أن لا إله إلا الله وحده لا شريك له
أمر بإتباع الحق ونهى عن إتباع الباطل ، ورفع من شأن العالم دون الجاهل ، وأشهد أن سيدنا محمداً عبده ورسوله
جــــاء بالحــــق المبــــين ، فكان رحمــــة للعالمين ، صلى الله عليه وعلى آله وأصــحابه وســـلم تســـليماً كــــثيراً .
اللهم اجعل العام الهجري الجديد فاتحة خير علي المسلمين وبلاد المسلمين
ا
أحبائي واخواني في منتديات اوفيسنا الاحبة كشجرة الياسمين
لا تكتفـــي أن تظـــلك بـــــــل لا تترككــ الا معطــــرا بعبيرهـــا
فاســعد الله من كانوا دومــــا زهــــور الياسمــين في حـــياتنا .
موضوعنا اليوم حول برنامج يخدم شريحة من الطلبات لادارة النشاط التجاري والخدمي وراعينا ان يكون البرنامج سلس ومرن ليتناسب مع اغلبية الاحتياجات . وايضا لاستكمال مواضعينا السابقة عن دمج الاكسل ببرامج التصميم المختلفة والتحكم في خصائص الادوات لليوزرفورم .
برنامج نور التجاري والخدمي
اول انتاج مشترك بيني وبين اخي الحبيب العبقري / شوقي ربيع
في سلسلة البرامج الخدمية ان شاء الله تعالي .
البرنامج يقوم بإدارة النشاط بصــفة عامة ، وادارة عمليات البيع بإصدار الفواتير ، وطباعتها ، واصدار ســـندات القبض وطباعتها ، وادارة العمليات المتعلقة بفواتير الشراء ومرودتها واثبات عمليات الشراء والاصناف واصدار سندات الصرف وطباعتها .
الجديد في البرنامج
كثيرا تم طرح نماذج فواتير بيع باضافة عدد محدد من التكسات بما يتناسب مع صفوف الفاتورة الواحدة لكن في البرنامج تناولنا الموضوع بطريقة اخري باضافة عدد تكسات رئيسية تقوم بترحيل الي ليست بوكس ومنها الي الشيت وبذلك يمكن اصدار الفاتورة بعدد لا محدود من الاصناف وطباعتها .
شاشة الدخول
اسم المستخدم وكلمة المرور الافتراضية admin
الشاشة الرئيسية للبرنامج
شرح واعداد البرنامج بالكامل اضغط هنا
بالمرفقات
اللهم اجعلنا ممن طاب ذكرهم ، وحسنت سيرتهم ، واستمر أجرهم في حياتهم وبعد موتهم
اللهم امين
Nour Commercial V 1.0.0.rar
السلام عليكم ورحمة الله وبركاته
إلى الأعضاء الكرام
شكرا جزيلا لكل من ساعدني في هذا البرنامج
وأخص بالذكر الاستاذ أبو خليل
شكرا للجميع وجزاكم الله خيرا
اسم المستخدم هو نفسه كلمة المرور
الملف مقسم إلى ملفين
عند فك الضغط اضغط على الجزء الأول واعمل استخراج وسوف يتم تجميع الملفين إلى ملف واحد
شرح البرنامج تجده على الرابط التالي
بسم الله توكلت على الله
لابد من تحميل كافة المرفقات
Follow up V3.part01.rar
Follow up V3.part02.rar
اخي ياسر
صح النوم
اين كانت اقتراحاتك للحل / لم ار اي مشاركة
هو ايه اللي جرى انت مش عايز تحك دماغك حبتين
نفس الموضوع لكن أريد ان تتوزع الارقام على الاعمدة وليس الصفوف يعني:
1 2 3 4 5
6 7 8 9 10 .... و هكذا (لغز برسم الجميع) مع انه ليس دوري في اللغز لكن بعد الاعتذار من ابن مصر
اخى الفاضل أبا اسماعيل
تم عمل المطلوب باضافة زر Backup اسفل الحذف .. بمجرد الضغط عليه يتم انشاء نسخة احتياطية من شيت الفاتورة باسم الزبون في المسار C:\ExcelBackup
لايلزم ان تقوم بانشاء المجلد فاذا لم يكن موجودا الكود يقوم بانشائه بالنيابة عنك
تحياتي
Invoice.rar
أخى ابا الحسن والحسين
ينفع طيب نكون شغالين كل حاجة بكود برمجى من اول ادخال أوامر البيع والشراء مرورا بانشاء صفحات باسم كل شركة وتيجى تقولى لو عدلت يدوي ... مفيش حاجة اسمها يدوى فيه حاجة اسمها انك بتستخدم الفورم في ادخال اوامر البيع والشراء وترحل الاوامر لصفحة الشركة اذا كانت موجودة ... تمام
يبقي نخلى الارصدة اللى في Co.Balance مرتبطة بالكود عند ترحيل اى امر لشيت الشركة يتعدل الرصيد للرصيد الجديد كما في المرفق لكن مفيش يدوى
تحياتى
برنامج الأسهم.rar
برنامج جميل , بالتوفيق و الى الأمام في برامج أخرى
و لا يستسصغر أحد أي جهد مهما كان بسيطا
و مجرد وضعك الملف في المنتدى ليستفيد منه الآخرون هو بحد ذاته دليل على النقاء و حب العلم
السلام عليكم ورحمة الله وبركاته
طلب فورم عمل لحفظ نسخة احتياطية في القرص بي اسم زابون المشتاري وعندا الحفظ دونا مسح البيانت من الفاتورة لي تهيأت الفاتورة لي طباعة بارك الله فيك وجعل أعمالك في ميزان حسناتك
فهمت يااستاذنا انت عاوز حل ازاى
ولكن بعد اجابات اساتذة ال VBA والاكسيل
اليك اجابة بالمعادلات
خد هذه من العبد لله . وطبقها . ستاتى بالنتيجة ان شاء الله
=ROWS(A:A)*COLUMNS(1:1)
New ورقة عمل Microsoft Excel.rar
أستخدم هذه المعادلة أخى ثم إسحبها لأسفل
ولألغاء الصفر أخى يمكنك إستخدام التنسيق الشرطى
بإن تذهب إلى (format ) ثم ( conditional formatting )
ثم تقوم بتظليل العمودين المحتوين على الأصفار
ثم تقوم بكتابة المعادلة التالية:
=J6=0
ثم تختار لون الخط المناسب للخلية وسيكون هنا اللون ( الأصفر) ليناسب خلفية الخلية
=IF(AND($F6="";$G6="";$H6="";$I6="");"";IF(K6<=49;"فاشل";IF(K6<=59;"مقبول";IF(K6<=69;"متوسط";IF(K6<=79;"جيد";IF(K6<=89;"جيد جداً";IF(K6<=100;"امتياز")))))))
إخفاء عبارة.rar