بن علية حاجي

السلام عليكم ورحمة الله أخي الكريم سليم، حل اللغز بالمعادلات تجده في المرفق، تنسيقات الألوان مختلفة عما جاء في ملفك... أخوك بن علية رابط الملف : http://www.gulfup.com/?v9474r

السلام عليكم ورحمة الله أخي الحبيب أبو حنين، الدالة MIN هي الدالة التي تعطي Minimum أي أصغر قيمة بين المدخلات... وفي معادلتنا نبحث عن أصغر قيمة بين العدد 5 والعدد AP$2-$AJ4 الذي يمثل الفرق بين عدد أيام الشهر وعدد الأيام الفعلي في كل صف (بشرط أن يكون العدد الفعلي للأيام أكبر من أو يساوي 25)... أخوك بن علية

السلام عليكم ورحمة الله أخي الحبيب أبو حنين، جرب المعادلة التالية في الخلية AK4 ثم اسحبها إلى الأسفل... =IF($AJ4>=25;MIN($AP$2-$AJ4;5);"") ملاحظة : يجب مراعاة الفاصلة والفاصلة المنقوطة حسب نسخة الأوفيس والإعدادات... أخوك بن علية

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

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

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

السلام عليكم ورحمة الله أرجو تجربة الكود التالي المعدل... Private Sub Worksheet_Change(ByVal Target As Range) On Error Resume Next If Target.Address = [F6].Address Then For I = 8 To 10 If IsEmpty(Range("F6")) Then Cells(I, 4) = "" Else Cells(I, 4) = I - 7 Next End If End Sub أخوكم بن علية

السلام عليكم ورحمة الله أخي الكريم سليم، لم اقصد من خلال ملاحظتي في ردي السابق غيرالتصحيح ليس إلا... ولم أقل إن التعديل غير صحيح بل إن المعادلات (المعالة التي وضعتُها وتعديلك) تعمل العمل نفسه... ولكن يجب تصحيح بعض الأخطاء العفوية في هذه المعادلة حتى تعمل بشكل صحيح لأي مستعمل لها... والتصحيح يكون كما يلي : =IF(AND(ROWS($A$1:$A1)<=$J$2;COLUMNS($A$1:A$1)<=$K$2);$K$2*(ROWS($A$1:$A1)-1)+COLUMNS($A$1:A$1);"") أخوك بن علية

السلام عليكم ورحمة الله أخي الكريم سليم، أولا أشكرك جزيل الشكر على تذكيرك لي لطريقة حل مسألة الكود (حل جمل المعادلات من الدرجة الأولى) باستعمال دوال المصفوفات وهي طريقة ندرّسها في صفوف الثانوي... المهم شكرا على هذا العمل الجميل... بالنسبة لتعديلك للمعادلة فهذا التعديل فيه بعض الأخطاء، وقد استعملت في معادلتي (المختصرة) الدالتين ROW و COLUMN بدلا من الدالتين ROWS و COLUMNS.... والمعادلة التي وضعتها في ردي السابق يمكن حجزها في أي موضع كان غير الخلية B4... شكرا على الفائدة أخوك بن علية

السلام عليكم ورحمة الله أخي الكريم أبو صلاح، في الحقيقة هذه مسألة رياضياتية والحل هو : 74658 (الرقم السري) والحل تم بفرض أن العدد المطلوب هو : xyztu (ترتيب الأرقام من اليسار إلى اليمين) فتكون الشروط التي ذكرتها كما يلي : الشرط الأول يعطي : z + u = 14 الشرط الثاني يعطي : t = y + 1 الشرط الثالث يعطي : x = 2 y - 1 الشرط الرابع يعطي : y + z = 10 الشرط الخامس يعطي : x + y + z + t + u = 30 ومن الشروط (الأول و الثاني و الخامس) نجد : x + 2 y = 15 ومن هذه النتيجة والشرط الثالث نجد : y = 4 وبالتعويض في المعادلات المناسبة نجد أن : x = 7 ، z = 6 ، t = 5 ، u = 8 وبالتالي العدد المطلوب هو : 74658 والله أعلم

السلام عليكم ورحمة الله أخي الكريم سليم، يكفي في هذه الحالة وضع المعادلة التالية في الخلية B4 ثم سحبها إلى اليسار وإلى الأسفل: المعادلة: =IF(AND(ROW($A1)<=$J$2;COLUMN(A$1)<=$K$2);$K$2*(ROW($A1)-1)+COLUMN(A$1);"") ملاحظة : تطبيق المعادلة في الملف المرفق... بن علية جدول متحرك.rar

السلام عليكم ورحمة الله يتم ذلك بعدة طرق منها استعمال الدالة SUMIF أو الدالة SUMPRODUCT أو غيرها بن علية

السلام عليكم ورحمة الله أخي الكريم، هذا حل آخر وأرجو أن يروقك... أخوك بن علية المرفق : 99999999.rar

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

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

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

السلام عليكم ورحمة الله أخي الكريم محمد، تم التعديل على الكود حسب المطلوب... أرجو أن يفي بالغرض... أخوك بن علية الملف المرفق : تجربة كود العلامة عبد الله باقشير_4.rar

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

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

السلام عليكم ورحمة الله أخي الحبيب أبو حنين، أعتقد أن ذلك ممكن جدا باستعمال الفكرة في ملف أخي الكريم YasserKhalil والذي استعمل فيه الدالة SUMPRODUCT وبتصرف طفيف على المعادلة كانت النتيجة حسب المطلوب الجديد (تحديد عدد الحالات التي يكون فيها الحرف X مسبوقا أو متبوعا بأحد الأحرف الثلاثة A أو E أو T) وحسب فهمي لهذا المطلوب... أرجو أن يفي بالغرض... أخوك بن علية المرفق : رمز X.rar

السلام عليكم ورحمة الله أخي الكريم، تواصلا مع رد أخي الكريم YasserKhalil مع الاعتذار لاستعمال ملفه لجعل النطاقين MyData و Serial مطاطيين (نطاقات ديناميكية) يمكن استعمال الدالة OFFSET المعادلتين التاليتين : معادلة النطاق المسمى MyData: =OFFSET('بيانات أساسية'!$A$2:$AA$2;;;COUNTA('بيانات أساسية'!$A:$A)-1) معادلة النطاق المسمى Serial : =OFFSET(MyData;;;;1) أرجو أن تفي هذه المعادلات بالمطلوب... ملاحظة : إن لم تظهر المعادلات بالشكل الصحيح فستجدها مطبقة في ملف أخي YasserKhalil أخوكم بن علية المرفق : Bills.rar

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

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

السلام عليكم أخي الكريم، في هذه الحالة يجب إنشاء عمودين (حقلين) لكل حقل تريد إدراجه مثلا حقل "اسم" للأسماء يجب تقسيم قائمة هذه الأسماء إلى حقلين (عمودين) تسمي (مثلا) أحدهما "اسم1" والآخر "اسم2" تدرج كل حقل من هذين الحقلين في "اخلاء" (ولو أني لا أعرف هذا المصطلح)... وبالمثل تقوم بالعملية نفسها إذا كانت لك حقول أخرى... أرجو أني قربت المفهوم أخوك بن علية

جرب المعادلة في المرفق... المرفق : نسبة التحصيل لادارة الصيانة يونيو 2013).rar