بن علية حاجي

السلام عليكم ورحمة الله أخي الكريم، تم التعديل على معادلات الأعمدة H ، F ، B في النطاق B12:H32 بما يناسب المطلوب... أرجو أن يفي الغرض المطلوب أخوك بن علية تهيئ الفاتورة3.rar

السلام عليكم ورحمة الله أخي الكريم، يمكن أيضا استعمال المعادلة التالية ... =SMALL($H3:$DR3;COUNTIF($H3:$DR3;0)+1) Book1.rar

السلام عليكم ورحمة الله أخي الكريم، لست أدري إن كنت قد فهمت المطلوب، تجد كل شيء في الملف المرفق... أخوك بن علية سؤال (1).rar

السلام عليكم ورحمة الله أخي الكريم، هذه محاولة أخرى في الملف بإضافة الكود المطلوب للترحيل باستعمال زر "ترحيل الفواتير المراد تسديدها" وذلك بعد اختيار هذه الفواتير من القوائم المنسدلة في النطاق B35:B45 (يُستحسن اختيار الفواتير المراد تسديدها بالترتيب والتتالي حتى لا تُترك فراغات بين البيانات في صفوف النطاق B12:F32) ثم ننقر على زر الترحيل... أرجو أني قربت الفهم والحل.... أخوك بن علية تهيئ الفاتورة.rar

السلام عليكم ورحمة الله أخي الكريم، تم عمل 40% من المطلوب (على ما أعتقد) ويبقى عمل كود يقوم بنقل الفواتير المراد تسديدها إلى ورقة الفواتير المحصلة ثم مسح هذه الفواتير من ورقة الفواتير العالقة (ليس باستطاعتي ذلك وسأتركها لغيري)... أرجو أن يكون العمل المقدم مستوفيا بعض المطلوب... أخوك بن علية تهيئ الفاتورة.rar

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

السلام عليكم ورحمة الله أخي الكريم يمكنك وضع الكود التالي في كود حدث الورقة Feuil1 وأرجو أن يلبي طلبك... Private Sub Worksheet_SelectionChange(ByVal Target As Range) If [C10] = 1 Or [C10] = 2 Then Range("E:E,J:J").EntireColumn.Hidden = False If [C10] = 3 Then Range("E:E,J:J").EntireColumn.Hidden = True End Sub أو مختصرا : Private Sub Worksheet_SelectionChange(ByVal Target As Range) If [C10] = 3 Then Range("E:E,J:J").EntireColumn.Hidden = True _ Else: Range("E:E,J:J").EntireColumn.Hidden = False End Sub أخوك بن علية

السلام عليكم ورحمة الله أخي الكريم، في الحقيقة لم أفهم الكثير من المطلوب وخاصة الشرط الأخير... هذه محاولة في الملف المرفق أخوك بن علية صيغة.Zip

السلام عليكم ورحمة الله أخي الحبيب عبد الله، أكرمك الله بما تكرمنا به من فوائد وجزاك الله عنا خير الجزاء وتقبل الله منا ومنكم صالح الأعمال.... لا زالت المشكلة قائمة في عدم وجود هذه الدالة عندي في قوائم الدوال في نسختي إكسيل 2003 و 2010؟؟؟؟ وتقبل الله صيامكم وقيامكم بمزيد من الأجر والثواب... أخوك بن علية

السلام عليكم ورحمة الله أخي الكريم، انظر إلى الملف المرفق إن كانت التعديلات تناسبك؟ أرجو أني قربت المفهوم.. أخوك بن علية 80.rar

السلام عليكم ورحمة الله أخي الكريم، استعملت المعادلة البسيطة التالية والحمد لله أتت بثمارها : =1*SUBSTITUTE(B2;CHAR(160);"") سؤال : هل الدالة VALUE هي من دوال الإكسيل ؟؟ (لم أجدها عندي) أخوكم بن علية

السلام عليكم ورحمة الله أخي الكريم، إليك الملف بالمرفقات حسب ما فهمته من المطلوب... أخوك بن علية 80.rar

السلام عليكم ورحمة الله أخي الكريم، يمكن استعمال المعادلة التالية على أساس أن القيمة المحجوزة في الخلية A2 ويتم سحبها لباقي الخلايا الأخرى... =IF(MOD(INT(A2*1000);10)>=2;(INT(A2*100)+1)/100;INT(A2*100)/100) أخوك بن علية

