محمد سامر قام بنشر مايو 25, 2018 مشاركة قام بنشر مايو 25, 2018 (معدل) السلام عليكم ورحمة الله وبركاته اريد من الأساتذه المساعده في الترقيم التلقائي للمسلسل كل 10 صفوف. عن طريق كود. بدءا من الخليه (B11) "كل 10 صفوف يتم تكرار العدد من( 10:1) .....وهكذا بشرط ادخال اي قيمه بالخليه"a" المجاوره لها، لكي يظهر الترقيم وجزاكم الله خيرا تكرار المسلسل كل 10 صفوف.xlsm تم تعديل مايو 25, 2018 بواسطه محمد سامر رابط هذا التعليق شارك More sharing options...
Ali Mohamed Ali قام بنشر مايو 25, 2018 مشاركة قام بنشر مايو 25, 2018 تفضل اخى الكريم هذا حل سريع بالمعادلات الى ان يتم عمل كود لك من الإخوة والأساتذة تكرار المسلسل كل 10 صفوف-1.xlsm رابط هذا التعليق شارك More sharing options...
محمد سامر قام بنشر مايو 25, 2018 الكاتب مشاركة قام بنشر مايو 25, 2018 مشكور على الحل الجميل بالمعادلات استاذ علي لكني اريدها بالكود !!!! جزاك الله خيرا رابط هذا التعليق شارك More sharing options...
ابراهيم الحداد قام بنشر مايو 26, 2018 مشاركة قام بنشر مايو 26, 2018 السلام عليكم ورحمة الله جرب هذا الكود Sub ReSerial() Dim Ws As Worksheet Dim LR As Long, i As Long, x As Long Set Ws = Sheets("data1") LR = Ws.Range("A" & Rows.Count).End(xlUp).Row For i = 11 To LR x = i Mod 10 If x = 0 Then x = x + 10 If Cells(i, 1) <> "" Then Cells(i, 2) = x End If Next End Sub 1 رابط هذا التعليق شارك More sharing options...
Ali Mohamed Ali قام بنشر مايو 26, 2018 مشاركة قام بنشر مايو 26, 2018 بارك الله فيك استاذنا الكبير زيزو وجعله فى ميزان حسناتك انه حقا كود رائع-جزاك الله كل خير رابط هذا التعليق شارك More sharing options...
سليم حاصبيا قام بنشر مايو 26, 2018 مشاركة قام بنشر مايو 26, 2018 بعد اذن اخي زيزو هذا الكود Sub Numeration() Range("A1").Select Do While ActiveCell.Offset(0, 1) <> "" ActiveCell.FormulaR1C1 = "1" Selection.DataSeries Rowcol:=xlColumns, Stop:=10 ActiveCell.Offset(10, 0).Select Loop Range("A1").Select End Sub رابط هذا التعليق شارك More sharing options...
محمد سامر قام بنشر مايو 26, 2018 الكاتب مشاركة قام بنشر مايو 26, 2018 (معدل) جزاك الله خيرا استاذ زيزو خير الجزاء جزاك الله خيرا استاذ سليم بارك الله فيكم وجعله في ميزان حسناتكم تم تعديل مايو 26, 2018 بواسطه محمد سامر 1 رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.