تعديل على استدعاء فاتورة مبيعات واعطاء رقم متسلسل

[ريتاج المدينة]

السلام عليكم

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

ارجو تعديل  

 

[ريتاج المدينة]

الملف كبير 

فكيف لي لن ارفع الملف لحضرتكم 

وطلب  اذا ممكن اذا اضافة كود 

زر للخروج وللحفظ معا 

زر  الحفظ 

[أحمد يوسف]

وعليكم السلام يمكنك رفعه هنا

https://www.mediafire.com/

[ريتاج المدينة]

[أحمد يوسف]

فين اخى الكريم الملف ؟!!!!!!!!!

[ريتاج المدينة]

وطلب  اذا ممكن اذا اضافة كود 

زر للخروج وللحفظ معا 

زر  الحفظ 

هل  وصل الملف؟

[ريتاج المدينة]

الباسورد

اسم المستخدم : ريتاج

تم تعديل نوفمبر 10, 2018 بواسطه ريتاج المدينة

[Ali Mohamed Ali]

عليك وضع هذا الرابط

ولكن تم العمل على ملف قديم لديك وتم انجاز كل المطلوب

بارك الله فيك

 

الشركات.xlsm

[ريتاج المدينة]

استاذي الكبير 

لكن قد تم الكثير من التعديل عليه 

هذه نسخة قديمة 

فكيف ارفع لكم الملف الجديد 

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

تم تعديل نوفمبر 10, 2018 بواسطه ريتاج المدينة

[ريتاج المدينة]

حاولت رفع الملف هل وصل لكم ؟ 

 

تم تعديل نوفمبر 10, 2018 بواسطه ريتاج المدينة

[ريتاج المدينة]

هل من مجيب ؟؟؟

[Ali Mohamed Ali]

هو فين موقع الرفع عشان يكون هناك استجابة ,عليك بعمل كوبى لموقع رفع الملف ولصقه هنا وذلك بعمل كليك يمين على الموقع ثم نسخ أو Copy وبعد ذلك لصقه هنا فى مشاركة جديدة

بارك الله فيك

[ريتاج المدينة]

http://www.mediafire.com/file/kgzfxwmu2ptud7e/%D8%A8%D8%B1%D9%86%D8%A7%D9%85%D8%AC_%D8%A7%D9%84%D8%B4%D8%B1%D9%83%D8%A9_2018-2019_%D8%A7%D9%84%D8%AC%D8%AF%D9%8A%D8%AF.rar/file

تفضل 

[ريتاج المدينة]

هل وصل الملف لحضرتكم ؟؟؟؟

[Ali Mohamed Ali]

نعم وصل وتم عمل كل اللازم

تفضل

 

برنامج_الشركة_2018-2019_الجديد.xlsm

[ريتاج المدينة]

استاذي الكريم 

في صفحة 

" استدعاء فاتورة مبيعات" 

في خلية 

رقم الرحلة 

تاريخ الرحلة  ..............................

 

[ريتاج المدينة]

هل ممكن اضافة كود 

زر" الحفظ"

لكي اقوم  انا بإضافته الى الصفحات  

 

[Ali Mohamed Ali]

تفضل هذا هو الكود 

والملف تمام الأن

Sub QuitandSave()
ThisWorkbook.Save
Application.Quit
End Sub

 

برنامج_الشركة_2018-2019_الجديد.xlsm

[ريتاج المدينة]

استاذي الكريم 

في مجال بدل ما اكتب رقم الرحلة ان تكون منسدلة؟

في ورقة استدعاء فاتورة مبيعات ؟

ولو بدي اغلبك

 

 

تم تعديل نوفمبر 10, 2018 بواسطه ريتاج المدينة

[Ali Mohamed Ali]

لأ طبعا لا ينفع من الأفضل ان تأتى بالمعادلات وذلك بصفحة الإستدعاء برقم الفاتورة سواء كانت مشتريات او مبيعات

بارك الله فيك

[ريتاج المدينة]

اشكرك استاذي الكبير

الاستاذ علي حفظه الله

 نوارة المنتدى

فأنت  استاذي بكل فخر

 لك علي فضل بعد الله عز وجل

حيث تتلمذتُ على يديك .

فهذا العمل تم بفضل الله عز وجل

ثم جهودك العظيمة  معي .

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

ووسع الله في ارزاقك

وجبر الله  بخاطرك دنيا واخره

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

وهنيئا لك هذا العمل مساعدة الناس .

 

[Ali Mohamed Ali]

بارك الله فيك وجزاك الله كل خير ولك بمثل ما دعوت لى وزيادة

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

[ريتاج المدينة]

Sub QuitandSave()
ThisWorkbook.Save
Application.Quit
End Sub
 

استاذي الكريم

هذا الكود  للحفظ+ الخروج 

انا اريد فقط " حفظ "

اذا تكرمت علينا 

وبارك الله بك 

[Ali Mohamed Ali]

تفضل

Sub Save()
ThisWorkbook.Save
End Sub

 

[ريتاج المدينة]

اشكرك استاذي الكبير

الاستاذ علي حفظك الله تعالى