بن علية حاجي

السلام عليكم عند الطباعة -خصائص الطباعة- تختار "احتواء كل الأعمدة في صفحة واحدة" (مهما كان عرض الأعمدة)... (هوامش اليمين واليسار يمكن تكون 0) بن علية حاجي BOOK2-3.xlsx

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

السلام عليكم جرب المعادلة التالية: * بالفرنسية : =ARRONDI.AU.MULTIPLE(8465.46;10) * بالإنجليزية : =MROUND(8465.46;10) ملاحظة : يجب أن تراعى الفاصلة المنقوطة والفاصلة في هذه المعادلات حسب النظام المعمول به...

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

السلام عليكم تم عمل المطلوب في الملف المرفق بواسطة المعادلات وجداول مساعدة (ملونة بالأصفر الفاتح وأحد الجداول يحوي معادلات صفيف)... أرجو أن يفي الغرض المطلوب في انتظار من يقوم بالمساعدة بواسطة حل بـ VBA... بن علية حاجي رصد الدرجات.xlsm

جرب المرفق لعل فيه ما تريد.... مرتب.xlsx

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

السلام عليكم ورحمة الله تم وضع التنسيق الشرطي حسب ما تريد في خلايا العمود (العمود المعني)... New (2).xlsx

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

القيمة المضافة.xlsx

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

السلام عليكم جرب المرفق لعل فيه ما تريد بعد تعديل طفيف على كود الأخ حسين مامون... TEST_2.xls

السلام عليكم تم التعديل على أمر البحث في كود اليوزرفورم (حسب ما أعرف)، وذلك بتغيير الأمر: Me.TextBox4.Value = Application.WorksheetFunction.VLookup(Val(Me.TextFind.Value), ss, 2, False) بالأمر: Me.TextBox4.Value = Application.WorksheetFunction.VLookup(IIf(IsNumeric(Me.TextFind.Value), Val(Me.TextFind.Value), Me.TextFind.Value), ss, 2, False) المصنف3.xlsm

جرب المرفق لعل فيه ما تريد... تحكيم الصافنات1.rar

السلام عليكم ورحمة الله تم إضافة الكود (البسيط) التالي في كود حدث الشيت "قائمة" (لتحديث الحساب عند تحديد إحدى خلايا العمود E): Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Address = "$E$" & ActiveCell.Row Then Calculate End Sub أرجو أن يفي الغرض المطلوب... بن علية حاجي ملف اكسل.xlsm

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

السلام عليكم بالشروط الجديدة التي ذكرتها تعقدت المعادلة بعض الشيء (وهي معادلة صفيف أي يجب تأكيدها بواسطة Ctrl+Shift+Enter)... تم تعديل المعادلة الثانية التي لم يُستعمل فيه جداول مساعدة... واعذرني على التأخير في الرد لأني كنت خارج البيت... بن علية حاجي If formula (3).xlsm

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

السلام عليكم تم عمل المطلوب حسب ما فهمت... بالنسبة للعمود H (السابق) الذي كان يُستعمل لوضع علامة X للحركة تم الاستغناء عنه واستبداله بالعمود G (العمود الأصلي للحركة) حيث نختار في خلاياه "نوع الحركة" من القائمة المنسدلة المدرجة فيه... ثم إضافة عمودين للبيانات الجديدة في الجدول (جهة الحركة أو الأمر الإداري - تاريخه) اللذان يتم نقلهما إلى شيت "المتغيرات" بعد تنفيذ عملية النقل... أرجو أن تفي هذه التعديلات المطلوب... إن كان غير ذلك فأرجو الشرح المستفيض.. بن علية حاجي Test_2.rar

السلام عليكم أو هذا الحل باستعمال الدوال TEXT و MATCH و COUNTIF دون جدول مساعد... بن علية حاجي If formula (2).xlsx

السلام عليكم استعملت الدالتين VLOOKUP و COUNTIF، بدلا من الدالة IF، بمعية جدول مساعد مع توحيد العبارات مع جدول البيانات (العمود I) والجدول المساعد... ملاحظة: بعد وصول عدد القيم في كل "رقم التسلسلي" Serial Number إلى 1000 قيمة تتداخل الأرقام مثلا لو وصلنا في المستند المحاسبي "قيد يومية" -الذي يبدأ من 01000- إلى الرقم 01999 ثم تكرر مرة أخرى فيصبح تسلسله 02000 (الذي رقم بداية المستند المحاسبي "قبض بنكي") فيحدث التداخل بين المستندين... بن علية حاجي If formula (1).xlsx

السلام عليكم تم عمل المطلوب في الملف المرفق... بن علية حاجي فصل الاسم عن الرقم الملتصق به.xlsm

السلام عليكم الرجاء شرح شروط الدالة IF كتابة وبدقة، لأنه بعد الاطلاع على الملف لم أفهم ما تريده بالضبط... بن علية حاجي

السلام عليكم تعديل آخر بالتنسيقات مع إمكانية طباعة حسب الصفة (خارجي / نصف داخلي) بعد الاختيار من القائمة المنسدلة في الخلية BG1... بن علية حاجي البطاقة المدرسية للتعديل_1.xlsm

السلام عليكم قمت ببعض التعديلات على الملف (تنسيقات + معادلات + إضافة ورقة خاصة بمعلومات المؤسسة)... كود الطباعة يعمل جيدا... بن علية حاجي البطاقة المدرسية للتعديل.xlsm