zhamid قام بنشر مارس 30, 2011 قام بنشر مارس 30, 2011 السلام عليكم عندي ملف اكسل اريد اظهار الرقم المفقود من التسلسل وذلك حسب المرفق AA 1709 AA 1710 1711 AA 1712 AA 1713 1714 AA 1714 BB 1264 1265 BB 1266 BB 1267 BB 1268 BB 1269 CC 1240 CC 1241 CC 1242 CC 1243 1244 CC 1245 CC 1246 1247 - 1247 CC 1248 وشاكرا لكم تعاونكم
طارق محمود قام بنشر مارس 30, 2011 قام بنشر مارس 30, 2011 السلام عليكم السؤال غير واضح هل تري مثل مي سلسلة حرف AA 1709 AA 1710 1711 AA 1712 AA 1713 1714 AA 1714 وهي تعني AA 1709 AA 1710 AA 1711 AA 1712 AA 1713 AA 1714 AA 1714 إظهار أن AA 1714 متكرر أو إظهار أنه ليوجد رقم مفقود؟
يحيى حسين قام بنشر مارس 30, 2011 قام بنشر مارس 30, 2011 السلام عليكم و رحمة الله و بركاته أخي جرب الكود التالي على فرض أن الأرقام التي تبحث عن تسلسلها المفقود موجودة في العمود A Sub Excel4Us() Dim LR As Long, MyRng As Range, MinV As Long, MaxV As Long, r As Long, i As Long LR = Range("a" & Rows.Count).End(xlUp).Row Set MyRng = Range("a1:a" & LR) MinV = Application.WorksheetFunction.Min(MyRng) MaxV = Application.WorksheetFunction.Max(MyRng) For r = MinV To MaxV For i = 1 To LR If r = Range("a" & i).Value Then GoTo 1 End If Next i y = y + 1 Range("b" & y).Value = r 1 Next r End Sub دمت في حفظ الله
يحيى حسين قام بنشر مارس 30, 2011 قام بنشر مارس 30, 2011 السلام عليكم و رحمة الله و بركاته و هذا حل آخر بالمعادلات =SMALL(IF(COUNTIF($A$1:$A$6,ROW(INDIRECT(MIN($A$1:$A$6)&":"&MAX($A$1:$A$6))))=0,ROW(INDIRECT(MIN($A$1:$A$6)&":"&MAX($A$1:$A$6)))),ROW(1:1)) و لا تنسى انها معادلة صفيف يجب الضغط على Ctrl+Shift+Enter
zhamid قام بنشر مارس 31, 2011 الكاتب قام بنشر مارس 31, 2011 السلام عليكم شاكرا لكم تعازنكم ولكن ما اردت هو Missing No Ser.No Data 1709 AAA 1710 AAA 1711 AAA 1712 1713 AAA 1714 - 1715 - 1716 1717 AAA 1264 BBB 1265 BBB 1266 BBB 1267 BBB 1268 1269 BBB 1240 CCC 1241 CCC 1242 1243 CCC 1244 1245 CCC 246 - 1247 - 1248 1249 CCC 625 DDD 626 DDD 627 DDD 628 DDD 629 DDD 630 DDD 631 - 632 - 633 634 DDD ارجو ان يكون مفهمم الان
يحيى حسين قام بنشر أبريل 2, 2011 قام بنشر أبريل 2, 2011 السلام عليكم و رحمة الله أخي ارفق ملف لان طلبك مش واضح
zhamid قام بنشر أبريل 2, 2011 الكاتب قام بنشر أبريل 2, 2011 شكرا لكم الملف تكست لانني لم استطع تحميلة اكسل Missing-No.txt
مصطفى كمال قام بنشر أبريل 2, 2011 قام بنشر أبريل 2, 2011 السلام عليكم ورحمة الله وبركاته تفضل أخي الكريم الملف المرفق تم وضع معادلات لفارق 4 أرقام أرجو أن يكون ما طلبت missing number.rar
zhamid قام بنشر أبريل 4, 2011 الكاتب قام بنشر أبريل 4, 2011 السلام عليكم اللة يجزيك كل خير والف شكرا لك
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.