اذهب الي المحتوي
أوفيسنا

طارق محمود

أوفيسنا
  • Posts

    4,520
  • تاريخ الانضمام

  • تاريخ اخر زياره

  • Days Won

    42

مشاركات المكتوبه بواسطه طارق محمود

  1. السلام عليكم
    ممكن أن لاتستخدم معادلات ولا أكواد
    الحالة دي ممكن استخدام الجداول المحورية  Pivot Tables
    سريعة جدا حيث أنها خاصية جاهزة في الاكسل
    يعيبها نقطتين يمكن التغلب عليهما
    1- أن بعد تحديث البيانات ، لايتم تحديث الجدول المحوري اوتوماتيكيا بل يجب أن تضغط كليك يمين عالجدول وتطلب تحديث
    2- أنك لايمكن عمل الجدول المحوري إلا إذا كانت جميع الأعمدة التي تم اختيار البيانات بها لها عناوين وهذه العناوين غير متماثلة ، تجدني وضعت عناوين بالأحمر
    أنظر المرفق ، عدل أي بيانات ثم ضغط كليك يمين عالجدول وتطلب تحديث

    معادلة الى كود.xlsm

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

    أخي / محمد احمد العصري
    يمكنك الحل عن طريق فصل العمود إلي ثلاث أعمدة
    ثم ترتبها كما تريد
    أنظر الصورةimage.png.e8ca99fa8548d76313dae95c2203c825.png

     

    • Like 2
  3. ثانيا الكود

    كما تلاحظ فهو كود خاص وفي حدث التغيير
    أي أنه سيتم تفعيله مباشرة إذا تحقق الشرط
     

    Private Sub Worksheet_Change(ByVal Target As Range)
    If Intersect(ActiveCell, [A1:A9999]) Is Nothing Then Exit Sub
    r = Target.Row
    Range(Cells(r - 1, 4), Cells(r + 1, 4)).UnMerge
    
    If Cells(r, 1).Value = Cells(r - 1, 1).Value Then Range(Cells(r, 4), Cells(r - 1, 4)).Merge
    If Cells(r, 1).Value = Cells(r + 1, 1).Value Then Range(Cells(r, 4), Cells(r + 1, 4)).Merge
    
    End Sub



    في الصورة المرفقة شرح سريع له


     

    code.png

    • Like 2
  4. وعليكم السلام ورحمة الله
    1-التنسيق الشرطي
    أولا تعلم المساحة المعنية كما بالصورة A2:C4992
    image.png.14d76ea9635b621816324f85a8aca391.png

    ثانيا تذهب لقائمة التنسيق الشرطي كما بالصورة


    image.png.217d59386694cc5e5c11beffc55577e5.png

    ثم تضع التنسيق أن يتم تلوين الخلايا الثلاثة A,B,C في الصف الذي ينطبق عليه الشرط

    ================
    الشرط هو: أن تتساوي خلية A مع مايعلوها مباشرة أو مادونها مباشرة عن طريق إختيار قاعدة تنسيق مشروط جديدة كما بالصورة

    image.png.9574c3a3a2e6bbd33f2a5e7ead12677c.png



    والقاعدة كما يلي

    =OR($A2=$A3,$A2=$A1)

     

    • Like 2
  5. السلام عليكم


    أخي الكريم


    الكود في حدث الوزرقة

    أي أنه يتم تفعيله أوتوماتيكيا إذا حدث التغيير المناسب في هذه الورقة


    ويعتمد الكود علي خطوتين

    1- إذا تم إختيار خلية بالعمود E ، يتم تسجيل محتوي هذه الخلية ، وهذا هو الدور القديم للموظف قبل التغيير

    2- إذا تم تغيير خلية بالعمود E ، يتم نقل الدور القديم (الذي تم تسجيله) وبيانات الموظف  لمساحة التغييرات

    تفضل المرفق

    تتبع التغيرات.xlsm

    • Like 3
    • Thanks 1
  6. السلام عليكم
    أختنا الكريمة
    مرفق الملف به ماطلبتي إن شاء الله

    ملاحظة
    في مثل هذه الحال ، يمكنك حذف كثير من البيانات لتقليل حجم الملف علي الموقع يعني بدلا من بيانات أكثر من 10,000 طالب يكفي 100 أو 200
    وفقط نأخذ المعادلة ونطبقها
    أنا عملت كده وبدلا من إرسال 27 أو 28 ميجا ، فقط 0.028 ميجا

    تجريب2.xlsx

    • Like 1
×
×
  • اضف...

Important Information