اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

طلب كود أو معادلة لتوليد سريال بشروط محددة


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

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

الأخوة الأفاضل 

قام المبدع الأخ الغالى السيد بن علية حاجى

بوضع معادلة تشبه هذ المطلوب

https://www.officena.net/ib/topic/54805-طلب-معادلة-أو-كود-لتوليد-أرقام-بناءً-على-شروط/?page=2

المطلوب هو معادلة أو كود يقوم بوضع سريال إعتمادا على شرطين

الشرط الأول نوع السند [ فاتورة تبدأ من1 :  999 / بيان يبدأ من 1000 : 1999 / إذن إضافة يبدأ من 2000 : 2999  ] بحيث يتكرر نفس السريال إعتمادا على الخلية المجاورة [  عند ثبات المستفيد ] ويزيد +1 كلما تغيرت الخلية المجاورة [  عند تغير المستفيد 

المرفق يوضح المطلوب 

توليد سريال.rar

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

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

لدي سؤالان 

1/ هل يوجد خطأ في الخليتين  D24 , D25     ؟

2/ أين تريد وضع المعادلة ؟ هل في العمود C حتى تعطي الأرقام التي كتبتها ؟ أم في عمود آخر ؟

تحياتي

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

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

أخى الغالى عيد 

بارك الله فيك 

نعم المطلوب وضع المعادلة فى العمود C 

والخليتين D24 , D25 لا يوجد بهما أخطاء

المعادلة المطلوبة تعتمد على ( نوع ) محتوى خلايا العمود B فإذا كانت [ فاتورة تبدأ من 1 :  999 / بيان يبدأ من 1000 : 1999 / إذن إضافة يبدأ من 2000 : 2999  ]  

وتعتمد على العمود D فى تكرار هذا السريال إذا كان المستفيد هو هو نفس التالى 

فإذا تغير ( نوع ) الخلية  B يغير المسلسل حتى لو كان المستفيد السابق مكرر مثلا 

فاتورة رقم 2 السعيد
فاتورة رقم 2 السعيد
فاتورة رقم 2 السعيد
فاتورة رقم 2 السعيد
فاتورة رقم 2 السعيد
فاتورة رقم 2 السعيد
إذن إضافـة 2001 السعيد
إذن إضافـة 2001 السعيد

 

وهذا جواب سؤالك 

وبارك الله فيكم

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

أستاذنا الغالى أبو عيد

تسلم يداك وجزاك الله خيرا

المعادلة الثانية عين المطلوب

لكن هل من الممكن وضع سريال البداية - للفاتورة والبيان والإضافة - داخل المعادلة بدلا من معادلة VLOOKUP

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

وبارك الله فيك على حسن المتابعة والرد 

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

أخى الغالى أبو عيد

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

لو من الممكن التعديل على المعادلة لوضع سريال جديد فى حالة فاتورة الشراء 

تعديل السريال مرفق

والمعادلة الجديدة متميزة جدا لاننى أتمكن من وضع صف فارغ ولا يظهر لى الخطأ #N/A 

ويتبقى لى طلب أخر 

فى الملف الذى أريد إنشائه كود VBA للبحث فهل من الممكن دمجه مع كود نسخ معادلة السريال فى كود واحد و الكود هو 

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("N8:N41013")) Is Nothing Then '-------------------------
  If Target.Cells.Count > 1 Then Exit Sub
On Error Resume Next
Application.ScreenUpdating = False
Target.Offset(0, 1) = Application.VLookup(Target, Sheet1.Range("A3:F5000"), 2, False)
Target.Offset(0, 2) = Application.VLookup(Target, Sheet1.Range("A3:F5000"), 3, False)
Target.Offset(0, 3) = Application.VLookup(Target, Sheet1.Range("A3:F5000"), 4, False)
Target.Offset(0, 4) = Application.VLookup(Target, Sheet1.Range("A3:F5000"), 5, False)
Target.Offset(0, 5) = Application.VLookup(Target, Sheet1.Range("A3:F5000"), 6, False)
End If
End Sub

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

 

EROER.png

مولد السرايل.rar

تم تعديل بواسطه أناناس
تعديل المطلوب
رابط هذا التعليق
شارك

اهلا بك

1/ تم التعديل بإضافة فاتورة الشراء

2/ تم التخلص من الرسالة التي تظهر عند الحفظ

3/ يمكن دمج الكودين مع بعضهما ولكن يجب أن أعرف مهمة كود البحث

يعني ما هي مهمة كود البحث ؟

الرجاء إرفاق الملف وبه كود البحث مع الشرح

مولد السريال المعدل.rar

تم تعديل بواسطه أبوعيد
رابط هذا التعليق
شارك

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

اخي الغالي و أستاذي

هل بالامكان جعل معادلة السيريال عند وجود فاتورة شراء تأخذ قيمة خلية ما على نفس الصف ( بدون زيادة 1 عن السابق أو زيادة 1 للاحق ) أى فى شرط مستقل أخير خارج +1 

بحيث أقوم أنا بوضع سيريال فاتورة الشراء يدويا نظرا لانه متغير خارجي وليس سيريال داخل الشركة انما من المورد 

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

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

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

مولد السرايل الجديد.rar

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

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

بخصوص طلبك الثاني وهو

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

 

لم أفهم المطلوب بالضبط

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

أما بخصوص الطلب الأول فأرجو أن يكون في المرفق

تفضل

مولد السرايل الجديد1.rar

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

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

أولا بارك الله فيك بسبب الرد على طلب تعديل المعادلة 

ثانيا جزاك الله خيرا على تعديلك لكود السحب لان هذا التعديل كنت أبحث عنه مدة طويلة

لكن لى طلب تعديل ضغير على معادلة الصفيف وهو هل بالإمكان جعل معادلة الصفيف تلتقط رقم فاتورة الشراء الخارجية من الخلية G إذا كانت الخلية E " فاتورة شراء " فقط , لانك لو لاحظت عند وجود مثلا " فاتورة رقم " فى الخلية E وهناك رقم فى الخلية G فإن المعادلة تأخذه بغض النظر عن المحتوى

المطلوب بدون تعقيد

إذا كانت E  " فاتورة شراء " تأخذ الرقم المجاور فى الخلية G , وما عدا ذلك يتولد السريال كما كان عملك المبارك

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

وبارك الله فيك 

CASH.rar

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

هذا بخصوص برنامج السريال

تفضل

 مولد السرايل الجديد2.rar

أما بخصوص الملف cash فجاري العمل عليه

تحياتي

تم تعديل بواسطه أبوعيد
رابط هذا التعليق
شارك

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

أخى وأستاذى الغالى أبو عيد 

جزاك الله خيرا على ما تقدمه 

والله إن اللسان عاجز عن الشكر

لكن تبقى طلب صغير جدا

على ملف الـ CASH وهو معادلة توليد المسلسل فى العمود A هل بالإمكان إستبدال المعادلة التى وضعتها أنا بكود ليقوم بعمل المسلسل الذى يتغير كلما قمت بالتصفية ( الفلترة ) وهذا أخر طلب لى بارك الله فى علمك 

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

عمل مسلسل للأرقام في العمود A أثناء التصفية

تفضل جرب المرفق

 

عفوا   توجد مشكلة في تنفيذ عملية الرفع

تم تعديل بواسطه أبوعيد
رابط هذا التعليق
شارك

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