بن علية حاجي

السلام عليكم ورحمة الله كان الخلل في بعض الأكواد المكررة مثل Circles1 كودين بالتسمية نفسها وبعض الأوامر فيها مختلفة... تم التعديل على الأكواد وحذف المكررات وإضافة كود RemoveCircles2 (وهو نسخة من كود RemoveCircles1 لكن دون رسالة إعلان حذف الدوائر لأجل الطباعة لئلا تعطل عملية الطباعة... بن علية حاجي الصف الثالث الإبتدائي.rar

السلام عليكم ورحمة الله المعادلة العادية استعملت فيها الدالة MATCH التي نعرف أنها تحدد الموقع الأول لقيمة في النطاق فقط، أما معادلات الصفيف فقد استعملت فيها الدالة SMALL التي تحدد مواقع كثيرة بالترتيب باستعمالها في معادلة صفيف مع المتغير الترتيبي للدالة... بالنسبة للمعادلة العادية يمكن استعمالها في كل الحالات لكن باستعمال عمود إضافي نحدد فيه مواقع كلمة Fr أو Sa أو غيرها في النطاق... وقد تم تطبيق ذلك في الملف المرفق... بن علية حاجي weekSum2.rar

السلام عليكم ورحمة الله لم أفهم عليك معنى "الترتيب" مع جميع الأسابيع؟؟ بن علية

السلام عليكم ورحمة الله محاولة بمعادلتين (معادلة عادية للأسبوع الأول ومعادلة صفيف لباقي الأسابيع) في الملف المرفق... بن علية حاجي weekSum.rar

السلام عليكم ورحمة الله محاولة في الملف باستعمال الدالة SUMPRODUCT حسب فهمي للمطلوب.. بن علية حاجي a.rar

السلام عليكم تم المطلوب بمعية المعادلات وبعض التعديلات على الشيتات.... بن علية حاجي شيت توزيع المكافاه.rar

السلام عليكم ورحمة الله أخي وحبيبي أبو حنين، تم حل المسألة بمعادلات صفيف حسب حالتين (تكرار القيم ودون تكرار القيم)... أخوك بن علية حاجي اعلى 5 قيم.rar

السلام عليكم لو فرضنا أن هذه القيم موجودة في العمود A فإن المعادلات (حل من الحلول الكثيرة) في أي خلية كانت في غير العمود A تكون كما يلي: للأعداد الموجبة: =SUMIF(A:A;">0";A:A) للأعداد السالبة: =SUMIF(A:A;"<0";A:A) بن علية حاجي

السلام عليكم ورحمة الله أخي الكريم أولا أهلا وسهلا بك ومرحبا، ثانيا الرجاء تغيير عنوان الموضوع إلى "تمديد نطاق في معادلة" مثلا أو غيره مما يمكّن الأعضاء من البحث وثالثا وضعت لك حلا في الملف المرفق حسب فهمي للمطلوب وأرجو أن يكون هة عين القصد... أخوك بن علية مستديم.rar

السلام عليكم ورحمة الله هذه محاولة في الملف المرفق، حيث قمت بحذف المجموعات وجدول المباريات السابق وتعويضهما بجدول واحد من عمودين (سميته جدول المباريات) وهو يتلقى مباشرة نتائج القرعة حتى تتشكل عندنا مباريات الدورة (مباراة واحدة لكل فريق)... وهو يصلح لأي عدد زوجي للفرق (4 - 6 - 8 - 10 - ... فرق) يكفي حجز هذا العدد في الخلية B1، وعدد المباريات تحدده تلقائيا معادلة الخلية B2 (وهو يساوي نصف عدد الفرق) وذلك باعتبار خروج الفريق المغلوب... أخوكم بن علية اجي عملية قرعة لفرق مع خروج المغلوب.rar

السلام عليكم ورحمة الله أخي الكريم فايز، تم التعديل على معادلات لأعمدة كثيرة في الأوراق كلها لا أستطيع أن أشير إليها ولكنك تستطيع تتبعها بكل ورقة... بن علية حاجي الصف الأول الإبتدائي 2016-2017.rar

السلام عليكم ورحمة الله أضيف إلى حل أخي العزيز أبو البراء، جازاه الله خير الجزاء، ثلاثة حلول اثنين منها بالمعادلات (واحدة مباشرة والأخرى غير مباشرة) والحل الثالث عبارة عن توجيه إلى خاصية جديدة في إكسيل 2013 و 2016... بن علية حاجي استخراج آوائل حروف كلمات في خلية.rar

السلام عليكم ورحمة الله وهذه محاولة لـ16 فريق... أرجو أن تفي الغرض المطلوب... بن علية حاجي عملية قرعة لـ16 فريق مع خروج المغلوب.rar

السلام عليكم ورحمة الله هذه محاولة لـ 32 فريق مع خروج المغلوب (مباراة واحدة لكل فريق)، تم توزيع 32 فريق إلى ثماني مجموعات كل مجموعة من أربعة فرق... أرجو أن تروق لك... وجاري عمل ملف مماثل لـ 16 فريق... بن علية حاجي عملية قرعة ل32 فريق مع خروج المغلوب.rar

السلام عليكم ورحمة الله أخي العزيز فايز، تم التعديل على الملف بما تريد... تم إضافة قائمة منسدلة (متتالية - زوجية - فردية) في الخلية C22، المعادلات في الخلايا L8 ، D25 ، C26 (الملونة بالأصفر) إلى الأسفل هي المعادلات نفسها كل حسب عمودها ومعناه أنه يتم حجزها في هذه الخلايا ثم سحبها نزولا حسب كل عمود... بن علية حاجي الصف الأول -تجربة.rar

السلام عليكم ورحمة الله وهذه أخرى مع تعدلات وإضافات أخرى... بن علية حاجي Calendrier.rar

السلام عليكم ورحمة الله وأزيد مع الهدية هذا التعديل على الهدية.... بن علية حاجي Calendrier.zip

السلام عليكم ورحمة الله أخي الكريم إن إكسيل 2007 به مشاكل كثيرة خاصة بالتوافق (مع 2003 و 2010 فما فوق) ويُنصح الانتقال إلى النسخ 2010 أو 2013 أو 2016 (وهي متوفرة في النت)... بالنسبة لحفظ الملف بلاحقة xlsx. فهذا غير ممكن باعتبار أن الملف به أكواد... والحل الآخر هو أن أشرح لك ما تم التعديل فيه: أولا : قم بمسح كل الأكواد الخاصة باليوزرفورم (من البداية إلى النهاية) وثاني قم بتعويضه بالكود التالي: Option Explicit Private Const ContColmn As Integer = 6 ' تنسيق التاريخ Private Const DateFormt As String = "yyyy/mm/dd" Private sRng As Range Private sColmn Private N As Integer Private MyRng As Range Option Base 1 Dim sh12 As Range Dim LR As Range Dim rng As Range Dim cl As Range Dim Cel As Range Dim Arr() Private Sub CommandButton4_Click() Unload Me End Sub Private Sub MY_List_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer) If KeyCode = vbKeyEscape Then Me.MY_Text = "" Me.MY_Text.SetFocus ElseIf KeyCode = vbKeyF12 Then Unload Me End If End Sub Private Sub MY_Text_Change() Dim MyValue Dim MyAr() As String Dim ib As Boolean Dim RR As Integer, i As Integer, ii As Integer Dim RRr As Integer, LR As Integer Dim dt1 As Date, dt2 As Date Dim LastRow As Integer, R As Integer, T As Integer, s As Integer MY_List.Clear With sheet2 LastRow = .Cells(.Rows.Count, "C").End(xlUp).Row For R = 2 To LastRow If .Cells(R, "C") Like "*" & MY_Text.Text & "*" Then MY_List.AddItem MY_List.List(T, 0) = .Cells(R, "A") MY_List.List(T, 1) = Format(.Cells(R, "B"), "yyyy/mm/dd") MY_List.List(T, 2) = .Cells(R, "C") MY_List.List(T, 3) = .Cells(R, "D") MY_List.List(T, 4) = .Cells(R, "E") MY_List.List(T, 5) = .Cells(R, "F") T = T + 1 End If Next With Me.MY_List .ColumnCount = 6 ' عدد الأعمدة .ColumnWidths = "60;90;110;100;100;196" ' عرض أعمدة الليست End With End With End Sub أرجو أن ينجح معك هذه المرة... وإلا قم باستبدال نسخة إكسيل 2007 بأخرى مثل إصدار 2010 أو 2013 أو 2016 (كما ذكرت بالعلى)... بن علية حاجي

السلام عليكم ورحمة الله تم عمل المطلوب... بن علية حاجي الصف الاول ب - قائمة فصول.rar

السلام عليكم ورحمة الله قمت بتحميل الملف من ردي وهو يشغل جيدا، لست أدري ما هي المشكلة (ربما تعمل في جهازك بنسخة إكسيل 2007)... المهم أعيد إرفاقه من جديد (هذه المرة بالملحق .xlsb)... بن علية حاجي تنسيق تاريخ في عمود ليست بوكس.xlsb

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

السلام عليكم ورحمة الله أخي الكريم فايز، لست أدري إن كان ما في الملف المرفق هو ما تريد؟ بن علية حاجي الصف الاول ب - قائمة فصول.rar

السلام عليكم ورحمة الله أخي الكريم، كتبت كلمة "بتحفظ" قاصدا أني ربما قد أهملت بعض المطلوب أو أني لم أفهم المطلوب جيدا والتعديلات التي قمت بها لم تكن مستوفية له... لكن الحمد لله أنك وجدت الملف وافيا ومستوفيا لكل المطلوب... وليس في قصدي شيء آخر... بن علية حاجي

السلام عليكم ورحمة الله تم عمل وتلبية كل المطلوب في الملف المرفق (بتحفظ)... بن علية حاجي السجل المدرسي.rar

السلام عليكم ورحمة الله جرب المرفق بعد التعديل في كود اليوزرفورم... بن علية حاجي تنسيق تاريخ في عمود ليست بوكس.rar