بن علية حاجي

السلام عليكم ورحمة الله هل تقصد أخي الكريم أنه إذا اخترت أي خلية يتم تلوين الصف والعمود اللذان تقع فيهما الخلية ويبقيان (الصف والعمود) ملونين وهكذا على كل خلايا الورقة أم تقصد شيئا آخر؟؟؟... وهل اللون يبقى موحدا لجميع الخلايا (الصفوف والأعمدة)؟؟

السلام عليكم ورحمة الله أهلا بأخي الكريم... في الحقيقة لم أطّلع إلى ما قدمه الكرام وأعرف أنهم لا يبخلون بأجود ما عندهم... وقد دخلت الموضوع وحمّلت ملفك وبدأت العمل عليه مباشرة دون النظر إلى عمل الإخوة الكرام (ربما سيكون عملي مشابها أو حتى مطابق لما قدمه أحد إخوتي الأعزاء... إليك الملف المرفق أضفت فيه بعض التنسيقات (لون الخلايا التي تمثل المحاولات الخاطئة) وبعض المعادلات للترتيب RANG وللتوزيع (واستعملت هنا الذالة الشرطية SI) أخوكم بن علية نرنيب وتوزيع نقاط.rar

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

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

السلام عليكم ورحمة الله أستسمح أخي طارق وأقدم ثالث وسيلة باستخدام COUNTIF أنظر المرفق st3.rar

السلام عليكم ورحمة الله أخي الكريم الخطأ موجود ابتداء من السطر 967 في الأعمدة BR و BT (الذين تحتاجهما في معادلتك) وتوجد أعمدة أخرى فيها الخلل نفسه... أخي الكريم صحح الأخطاء الموجود في الأعمدة أو قم يتغيير النظاق من السطر 5 إلى السطر 966 بدلا من السطر 1000 وإن شاء الله سيزول الخلل ... أرجو أن أكون قد أفدتك... أخوك بن علية

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

السلام عليكم ورحمة الله الصورة لا تفي بالغرض... وأعتقد أن الخطأ معك هو أن الصيغة بالخلية يجب أن تكون "معادلة صفيف" أي يجب تأكيدها بالضغط على : CTRL+SHIFT+ENTER رغم أني جربت الصيغة في ملف خاص وهي تشتغل جيدا (عادية أو على معادلة صفيف)... يمكن أن ترفق الورقة التي فيها الخطأ في ملف جديد وليس كل المصنف... من الصورة لا يمكن أن نجد الخطأ... والله أعلم

السلام عليكم ورحمة الله أعتقد أن المشكل في إخفاء الصفوف والأعمدة في إكسيل هو أن إكسيل له حدود في كل شيء في الأعداد، في التنسيقات، وحتى في إخفاء الأعمدة (وعدد الأعمدة التي يمكن إخفاؤها هو حوالي 90 عمودا) وإخفاء الصفوف (والذي أعتقد أنه لا يتجاوز 64785 سطر) ولا أظن أن له علاقة بالكائنات.... ننتظر ما يقوله أهل الاختصاص في ذلك... والله أعلم

السلام عليكم ورحمة الله إليك أول محاولة باستعمال الدالتين INDEX و MATCH على شكل صيغة صفيف Matrice ={INDEX($D$2:$D$103;EQUIV(1;($A$2:$A$103=G3)*($B$2:$B$103=H3);0))} وتطبيقها في الملف المرفق... أكيد سيكون هناك حلول أخرى... ملاحظة : معادلة الصفيف نؤكدها بالضغط على : ctrl + shift + enter أخوك بن علية A Q ID.rar

السلام عليكم ورحمة الله لم أتمكن من فتح الملف الذي أرفقه بردك (لأني أعمل بـ "أوفيس 2003")... وقد حضرت لك الكود التالي ويمكنك وضع زر أمر لتنفيذه... ملاحظة : لقد اعتبرت W1 الخلية هي الخلية التي تحوي العدد المتغير في ملفك، ويمكنك تغييرها حسب ملفك... وإليك الكود: Sub Printing() Dim I As Integer For I = 1 To 100 Range("W1") = I If I <= 100 Then ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True End If Next I End Sub وإذا لم يعمل معك فأرجو أن ترفق ملفك بإصدار أوفيس 2003... أخوك بن علية

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

السلام عليكم ورحمة الله ما زال المطلوب غير مفهوم.... تقول: والعملية اليدوية حسب الآله الحاسبه ستكون على النحو التالي 1 - 2000 يقوم بضربها في 5 لتصبح النتيجة 10000 عشرة آلاف 2001 - 4000 يقوم بضربها في 10 لتصبح النتيجة 19999 تسعة عشر ألفا وتسعمائة وتسعة وتسعون 4001 - 6000 يقوم بضربها في 15 لتصبح النتجية 29985 تسعة وعشرون ألفا وتسمعائة وخمسة وثمانون ثم يقوم بجمع نواتج الضرب جميعها (10000 + 19999 + 29985 = 59984 تسعة وخمسون ألفا وتسعمائة واربعة وثمانون) مثلا : العدد 19999 كيف تحصل علية وتقول "نضربها" نضرب ماذا ؟؟ "ها" تعود على ماذا؟؟ رجاء أطلب منك توضيحات أكثر...

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

السلام عليكم ورحمة الله تم تغيير بعض أوامر الكود وقد نجح الكود (جزئيا) في التغلب على الإشكالية... عرض الفورم الخاص بالتقويم لا يظهر والكود لا يعمل إلا باختيار خلية من خلايا العمود وعند اختيار خلية واحدة من العمود C يُدرج التاريخ في هذه الخلية المختارة (سواء كانت فارغة أم غير فارغة)... أخوكم بن علية calender3.rar

السلام عليكم ورحمة الله في الحقيقة كنت أفكر في الأمر قبل أن أضع التغييرات السابقة ولكن أجد مشكلة في أمر ()Click_ الذي يطبق بطريقة آلية على جميع الخلايا الموجودة في الورقة... ما استطعت أن أقوم به وضعته في الملف المرفق... وأنتظر دائما لمسات الإخوة الكرام في تغيير الكود... في الملف المرفق جعلت الكود (بعد اختيار أي خلية من خلايا الورقة) بإظهار التقويم واختيار التاريخ ويضعه في الخلية A1 ثم يقوم الكود بوضعه في العمود C وفي السطر نفسه للخلية التي تم اختيارها... كما طلب العضو "الجزيرة"... وسأحاول فيه مجددا لعله يمكن القيام بجعل الفورم لا يظهر والكود لا يعمل إلا باختيار خلية من خلايا العمود C إن لم يقم أحد الإخوة بذلك... ولا ننسى أن هذا هو عمل ومجهود الأخ أيسم ابراهيم الذي يشكر عليه... جزاه الله عنا ألف خير وبارك الله فيه... وإليكم بالملف المرفق. calender2.rar

السلام عليكم ورحمة الله معذرة أخطأت في إرفاق الملف... إليكم الملف المرفق الذي هو تغيير طفيف على عمل الأخ أيسم ابراهيم والذي نستسمحه مرة أخرى... أخوكم بن علية calender1.rar

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

السلام عليكم ورحمة الله باستعمال التنسيق الشرطي على الخلايا تجد مطلوبك... وما قدمة الأخ bosh أسهل... أنظر الملف المرفق تلوين أقل سعر.rar

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

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

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

السلام عليكم ورحمة الله قمت بخطأ في الصيغة التي أعطيتها بالأعلى ... وتصحيحه هو كما يلي: الصيغة الخطأ: =INDEX($C$7:$C$60;EQUIV(GRANDE.VALEUR(E7:E60;1);E7:E60;0)+6;0) الصيغة الصحيحة: =INDEX($C$7:$C$60;EQUIV(GRANDE.VALEUR(E7:E60;1);E7:E60;0);0) ملاحظة: الصيغة التي وضعتها فيها خلل وهو أنه إذا كانت العلامات الكبيرة في المادة بعضها متساو يقع الخطأ في الصيغة فتكرر اسم الطالب مرتين أو ثلاث مرات حسب الحالات... وحل المسألة موجود في أحد مواضيع أو ردود أحد الإخوة الكرام (لا أتذكر رابط الموضوع) ولكني أتذكر ما قام به الأخ في الموضوع لتفادي هذا الخطأ وهو بضرب ناتج كل خلية بعدد صغير جدا يعطي فارقا طفيفا جدا بين القيم (وخاصة القيم المتساوية) وهذا العدد (يضاف كصيغة في أعمدة إضافية تقابل خاناتُها خانات أعمدة المواد بالترتيب) يمكن أن يكون (مثلا) : قيمة الخلية × 0.001 × رقم السطر =CurrentCell*0.001*ROW() والله أعلم

السلام عليكم ورحمة الله لقد أضفت لك عمودا D:D به صيغة تعدّ عدد تكرارات قيم العمود C:C وغيرت قليلا في صيغ عدّ عدد المتعاملين... لم أجد بدّا من ذلك وهذا ما استطعت أن أعرفه... ونبقى دائما في انتظار إخواننا في المنتدى ليفيدونا أكثر... إذا قبلت بالعمل الذي أقدّمه لك بالملف المرفق فأعتقد أنه الحل لمشكلتك أخي الكريم... وفقك الله في عملك ويسّر عليك كل صعب ... أخوك بن علية عدة شروط_بدون تكرار_فترة زمنية1.rar

السلام عليكم ورحمة الله أقدم هذه الصيغة باستعمال الدوال Index و (EQUIV (MATCH و (GRANDE.VALEUR (LARGE وقد طبقتها على مادة اللغة العربية الموجودة في النظاق E7:E60 للحصول على الأول في المادة (وللحصول على الثاني والثالث عليك بتغيير الرقم 1 الخاص بالدالة GRANDE.VALEUR أو LARGE في الصيغة بالرقم 2 ثم 3) وللمواد الأخرى نغير النطاق E7:E60 بالنطاق الخاص بكل مادة... =INDEX($C$7:$C$60;EQUIV(GRANDE.VALEUR(E7:E60;1);E7:E60;0)+6;0) ملاحظة: أعطيتك الصيغة بالفرنسية أما إذا أردتها بالإنجليزية فيجب استبدال الكلمة EQUIV بـ MATCH والكلمة GRANDE.VALEUR بـ LARGE وكلمة INDEX تبقى كما هي... إن شاء الله يكون هذا هو المطلوب... وإن أردت أن أضع لك كل الصيغ اللازمة فلا حرج في ذلك... وربما سيقدم لك الإخوة الكرام صيغا أخرى لنستفيد أكثر... أخوك بن علية