ابو عبدالبارى

الأخ الكريم عمر ضاحى السلام عليكم جرب المعادلة التالية ضعها فى c9 واسحبها نزولا =SUMPRODUCT(--('ALL-INF'!$I$3:$I$1000=Final!D9)*--('ALL-INF'!$E$3:$E$1000)) abo_abary_Sample.rar

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

الأخ العزيز۩◊۩ أبو حنين ۩◊۩ يوجد مشكلة فى رفع الملف يرجى اعادة رفع الملف

الأخ الكريمالأستاذ / محمد الدسوقى السلام عليكم يمكن التعديل على الكود الموجود بالملف للحصول على النتائج المطلوبة Sub Male_Abgada() Application.ScreenUpdating = False last = Cells(Rows.Count, "d").End(xlUp).Row Range("C18:N" & last).Sort Key1:=Range("D18"), Order1:=xlAscending, Header:= _ xlNo, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _ DataOption1:=xlSortNormal Range("C18:N" & last).Sort Key1:=Range("J18"), Order1:=xlDescending, Header:= _ xlNo, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _ DataOption1:=xlSortNormal Application.ScreenUpdating = True Range("A1").Select End Sub Sub Female_Abgada() Application.ScreenUpdating = False last = Cells(Rows.Count, "d").End(xlUp).Row Range("C18:N" & last).Sort Key1:=Range("D18"), Order1:=xlAscending, Header:= _ xlNo, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _ DataOption1:=xlSortNormal Range("C18:N" & last).Sort Key1:=Range("J18"), Order1:=xlAscending, Header:= _ xlNo, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _ DataOption1:=xlSortNormal Application.ScreenUpdating = True Range("A1").Select End Sub

الأخ الكريمsaadeps جرب المرفق التالى لعلة يكون المطلوب abo_abary_Book1 (2).rar

اخوانى الأعزاء واثراءا للموضوع Private Sub mh() m = 2: n = 2 For R = 3 To 12 If Cells(R, 3) = "ÐßÑ" Then m = m + 1 Range("A" & R).Range("b1:d1").Copy Range("h" & m).PasteSpecial xlPasteValues Range("g" & m) = m - 2 Application.CutCopyMode = False ElseIf Cells(R, 3) = "ÇäËì" Then n = n + 1 Range("A" & R).Range("b1:d1").Copy Range("k" & n).PasteSpecial xlPasteValues Range("g" & n) = (n - 2) Application.CutCopyMode = False End If Next End Sub abo_abary_Book1.rar

الأخ الكريمبوب2016 السلام عليكم نظرا لطبيعة اختلاف اعداد الطلبة فى اللجان جرب المرفق التالى نسألكم الدعاء abo_abary_تجربة 02.rar

الأخ العزيز سليم حاصبيا الأخ العزيزياسر خليل أبو البراء نحاول نبسط الأمور شوية ونجرب المعادلة التالية =IF(VALUE(MID(A1;FIND("-";A1;1)+1;5))>VALUE(LEFT(A1;FIND("-";A1;1)-1));IF(AND(B1>=VALUE(LEFT(A1;FIND("-";A1;1)-1));B1<=VALUE(MID(A1;FIND("-";A1;1)+1;5)))=TRUE;"فى المدى";"خارج النطاق");IF(AND(B1<=VALUE(LEFT(A1;FIND("-";A1;1)-1));B1>=VALUE(MID(A1;FIND("-";A1;1)+1;5)))=TRUE;"فى المدى";"خارج النطاق"))

الأخ الكريمAbu Fady السلام عليكم الأحتمالات التى طلبتها تم وضعها بالتنسيق الشرطى جرب الملف التالى لعلة يفى بالغرض abo_abary_Workers Attan.- Original.rar

الأخ الكريمahmede السلام عليكم =IF(AND(B1>=VALUE(LEFT(A1;1));B1<=VALUE(MID(A1;FIND("-";A1;1)+1;2)))=TRUE;"فى المدى";"خارج النطاق") جرب المرفق التالى وبه هذه المعادلة لعله يفى بالغرض نسألكم الدعاء @ياسر خليل أبو البراء abo_abary_in_out_range.rar

الأخ الكريمعامر ياسر السلام عليكم جرب الملف التالى لعلة يكون المطلوب نسألكم الدعاءabo_abary_حساب عدد الطلاب حسب العمر والجنس بتاريخ محدد.rar abo_abary_حساب عدد الطلاب حسب العمر والجنس بتاريخ محدد.rar

الأخ الكريممنير الدعاس السلام عليكم جرب المرفق التالى لعلة يفى بالغرض نسألكم اىلدعاء abo_abary_مجموع الدفعات.rar

الأخ الكريمahmad zeiad السلام عليكم جرب المرفق التالى لعلة يفى بالغرض نسألك الدعاء abo_abary_start_with_zero.rar

الأخ الكريم سليم الاخرس السلام عليكم ارجو ان يفى الملف التالى بالغرض ونسألكم الدعاء abo_abary_كرت دوام.rar

الأخ الكريم م / هانى فاروق محمد السلام عليكم جرب المرفق التالى لعلة يفى بالغرض وان لم يكن ارسل ملف به مثال وبه شكل النتائج المتوقعة نسألكم الدعاء abo_abary_out_in_range.rar

الأخ الكريم كعبلاوى بعد السلام عليكم مشكور لمرورك العطر ولكل بمثل ما دعيت به

الأخ الكريمahmede السلام عليكم جرب المرفق التالى لعلة يكون المطلوب abo_abary_77.rar

الأخ الكريمahmede السلام عليكم جرب المرفق التالى لعلة يكون المطلوب abo_abary_77.rar

الأخ الكريم كعبلاوى بعد السلام عليكم ارجو ان يفى الملف التالى بالغرض نسألكم الدعاء abo_abary_ترحيل واستعلام.rar

الأخ العزيز مامون دعيس بعد التحية مرفق الملف التالى لعلة يفى بالغرض نسألكم الدعاء abo_abary_SNK.rar

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

الأخ الكريمAlsalim1 جرب المرفق التالى abo_abary_رواتب الموظفين2.rar

الأخ الكريملعيونك بعد السلام عليكم ارجو ان يفى الملف التالى بالغرض حسب ما فهمت abo_abary_listvalues(1).rar

الأخ الكريم أبو العقاب جرب المعادلة التالية =IFERROR(IF(OR(RANK(AV93;$AV$18:$AV$92;0)=COUNTA($AV$19:$AV$92);RANK(AV93;$AV$18:$AV$92;0)=COUNTA($AV$19:$AV$92)-1);1;"");"")

الأخ الكريمزوبير عقاب بعد السلام عليكم جرب المرفق التالى لعلة يفى بالغرض ونسألكم صالح الدعاء abo_abary_zoubir 1.rar