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

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

قام بنشر

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

أخواني الأعزاء آسف لعدم تواجدي بالمنتدى وذلك لمشاغل عملي 

أرجو مساعدتي بالملف المرفق 

أريد عند إختيار new يظهر أتوماتك رقم الفاتورة الجديدة في التكست بوكس وذلك بمعلومية بداية التسلسل

وشكرا

تسلسل الفاتورة.rar

قام بنشر

أخى الفاضل / أحمد فؤاد

نورت المنتدى بعد غياب

جرب هذا الكود

Private Sub CheckBox1_Click()
LR = Cells(Rows.Count, "K").End(xlUp).Row
TextBox1 = Application.WorksheetFunction.Max(Range("K7:K" & LR)) + 1
End Sub

تسلسل الفاتورة.rar

قام بنشر

أستاذي الغالي / رجب

أحبك في الله 

أنا آسف لكن أريد أن نأخذ في الإعتبار بداية التسلسل أي لو تم مسح صف K يتم حساب التسلسل من 1 والصحيح يصبح 101

وشكرا

قام بنشر

أخى الفاضل / أحمد فؤاد

أحبك الله الذى أحببتنى فيه

 

هل تقصد

أنه عند وجود أرقام فى العمود K  يظهر الرقم التالى لأكبر رقم فى العمود k  ( رقم الفاتورة الجديدة )

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

 

أرجو التوضيح

قام بنشر

أستاذي رجب بشكرك علي إهتمامك

أريد توضيح طلبي أكثر

إذا كان بداية التسلسل 500 فيبدأ التسلسل في الخانة K من 500 , 501 , 502 , ........

أما في حال الكود الرائع إلي حضرتك عامله لا يأخذ في الإعتبار خانة بداية التسلسل أي لو تم مسح أرقام الفواتير فإنه يبدأ بالرقم 1 وليس 101 كما في الملف

آسف علي الإطالة

قام بنشر

اخى احمد

وبعد اذن اخى رجب

تم عمل المطلوب

وجعل بداية التسلسل يعتمد على الرقم الموجود فى الخليه B3

مع تصحيح الاخطأء فى المرفق السابق

اتمنى ان يفى بالغرض

تسلسل الفاتورة.rar

قام بنشر

أخي ابراهيم أبوليلة

فعلا هو ده المطلوب

بارك الله فيك

اخى احمد

اذا كنت وصلت الى ما تريد

فيرجى اختيار افضل اجابه

لغلق الموضوع بدلا من

جعلة مفتوحا بدون فائده

انشئ حساب جديد او قم بتسجيل دخولك لتتمكن من اضافه تعليق جديد

يجب ان تكون عضوا لدينا لتتمكن من التعليق

انشئ حساب جديد

سجل حسابك الجديد لدينا في الموقع بمنتهي السهوله .

سجل حساب جديد

تسجيل دخول

هل تمتلك حساب بالفعل ؟ سجل دخولك من هنا.

سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information