اذهب الي المحتوي
أوفيسنا

محمد حسن المحمد

الخبراء
  • Posts

    2,216
  • تاريخ الانضمام

  • Days Won

    30

كل منشورات العضو محمد حسن المحمد

  1. السلام عليكم أخي الكريم أرجو أن يكون الحل مناسباً التفقيط: تم استخدام كود التفقيط مع التعديل التقدير: تم استخدام دالة IF المركبة =IF(C9>84.5;"ممتاز";IF(C9>74.5;"جيد جداً";IF(C9>64.5;"جيد";IF(C9>49.5;"مقبول";"ضعيف")))) الترتيب: تم استخدام دالة RANK =RANK(C9;$C$9:$C$48;0) والله الموفق نقبل تحياتي العطرة والسىلام عليكم تقييم الصف السادس AY.xlsm
  2. السلام عليكم أخي الكريم تفضل جواب طلبك باستخدام معادلة SUMIFS وإجراء تغييرات للحصول على نتيجة مقبولة =SUM(SUMIFS($B$2:$B$72;$C$2:$C$72;">="&$J$1;$C$2:$C$72;"<="&$J$2);SUMIFS($D$2:$D$72;$E$2:$E$72;">="&$J$1;$E$2:$E$72;"<="&$J$2)) حياكم الله والسلام عليكم دفعات الاشهر.xlsx
  3. أحسنت أخي الكريم @أبوعيد جزاكم الله خيراً وأحسن إليكم آمين. تقبل تحياتي العطرة لشخصكم الكريم. والسلام عليكم
  4. السلام عليكم أخي الكريم لعلي فهمت سؤالك تريد حساب إجمالي الوزن الصافي حسب رقم كل بوليصة الحل باستخدام دالة SUMIF كما يلي: =SUMIF($D$3:$E$196;H12;$E$3:$E$196) واسحب نزولاً ليشمل كل أرقام البوليصة. مثال.xlsx
  5. السلام عليكم أخي الكريم بعد دراسة الموضوع الذي عرضته يحتاج عند التفكير للوهلة الأولى لإضافة الشهور الناتجة إلى عدد الشهور الأصلية وبذلك قد يكون عندك كم هائل من الأشهر حسب أي من الشرطين ولذلك أحببت أن أضيف تحقق أي من الشرطين لتاريخ نهاية الخدمة المبين لديك في الملف ثم استخدام معادلة Datedif لحساب الفرق بين تاريخ بدء الخدمة والتاريخ الناتج عن أحد الشرطين كما يلي: حيث تم الضرب بعدد السنوات بغضّ النظر عن الأشهر حتى لو بلغت 11 شهراً و 30يوماً. =IF(B13<=10;$E$11+(60*E13);$E$11+(90*E13)) حساب نتيجة اقدمية.xlsx
  6. السلام عليكم ورحمة الله وبركاته 💐 الحمد لله الذي بنعمته تتم الصالحات الشكر للجميع كل في مساهمته تقبل تحياتي العطرة لشخصكم الكريم والسلام عليكم ورحمة الله وبركاته 🏵️
  7. السلام عليكم جرّب أخي الكريم وأخبرني النتيجة تم التعديل على لون التيكست فورم.xlsm
  8. لطفاً إن اعتبرت الإجابة كافية الإشارة إلى أفضل إجابة ...مع الشكر.
  9. وجزاكم الله بمثله أخي الكريم @ammarhowari الحمد لله الذي بنعمته تتم الصالحات. لطفاً إن اعتبرت الإجابة كافية الإشارة إلى أفضل إجابة ...مع الشكر. تقبل تحياتي العطرة لشخصكم الكريم والسلام عليكم
  10. السلام عليكم أخي الكريم أخي الكريم ضع شرطاً للتكست بوكس إن كان فارغاً لونه بالأصفر وإلا باللون الأبيض Private Sub TextBox1_Change() If TextBox1.Value = "" Then TextBox1.BackColor = vbYellow Else TextBox1.BackColor = vbWhite End If End Sub كما هو معروض في الصورة التالية: تقبل تحياتي والسلام عليكم
  11. السلام عليكم ورحمة الله وبركاته يرجى تجربة هذا الحل match.xlsx
  12. السلام عليكم ورحمة الله وبركاته - أخي الكريم: أما عن شرح المعادلة التي ذكرت فهي باستخدام دالة البحث Vlookup مع الدالة الشرطية If =IF(VLOOKUP($B$2;'المبالغ المتاخره'!$B$20:$AQ$55;ROW()-16;0)=0;"";VLOOKUP($B$2;'المبالغ المتاخره'!$B$20:$AQ$55;ROW()-16;0)) الدالة الشرطية IF :مفادها إن كانت نتيجة البحث تساوي الصفر أترك الخلية فارغة ، وإن لم تكن كذلك ضع قيمة نتيجة البحث المطابقة تماماً فيها. تم تكرار دالة البحث في المعادلة للتثبت من صحة الشرط فقط. دالة البحث العمودي VLOOKUP :مفادها ابحث بدلالة الخلية المثبتة B2 في النطاق المحدد في ورقة 'المبالغ المتاخره'!$B$20:$AQ$55 حيث أن قيمة الخلية التي يراد البحث بدءاً منها مطابقة لقيمة الخلية B2 أما النتيجة المطلوبة من تحقق البحث فهي أول نتيجة ثم الثانية ثم الثالثة إلى آخره وذلك عندما تسحب المعادلة إلى أسفل. ولذلك تم الاستعانة بالدالة ROW والتي تعطي قيمة الصف حيث تم وضع المعادلة في الخلية I19 كما تذكر والتي يدور سؤالك حولها، هذه الدالة تعطيك قيمة الصف الحالي وهي 19 طرحنا منها 16 لتعطي نتيجة أول خلية مطابقة في ورقة المبالغ المتأخرة وهي هنا رقمها 3 أي Row()-16 تعني 19 - 16 = 3 كما سأبين لك في الصورة المرفقة. للتوضيح بحثت بدلالة رقم الملف في ورقة حركة تسديد العميل في الخلية B2 كان الرقم 100 عن النطاق في ورقة المبالغ المتأخرة عن رقم الملف 100 وأنت تريد القيمة الثالثة حصراً قيمتها 1160 حصلنا عليها بطرح العدد 16 من الصف الحالي في ورقة حركة تسديد العميل وذلك لأنك ستسحب المعادلة بدلاً من تسجيل الرقم 3 لأنه لن يتغير معك بالسحب نزولاً. أرجو أن أكون وفقت لشرح المطلوب وبالله التوفيق والسلام عليكم ورحمة الله وبركاته.
  13. السلام عليكم ورحمة الله وبركاته إنما يخشى اللهَ من عباده العلماءُ جزاكم الله خيراً على هذه الأفكار النيرة أستاذنا الموقر @محمد طاهر تقبل تحياتي العطرة والسلام عليكم.
  14. ولكم بمثل ما دعوتم أخي الحبيب جزاكم الله خيرا وأحسن إليكم آمين
  15. السلام عليكم ورحمة الله وبركاته بعد إذن أساتذتي الكرام ، بعد الاطلاع على ملف الأخ @Elsayeh فإنني أقترح عليه نقل ملحقات الاسم (المرحلة - الشعبة) إلى جواره كي لا تتكرر أو تجمع بعدد مرات تكرار الاسم ، كما أنني لاحظت أنه زاد مواد أخرى فهو قد يكون بحاجة لتعديل الملف على الشكل التالي: وتعديل كود أستاذنا الكريم @lionheart ليتوافق مع طلبه، عذراً على التدخل ولكن أحببت أن أذكر وجهة نظري... والسلام عليكم ترحيل بيانات الاسماء المكررة.xlsm
  16. السلام عليكم أخي الكريم تم إخفاء يوم الجمع بالتنسيق الشرطي =AND(WEEKDAY(DATE($J$2;$J$1;COLUMN(A1048576));15)=1) ملف.xlsx
  17. السلام عليكم أخي الكريم تفتح الفورم ...تنظر في خصائص اليوزرفورم... كلمة Picture مسجل بجانبها None لا توجد صورة اضغط على زر بثلاث نقاط بجانبها تستطيع من خلاله اختيار صورة ..اختر الصورة التي تريد لتكون خلفية لشاشة الفورم. تقبل تحياتي test .xlsb
  18. السلام عليكم ورحمة الله وبركاته ما شاء الله بارك الله كود رائع أخي الحبيب @lionheart أسأل الله تعالى أن يزيدك من نعمه ومن علمه آمين.
  19. السلام عليكم أخي الكريم جرب هذا الملف المرفق تقبل تحياتي مقبول او مرفوض.xlsx
  20. السلام عليكم ورحمة الله وبركاته بعد إذن إخوتي الذين تقدموا بالحل - جزاكم الله خيراً على ماتبذلونه من جهود لمساعدة إخوانكم. أختي الكريمة أقترح عليكم تغيير تصميم الشيت ليكون أكثر فاعلية وديناميكية وذلك بعد اطلاعي على هذ الملف أولاً: الجدول ثانياً: التصفية التلقائية: والسلام عليكم السؤال 5.xlsm
  21. الحمد لله الذي بنعمته تتم الصالحات لا شكر على واجب ...بارك الله بكم أخي الكريم
  22. وعليكم السلام ورحمة الله وبركاته أخي الكريم يمكنك التوصل إلى النتيجة بواسطة Pivot Table كما هو موضح في رابط الموضوع التالي: موضوع Pivot Table والنتيجة كما يلي: يمكنك الضغط على أي Total بجانب كل Department لتحصل على ورقة جديدة تظهر بها النتيجة مثل :اضغط على رقم 9953 نقرتين تحصل على جدول بقسم Baraha فقط في شيت جديد. والطريقة الثانية عبر التصفية التلقائية كما هو مبين أدناه: تقبل تحياتي العطرة والسلام عليكم. Time Attendance Details Report 15022022_125100.xls
×
×
  • اضف...

Important Information