بن علية حاجي

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

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

السلام عليكم ورحمة الله إخواني الكرام أليس الموضوع بالرابط التالي : My link هو نفسه الموضوع ونفسه المطلوب؟؟؟ أخوكم بن علية

السلام عليكم ورحمة الله أخي الكريم الذي أعرفه عن Paradox هو برنامج خاص بتسيير قواعد البيانات ومن خصائصه أنه يقوم باستدعاء قواعد البيانات من عدة برامج أخرى منها الإكسيل بواسطة الأمر IMPORT ويسمح بحفظها بأي صيغة من الصيغ التي يقبلها البرنامج... أما الإكسيل فلا يسمح بحفظ ملفاته إلا بصيغة mbf أو mdb أو mde (على ما أعتقد)... لذا ينبغي أن يكون معك برنامج PARADOX... يمكن تحميل البرنامج من عدة مواقع... إن لم تستطع تحميل البرنامج أضع لك الرابط في رد آخر... والله أعلم

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

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

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

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

السلام عليكم ورحمة الله أخي الكريم قمت بإضافة شرط بالدالة IF في خانات Sheet2 من الصيغة =sheet1!B3 إلى الصيغة =SI(sheet1!B3="";"";sheet1!B3) وقد استعملت "التنسيق الشرطي" على خلايا الورقتين في العمود الثاني ويضع إطارا (حدودا) لها إذا كانت هذه الخلايا غير فارغة... أتمنى أن يكون هذا هو المطلوب... أخوك بن علية book1.rar

السلام عليكم ورحمة الله وفي الملف المرفق التالي قمت بتغيير صيغة استخراج قائمة الأسماء المكررة، بحيث يُكتب الاسم مرة واحدة ويُذكر حتى الاسم الذي كًتب مرة واحدة في القائمة... وقد احتفظت بالصيغ الأخرى من الملف المرفق في الرد السابق... أخوكم بن علية الاسماء المكررة1.rar

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

السلام عليكم ورحمة الله أخي الكريم أنور الحل كان موجودا من قبل في ردودي السابقة وخاصة في الرد رقم 22 (ألق نظرة في الملف المرفق) وقد طبقت الصيغة التي اقترحتها على ملفك في عمود "طرابلس" كما ذكرت في الرد، والصيغة لا تعدّ قيم الصفر لكني استعملت الذالة COUNTIF وأعطيتك أيضا حلا آخر في رد قبله في حالة استعمال إكسيل 2007... المهم في الأخير أنك وجدت الحل... تعددت الطرق والنتيجة واحدة... وفقكم الله لكل خير... أخوكم بن علية

السلام عليكم ورحمة الله قدمت هذه الدالة لتنويع الإجابات ولكني أفضل التي قدمها أخي وحبيبي هشام لأن دمج الدالتين IF (التي يمكن أن تحوي 8 متغيرات) و CONCATENATE (التي تحوي 30 متغيرا) وبالتالي يكون عدد الشروط التي يمكن الحصول عليها بواسطة استعمال هاتين الدالتين مرة مرة هو 30×8 أي 240 متغيرا (شرطا) وإذا استعملتا أكثر من مرة في صيغة واحدة فالعدد هنا يكون مرتفعا جدا (ولو أنه لا حاجة لنا لكل هذا العدد)... والله أعلم

السلام عليكم ورحمة الله أخي الكريم أقدم لك الملف التالي في المرفق وهو تكملة لعمل الأخ الكريم "مصطفى كمال" (بالمعادلات)... أخوكم بن علية 1_تكملة.rar

السلام عليكم ورحمة الله أخي الكريم بالإضافة إلى ما قدمه أخي وحبيبي هشام (وأستسمحه في استعمال ملفه المرفق) أضيف المثال التالي في الملف المرفق وقد استعملت فيه الدالة CHOOSE حسب الصيغة التالية: =CHOOSE(A2:A15;"يناير";"فبراير";"مارس";"ابريل";"مايو";"يونيه";"يوليه";"اغسطس";"سبتمبر";"اكتوبر";"نوفمبر";"ديسمبر";"منتدى اوفسينا";"منتدى العمالقة") حيث النطاق A2:A15 هو النطاق الشروط... أخوكم بن علية Hisham_hben.rar

السلام عليكم ورحمة الله أخي الكريم "حسن علي" في الصف الأول يحوي في خانته B2 العدد 0 (ضروري) لكي تعمل الدالة بشكل صحيح (ولا ينبغي حذفه) حتى وإن تم إخفاؤه فالخلايا الأخرى تعتمد في الترقيم على هذه الخانة (التي تضع في الخانات التي تليها والتي تم إخفاؤها القيمة 0 وبها يكون ترقيم الخلايا الظاهرة بترتيب تصاعدي من 1)... والله أعلم

السلام عليكم ورحمة الله أخي الكريم بالنسبة إلى هذا السؤال لا توجد دالة في إكسيل تقوم بإخفاء السطور أو الأعمدة مهما كانت الشروط، ولكن يمكن كتابة كود بـ VBA يقوم بهذه العملية وحسب الشروط التي تريدها... والله أعلم

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

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

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

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

السلام عليكم ورحمة الله أخي الكريم أنور... أعود إليك لتصحيح خطأ طرأ مني في الصيغة السابقة، لم أضع في الحسبان أن تكون كل قيم range معدومة (تساوي 0) لذا أضع وأغير الصيغة السابقة غلى الصيغة التالية (بفرض أن نضع فراغا في حالة انعدام كل قيم النطاق): =IF(COUNTIF(range;"<>0")=0;"";SUMIF(range;"<>0")/COUNTIF(range;"<>0")) وإذا كنت تستعمل إكسيل 2007 فقد تم إضافة دالة تقوم بحساب المعدل بشروط وهي الدالة AVERAGEIF وبالفرنسية MOYENNE.SI ويكون تطبيقها في مثالنا (مع فرض أنه يمكن أن تكون كل قيم النطاق معدومة) وتكون الصيغة كما يلي: =IFERROR(AVERAGEIF(range;">0");"") وبالفرنسية: =SIERREUR(MOYENNE.SI(range;">0");"") والله أعلم

السلام عليكم ورحمة الله أخي الكريم أنور لم تفلح كل هذه الطرق التي اقترحها إخوتي الكرام... غريب!! والله ما قصروا وقد نوعوا الحلول الناجعة وما عليك إلا حيرة الاختيار... وأضيف هذه الطريقة بعد أن أستسمح من كل إخوتي الكرام وأعتقد أنه ما تريده، إستعمل أخي الكريم هذه الصيغة في ملفك وإن شاء الله يكون هذا هو المطلوب... =SUMIF(range;"<>0")/COUNTIF(range;"<>0") range هو النطاق الذي تريده... أخوك بن علية

السلام عليكم ورحمة الله أخي الكريم قصي، أولا لا شكر على واجب وثانيا أود أن أعرف كيف تريد أن تكون النتيجة المطلوبة ؟ هل تريد أن نستخرج 10 طلاب فقط (من الأوائل) أم عشر رتب الأولى (ويمكن أن يأخذها أكثر من 10 طلاب حسب تكرارات هذه الرتب)... ثم ينبغي أن نستخرج هذه القائمة حسب علامة معينة (المعدل الذي به تم تعيين الطالب الناجح من الطالب غير الناجح) وهذا غير موجود في قاعدة ملفك (علامات الطلاب)... في انتظار تفسيراتك تقبل مني كل التحية والاحترام... أخوك بن علية

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