السلام عليكم ورحمة الله أخي الكريم أبو عبد الرحمان نادر، الخلل يكمن في تنسيقات الأعداد في العمودين EZ و FA حيث تم اختيار أعداد دون أرقام عشرية، في الواقع العدد 1 في الخلية FB5 يظهر 1 وهو في الحقيقة 0 لأن قيمته في الأصل هي 0.5 ولما اخترت التنسيق دون أرقام عشرية أصبحت قيمته 0 وظهر 1 وفي العملية تُحسب قيمته 0، وقمت بتعديل معادلتي العمودين EZ و FA بإضافة دالة التقريب إلى الأعلى وأتت بثمارها... أرجو أني قد وفقت في الشرح والتعديل... أخوك بن علية المرفق : المثال.rar

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

السلام عليكم ورحمة الله أخي الكريم أبو انتصار، محاولة في الملف المرفق... أخوك بن علية إحصاء.rar

السلام عليكم ورحمة الله أخي الكريم مؤمن، وضعت المعادلات التي اقترحتها عليك (مع تصحيح معادلة الحافز بحذف القسمة على 30)... ألق نظرة على الملف المرفق... أخوك بن علية المرفق : New Microsoft Excel Worksheet.rar

السلام عليكم ورحمة الله أخي الكريم مؤمن، لست أدري إن كنت قد فهمت المطلوب وقد أرفقت ملفا فيه محاولتي لحل المسألة... راقب هذه المعادلات وجرب نتائجها بطريقة يدوية حسب الأمثلة التي وضعتها وأعلمني بالنتيجة... أخوك بن علية المرفق : معادلة احتمالات.rar

السلام عليكم ورحمة الله أخي الكريم، البيانات في الملف كثيرة جدا لذا لم أستطع التأكد من سبب الاختلاف وأعتقد أن السبب يكمن في أن بعض البيانات مكررة باختلاف بين الجدولين (عدد تكرارها في جدول يختلف عن عدد تكرارها في الجدول الآخر)... وليس لي فكرة أخرى... وأعتذر لعدم الإفادة... أخوك بن علية

السلام عليكم ورحمة الله أخي الكريم هاوي الإكسيل، شكرا جزيلا على تلبية طلب تغيير اسم الظهور إلى العربية... في الملفات التي أرفقتها في ردودي السابقة يجب ربط قيمة k في كود Choice بالخلية التي تحوي "عدد الفرق المتبقي في القرعة" وليس بالخلية التي تحوي "العدد الإجمالي للفرق"... أرجو في النهاية أن تفي الملفات بالغرض المطلوب... أخوكم بن علية

السلام عليكم ورحمة الله أخي الكريم alaklubimsaa، أدعوك أولا لتغيير اسم الظهور إلى العربية ليسهل التواصل بينك وبين الأعضاء حسب شروط المنتدى، ثانيا تم التعديل على الملف حسب المطلوب... أرجو أن يأتي الملف إلى ما تصبو إليه.... أخوك بن علية الملف المرفق : عملية قرعة لـ16 فريق_4.rar

السلام عليكم ورحمة الله أخي الكريم، أرسل لي ملفا فيه التنسيقات التي تريدها لكي أقوم بالتعديلات المناسبة لذوقك... أخوك بن علية

السلام عليكم ورحمة الله أخي الكريم ريان، تم حل المشكلة بإضافة كود جديد لمسح بيانات الجداول (إلا جدول قائمة الأسماء في النطاق B7:B22)، والكود نقوم بتنفيذه عندما نريد التعديل على قائمة أسماء الفرق (أو عندما نريد إعادة القرعة قبل اكتمال قرعة سابقة).... أرجو أن يعجبك هذا التعديل... أخوك بن علية المرفق : عملية قرعة لـ16 فريق_3.rar

السلام عليكم ورحمة الله أخي الكريم أبو حبيبة، انظر إلى المرفق لعل فيه المطلوب... أخوك بن علية المرفق : تحويل الصفر الى واحد صحيح.rar

السلام عليكم ورحمة الله أخي الكريم، أعتقد أنه تم عمل المطلوب بالتعديل على الأكواد، تعديل على تنسيقات الورقة، إضافة نطاقات بالتسمية (Cellule ، Equipes)، إضافة كود خاص لعمل جدول المباريات حسب نتائج القرعة وجدول مساعد (مخطط المباريات)... أرجو أن تروقك هذه التعديلات... عملية القرعة هذه المرة تتم بصورة فردية لكل فريق... أخوك بن علية الملف المرفق : عملية قرعة لـ16 فريق_2.rar