الترقيم في الاكسل

[احمد الراوي]

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

 

جزاكم الله خيرا على ما نقدموه من خدمة

 

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

New Microsoft Excel Worksheet.rar

[أحمد فؤاد]

تفضل ياأخي

Book1.rar

[احمد الراوي]

شكرا استاذ احمد لكن ليس هذا المطلوب انا ارغب في الترقيم الى حدود 500 رقم يعني من 1 الى 500 ويكون التسلسل بي سطرين او ثلاثة وشكراا

[سليم حاصبيا]

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

 

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

 

    ( "",IF(MOD(ROW(),2)=0,ROW()/2=     

 

           لك ان تحدد عدد الصفوف الفارغة وذلك باستبدال 2 ب  3  أو بأي عدد    والعدد 0 ب 2

تم تعديل مارس 17, 2014 بواسطه سليم حاصبيا

[سليم حاصبيا]

السلام عليكم 

تفضل يا اخي أحمد  هذا مثال

ازاحةصفوف متعددة.rar

[احمد الراوي]

جزاك الله خيرا هذا الملف انا وضعته في الموضوع ولا اعرف ما التغيير الذي حصل سى اضافة ارقام على خانات انا اريد ترقيم الى حدود 500 رقم بين سطرين من دون كتبابتها بطريقة معينة يتسلسل على الصفحة كلها عرف كيف تعبتك معاي اي غالي

[حمادة عمر]

الاخ الكريم /  احمد الراوي

 

ارفاق ملف يوضح المطلوب للجميع ويسهل الوصول للطلب

حيث انني اري ان حل الاخ الحبيب / سليم ... كما تريد وكما فهمت من طلبك

تقبل خالص تحياتي

[سليم حاصبيا]

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

ثم سحب المعدالة  نزولاً على  عدد من الصفوف حسب ما تريد

[احمد الراوي]

ت الاسم 1 احمد     2 عمر     3 علي     4 عثمان     5 حسن     التسلسل الى 500  

 

 

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

سليم حاصبيا  

[احمد الراوي]

هذا ملف توضيحي

احمد.rar

[شوقي ربيع]

لسلام عليكم

استخدم هذا الكود

Sub test()
Dim Sh As Worksheet
Dim r As Integer, rr As Integer
Set Sh = ThisWorkbook.Worksheets("æÑÞÉ1")
rr = 0
For r = 2 To 500 Step 2
rr = rr + 1
Sh.Range("A" & r) = rr
Next
End Sub

[احمد الراوي]

جزاكم الله خيرا // ممكن طريقة ادخال الكود على الصفحة ليست لدي خبرة في هذا المجال وشكراا

[احمد الراوي]

جزاكم الله خيرا // ممكن طريقة ادخال الكود على الصفحة ليست لدي خبرة في هذا المجال وشكراا

[شوقي ربيع]

جزاكم الله خيرا // ممكن طريقة ادخال الكود على الصفحة ليست لدي خبرة في هذا المجال وشكراا

احمد.rar

[احمد الراوي]

شوقي ربيع  جزاك الله الجنة هذا هو المطلوب وطريقة اضافة التسليل بعد 2 سطر هذا احتاجه في عملي لا دخال البيانات وممكن الطريقة التي من خلالها عن النقر على هذا الامر ظهر التسلسل هل يوجد شرح نظري لهذه الطريقة 

[أم عبد الله]

الأستاذ / أحمد الراوي

 

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

 

جزاه الله خيراً أستاذنا الكبير / شوقي ربيع على هذا الكود الرائع وملف حضرتك يمكن تطبيف دالة Subtotal التي نوه عنها الأستاذ / أحمد فؤاد في الملف الأول جزاه الله خيراً .حضرتك تسحب فقط الدالة إلى أسفل يمكن إلى آخر صف من الصفوف وليس 500 اسم فقط  والدالة الرائعة التي قام بعملها الأستاذ / سليم حاصبيا جزاه الله خيراً ممتازة جداً تؤدي الغرض أيضاً. عموماً هذا الملف به تطبيق بدالة Subtotal ودالة الأستاذ سليم . لكم كل التحية والتقدير.

 

جزاه الله خيراً أستاذنا الكبير / شوقي ربيع

احمد1.rar

احمد 2.rar

[احمد الراوي]

جزاكم الله خيرا وصلت الفكرة وانا الان الحمد لله عرفت كيف ترتيب الارقام من خلال هذه الاكواد الف شكر لكل من قد المساعدة وان شاء الله في ميزان حسناتكم 

أحمد فؤاد  شوقي ربيع  سليم حاصبيا   أم عبد الله