بن علية حاجي

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

السلام عليكم ورحمة الله هذا الخطأ أكيد (عدم البداية من المعلم 6 في قائمة اللغة العربية) لأن اسم المادة لهذا المعلم في الخلية E11 من شيت "الجدول" غير محجوزة بصفة صحيحة حيث أنه تم إضافة "مسافة" (فراغ) في آخرها (تختلف عن اسم المادة في الخلايا الأخرى) ولهذا السبب تم إلغاء هذا الاسم من القائمة... يكفي حذف هذه المسافة الزائدة والمشكل يتم حله... والله أعلم بالنسبة لقائمة المعلمين التي تفوق 10 يكفي تغيير العدد 1 في الخلية B9 (العدد المساعد) إلى العدد 11 وبالتالي يتمدد الجدول من 11 إلى 20... وهكذا. إذا أردتَ وضعتُ لك كودا في الملف لطباعة كل الجداول لكل المواد دفعة واحدة (مع التغيير التلقائي للمواد والصفحات في حالة ما إذا تعدى عدد المعلمين العدد 10 في المادة الواحدة)... بن علية حاجي

السلام عليكم تجنبا لكثرة النطاقات بالتسمية حسب عدد المواد، ارتأيت أن أغير طريقة تحديد القوائم المنسدلة لمعلمي المواد بتسمية واحدة Profs_Mat اعتمادا على تسميتين Cellule (قائمة المواد من العمود Y) والتسمية Mat (اسم المادة المستعمل في البيانات من العمود Z) حسب اختيار المادة من الخلية E6 المرتبطة بالتسمية Cellule... بالنسبة لخلايا "أسماء المدرسين" في الجدول تم استبدال القوائم المنسدلة فيها بمعادلات بالدالة INDEX حتى يتم تغيير هذه الأسماء (أسماء المدرسين) تلقائيا حسب اختيار المادة من الخلية E6... أرجو أن تفي هذه التعديلات الغرض المطلوب... بن علية حاجي النطاقات (2).xlsx

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

السلام عليكم ورحمة الله تم عمل معادلات النطاقات المطاطية باستعمال الدالة OFFSET (بالفرنسية DECALER) على أساس أن قائمة معلمي كل مادة متسلسلة (الأسماء كلها تحت بعض)... أرجو أن تفي الغرض المطلوب... بن علية حاجي النطاقات.xlsx

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

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

السلام عليكم ورحمة الله أرجو أني وفقت في الملف حسب ما تريد... وتقبل الله منا ومنكم الصلاة والصيام والقيام وصالح الأعمال... بن علية حاجي مدونة ميزانية 2019.rar

السلام عليكم ورحمة الله لست أدري إن كنت قد فهمت المطلوب جيدا وهذه محاولة في الملف المرفق... بن علية حاجي الفرز الطرفي.xlsx

السلام عليكم تم تصحيح المعادلات في الملف المرفق... بن علية حاجي Book1_2.xlsx

السلام عليكم تم عمل المطلوب في الملف المرفق... بن علية حاجي Book1_1.xlsx

السلام عليكم راجع الملف المرفق لعل فيه ما تريد... تحويل ثلاث ارقام من اليمين الى اصفار.xlsx

السلام عليكم الجواب : موجود داخل الملف استبدال قيم بقيم اخرى.xlsx

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

السلام عليكم تم عمل المطلوب في كل من ملفي وملف أخي الكريم سليم... بن علية حاجي My_count_Salim.xlsm My_count_hben.xlsm

السلام عليكم جرب ما وضعته في الملف المرفق... بن علية حاجي نموذج ارتباطات المستلزمات المكتبية.xlsx

السلام عليكم ورحمة الله تم عمل المطلوب بواسطة كود VBA ومعادلات... بن علية حاجي My_count.xlsm

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

السلام عليكم ورحمة الله تم جلب كود من النت مع بعض التصرف ووضعه في حدث ThisWorkbook... أرجو أن يفي الغرض المطلوب... بن علية حاجي طباعة أفقية ورأسية.xlsm

السلام عليكم بعد فصل حروف الكلمتين (كل حرف في خلية) وجدت أن الفرق بينهما هو في المسافة التي تسبق مباشرة القوس ) في الجزئية Icing- (multiwall ففي الكلمة الأولى هي مسافة غير قابلة للكسر وكودها 160 (Non-breaking space أو Espace insécable) أما في الكلمة الثانية فهي مسافة عادية وكودها 32 (Space أو Espace) والدالة TRIM (أو Supprespace) تقوم بحذف كل المسافات الزائدة في الكلمات غير أنها لا تحذف المسافات غير القابلة للكسر لهذا ظهر الخلل في عدد حروف الكلمتين... والله أعلم المسافة العادية Space نحصل عليها بالضغط على Spacebar أمh المسافة غير القابلة للكسر Non-Breaking Space فنحصل عليها بالضغط على Shift+Spacebar في الملف تجد كل العمليات التي سردتها بالأعلى (والفرق لونته بلونين مختلفين)... بن علية حاجي Icing Not Match.xlsx

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

السلام عليكم تم عمل المطلوب مع بعض الإضافات (أيام غيابات المعلم يسار الشيت -ملون بالأخضر) والتعديلات على المعادلات... أرجو أن يفي الغرض المطلوب... بن علية حاجي تعديل على معادلة البحث11.xlsm

السلام عليكم قم باستبدال السطر التالي في الكود: MYPATH = ThisWorkbook.Path & "\" & TextBox1.Text & ".JPG" بالسطر التالي: MYPATH = ThisWorkbook.Path & "\Photos\" & TextBox1.Text & ".JPG" والله أعلم

السلام عليكم ورحمة الله على ما أعتقد أن الفرق بينهما هو أن الأولى تزيد عن الثانية بمسافة (فراغ) في بدايتها أو في نهايتها (أو بعلامة ' النصية)... بن علية حاجي

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