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

كود لترتيب الاسماء تسلسليا


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

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

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

هو ان تضع ترقيم للحروف العربية 

من حرف أ الى ي 

أ = ١ 

ب= ٢

ت=٣ ....الى اخرها.

وعندما ترقم الاسم 

احمد ايمن تامر 

سيكون رقم الاسم بهذه الطريقة١

١١ ٣

احمد بكر ثابت 

 ١ ٢ ٤

هذا اذا كان الاسم ثلاثي واذكان رباعي تضيف رقم وهكذا

بحيث اذا كتبت او اضفت اسم يترتب تسلسلي رقمي وحرفي 

ايمن احمد بكر

١١ ٢

ي مكانه الصحيح 

كود او اي عمل يسهل هذا الترقيم

 

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

السلام عليكم

هذه محاولة حسب فهمي ارجو ان تكون طلبك

ملاحظة :1- الطريقة مستوحاة من طريقة استاذ جعفر بتحويل الرقم الى نص

2- الترتيب الحرفي يعتمد على جميع احرف الاسم الاول ثم الثاني وهكذا

مثلا : ابراهيم ياسين=128  تاتي قبل احمد ايمن=11

كذلك الاسماء الثلاثية وان كانت جميعها بحرف الياء ستاتي دائما قبل الاسماء الرباعية وان كانت جميعها بحرف الالف

لذا لايمكن عمل ترتيب تسلسلي رقمي حرفي هذا حسب فهمي لطلبك

وعذرا للاطالة

RootNo.rar

تم تعديل بواسطه husamwahab
  • Like 2
  • Thanks 1
رابط هذا التعليق
شارك

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

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

ممتاز 

الف الف شكر وجزاك الله عني كل خير

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

لان الترقيم الحالي ينفع للاسماء الانجليزية 

1 1 2.    احمد ايمن بكر 

وشكرا

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

الشكر لله اخي العزيز

1 hour ago, طاهر الوليدي said:

ولكن هل استطيع اعكس الترقيم

نعم ممكن بدل حلقة التكرار في الوحدة التمطية

من

For i = 0 To UBound(NameArr)

الى

For i = UBound(NameArr) To 0 Step -1

 

  • Like 1
  • Thanks 1
رابط هذا التعليق
شارك

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



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

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

Important Information