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

تسلسل تلقائي بالفورم


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

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

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

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

أريد عند إختيار 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

رابط هذا التعليق
شارك

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

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

بارك الله فيك

اخى احمد

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

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

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

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

رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

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

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

Important Information