بن علية حاجي

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

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

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

السلام عليكم ورحمة الله أخي الكريم، تم عمل المطلوب بإنشاء قائمة سميتها MyList بمفردات الموظفين بالشرط المطلوب... وقد عدلت الكثير من المعادلات في الجدول حسب الإضافة وبقي الكثير... راقب الذي عدلته من المعادلات وإذا كانت صحيحة مشيت على المنوال في باقي المعادلات... هناك في الجدول بعض القيم هي قيم ثابتة، هل يتم حجزها يدويا؟؟ أخوك بن علية الملف المرفق : Book1_3.rar

السلام عليكم ورحمة الله هذا حل من الحلول وفيه تعيين لكل الأسماء عندما تتساوى في أكبر تكرار... أرجو أن يفي بالغرض... بن علية المرفق : 456.rar

السلام عليكم ورحمة الله حل آخر للمسألة مع تنسيقات شرطية للأخطاء... بن علية المرفق : Introduction and history 1st year.rar

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

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

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

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

السلام عليكم ورحمة الله أخي الكريم، إضافة إلى الحل الذي قدمه أخي الحبيب طارق مع شرحه المستفيض، أقدم هذا الحل باستخدام خواص رؤوس المربع والمثلث مع استعمال إحداثيات نقط في معلم... يمكنك رسم هذه المربعات والمثلثات بتغيير قيمة الزاوية (بالدرجات degrees) بالنسبة لأحد رؤوس هذه الأشكال (الرأس A بالنسبة للمربع الكبير ABCD ، الرأس E بالنسبة للمثلث الكبير EFG ، الرأس H بالنسبة للمربع الصغير HIJK والرأس L بالنسبة للمثلث الصغير LMN)، ويكون هذا التغيير في الخلايا الملونة بالأصفر في شيت Sheet1... أرجو أن يفيدك هذا الملف... أخوك بن علية الملف المرفق : ccc.rar

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

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

السلام عليكم ورحمة الله أخي الكريم مختار، تم التعديل على الملف بإضافة التسمية Formula بالدالة EVALUATE مع قائمة منسدلة لرموز العمليات الأربعة (+ ، - ، * ، /) في الخلية B2... أرجو أن يفي بالغرض المطلوب... أخوك بن علية ملاحظة : تم تغيير الملف المرفق لخلل في التسمية Formula رابط الملف : http://www.mediafire.com/download/1cvivgc5yc1crkj/معادلة_من_عدة_شروط.rar رابط التحميل من المنتدى : معادلة من عدة شروط.rar

السلام عليكم ورحمة الله ماشاء الله عندي إستفسار أستاذي في مرفقك الحل الأول في خلية ظهور التفقيط بالكتابة أدرجت هذه المعادله لماذا؟ =TRIM(Monitize(F7)) كان بإمكانك ترك المعادلة السابقة =Monitize(F7) أخي الكريم الجموعي، استعملت الدالة TRIM فقط لحذف الفراغات الزائدة من نص التفقيط (لملاحظتي أنه توجد فراغات كثيرة بين الكلمات)... أخوك بن علية

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

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

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

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

السلام عليكم ورحمة الله أخي الكريم، إن كنت قد فهمت المطلوب؟ ضع هذا الكود في حدث الشيت، وهو كود يقوم بوضع علامة صح في أي خلية من النطاق C5:L1000 بمجرد النقر عليها نقرا مزدوجا... أرجو أن يكون المطلوب... الكود : Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Not Intersect([C5:L1000], Target) Is Nothing Then Target.FormulaR1C1 = "P" With Selection .Font.Name = "Wingdings 2" .Font.FontStyle = "BOLD" .Font.Size = 18 .HorizontalAlignment = xlCenter .VerticalAlignment = xlCenter End With End If Target.Offset(1, 0).Select End Sub أخوك بن علية

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

السلام عليكم ورحمة الله أخي الكريم، هذا حل آخر فيه كل الشروط المطلوبة (الشرط الثالث -البحث بأوائل الأحرف- جعلته بالمعادلات ولأجل ذلك قمت ببعض التعديلات على الملف: تنسيقات + إضافات أعمدة مساعدة + تعديل معادلة القائمة المسماة Names2)... أرجو أن ينال إعجابك إلى أن يجب أحد الأعضاء حلا للشرط الثالث أبسط من الحل الذي وضعته... أخوك بن علية الملف المرفق : Tamer Sabry3.rar

السلام عليكم ورحمة الله أخي الكريم، تم عمل الجزء الأكبر من المطلوب ويبقى الشرط الأخير "وكمان عايز ااقدر اعمل سيرش باول حرف يجبلى بيانات لانها بتعلق معايا" الذي لم أتناوله في التعديلات... بالنسبة للمشكل الأول تم التعديل على الكود حسب المطلوب حيث إذا قمت بالبحث عن صنف ليس له بيانات في Sheet1 يترك البيانات المرحلة سابقا ويستبدل حتى اسم الصنف الذي تبحث عنه في الخلية P9 باسم الصنف المرحلة بياناته سابقا... بالنسبة لقائمة الأصناف المسماة Names و Names2 قمت بتعديل معادلاتها بطريقة ديناميكية (لا تحوي سوى الأصناف الموجودة أو المضافة دون الفراغات)... بالنسبة للشرط الأخير سأفكر فيه لاحقا إن لم يضع حله أحد الإخوة المتمكنين في المنتدى... أخوك بن علية الملف المرفق : Tamer Sabry2.rar

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

السلام عليكم ورحمة الله شكرا لكم اخواني على الرد و الاهتمام بمشاكلنا بالنسبة للدالة تعملي خطأ في الصيغة " =INDEX(E11:E15,MATCH(M8,G11:G15,0)) " أخي الكريم "كريم تواتي"، ربما تستعمل في جهازك النسخة الفرنسية للإكسيل، لذا يجب تبديل اسم الدالة MATCH بالاسم EQUIV أو ربما هو مشكل الفاصلة و الفاصلة المنقوطة، جرب أن تبدل الفاصلة "," بالفاصلة المنقوطة ";"... أرجو أن تعينك هذه الملاحظات... أخوك بن علية