بن علية حاجي

السلام عليكم ورحمة الله أخي الكريم، الرجاء إرفاق ملف كمثال للتطبيق عليه أخوك بن علية

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

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

السلام عليكم ورحمة الله أخي الكريم، تم تعديل على كود الفورم بتبديل السطر : If r > 0 Then Feuil3.Cells(derligne, r) = Ctrl بالسطرين : If r > 0 And r <= 28 Then MultiPage1.Value = 0: Feuil3.Cells(derligne, r) = Ctrl If r > 28 Then MultiPage1.Value = 1: Feuil3.Cells(derligne, r) = Ctrl تجد ذلك في الملف المرفق التالي : رخصة2.rar أخوك بن علية

السلام عليكم ورحمة الله أخي الكريم، هذه الخطوات السابقة بالعربية : يمكن التخلص من الرسالة السابقة في إكسيل 2007 باتباع الخطوات التالية : 1 النقر على زر القائمة Excel "في الجزء العلوي الأيسر من إطار" 2 فتح "خيارات إكسيل" 3 فتح "مركز التوثيق" 4 فتح "إعدادات مركز التوثيق" 5 فتح "خيارات التوثيق" 6 إلغاء تحديد الخيار "إزالة المعلومات الشخصية من خصائص الملف عند الحفظ" 7 النقر على OK للخروج من علبة "خيارات إكسيل" أتمنى أن تفيدك هذه المعلومات وتستوفي المطلوب... أخوك بن علية

السلام عليكم ورحمة الله أخي الكريم ، جرب الخطوات التالية : Click on Excel Office Button Click on the Excel Options button Select the Trust Center tab Click on the Trust Center Settings… button Select the Privacy Options tab Uncheck the Remove personal information from file properties on save box Click OK twice أخوك بن علية

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

السلام عليكم ورحمة الله أخي الكريم، يمكنك استعمال الدالة DATEDIF أو حتى الفرق بين التاريخين: تاريخ الخلية E9 و التاريخ المتحصل عليه بالصيغة (DATE(YEAR(E9);MONTH(E9)+1;6.... أخوك بن علية المرفق : 100.rar

السلام عليكم ورحمة الله أخي الكريم، ضع ملفا كمثال مع تحديد العمود والصف اللذان نستعملهما في تعيين ناحية الطباعة وسيتم الشرح عليه... أخوك بن علية

السلام عليكم ورحمة الله أخي الكريم، إذا كنت تعمل على نسخ أوفيس 2007 فما فوق، فهل جربت أن تحفظ ملفك بصيغة xlsb. لأنه من العادة يكون حجم هذا النوع من الملفات أصغر بكثير مقارنة مع الأنواع الأخرى xls. أو xlsx. أو xlsm. والله أعلم

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

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

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

السلام عليكم ورحمة الله أخي الكريم حسام، كنت قد حضرت الملف وبه التعديل قبل طلبك والآن أرسله لك بالملف المرفق بالرابط التالي: الرابط : http://www.gulfup.com/?XIp9cC أخوك بن علية

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

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

السلام عليكم ورحمة الله أخي الكريم، هذه نسخة معدلة أخرى للملف حيث تم إضافة شرط لاختيار عمود المبلغ حسب رقم الشهر، في الخلية O6 يتم اختيار رقم الشهر حسب ترتيب الشهور ثم النقر بيمين الفأرة على الاسم المراد ترحيله مع مبلغ الشهر الذي تم تحديده... لا تحذف المعادلة التي تم حجزها في الخلية P6 وهي التي تحدد رقم عمود في الجدول للشهر الذي تم تحديده في الخلية O5... أرجو أن يعجبك هذا التعديل.... أخوك بن علية رابط الملف المعدل : http://www.gulfup.com/?Nln6lq

السلام عليكم ورحمة الله أخي الكريم، إن ما تطلبه غير ممكن بالكود الذي وضعته في حدث الورقة باستعمال خاصية Worksheet_SelectionChange لذا تم تبديل الكود إلى الخاصية Worksheet_BeforeRightClick وهذه المرة لترحيل البيانات يجب النقر Clic على الفأرة Mouse باليمين على خلية الاسم في العمود D... وباستعمال هذه الخاصية في الكود يمكنك تحديد عمود الأسماء D وحده لعملية البحث... ملاحظة : الاسم هو "بن علية" وليس "بن حاجي" رابط الملف المرفق : http://www.gulfup.com/?4t9MUr أخوك بن علية حاجي

السلام عليكم ورحمة الله أخي الكريم أحمد علي، تمت الإجابة على أسئلتك باستعمال المعادلات والأكواد فالسؤال الأول : "عند اختيار شهر يتم تقسيمه إلى أسابيع ثم جمع حجم المشتريات خلال هذا الأسبوع" فقد تم الإجابة عليه باستعمال المعادلات أما السؤال الثاني : "عدم إدخال قيمة في الخلية إذا كانت الخلية المجاورة لها فارغة" فقد تم إضافة كود في حدث الورقة من سطرين مع رسالة تنبيه... أرجو أن تكون الحلول مقبولة ومستوفية المطلوب... ربما تجد حلولا أخرى من أعضاء آخرين... أخوك بن علية الملف المرفق: المثال.rar

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

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

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

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

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

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