طارق محمود

السلام عليكم مع خالص التقدير لأخونا أبو أحمد هذا حل آخر بلا أكواد فقط بالمعادلات فصل الارقام عن الاحرف.xlsx

السلام عليكم تفضل المرفق 555.xlsx

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

السلام عليكم تفضل الحل بالكود معادلة الى كود2.xlsm

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

السلام عليكم مرفق الملف بعد تغير صيغة التنسيق الشرطي الأحمر إلي =AND(TODAY()>$I2,$K2="",ISBLANK($I2)=0) إنتهاء الرحصة222.xlsm

السلام عليكم هل هذا ما تريد؟جمع.xlsx

السلام عليكم تفضل المرفقالاسم على هويتين - تعديل.xlsx

تفضل الملف وليس به EDATE _2حساب عدد أيام التأخير.xls

صديقي العزيز من منا لايزال يعمل علي 2003 !!! عموما الملف ليس به أكواد قد يكون دالة مثل EDATE التي بالعمود F ، قد لاتكون متاحة في ذلك العهد البعيد !!! ها ها

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

بالإضافة لردود الأساتذة وحيث انك لم ترفع ملف لما تريد وحسب ما فهمت جرب المعادلة التالية حيث تضع الرقم المطلوب بالخلية A1 =IF(MOD(A1,8)>0,"لايقبل القسمة علي 8","قابل القسمة /8")

=IFERROR(IF(TODAY()=I48;"العقد إنتهى اليوم";IF(TODAY()>I48;"العقد منتهي";IF(TODAY()<H48;"لم يتم تداوله";"العقد ساري")));IF(LEFT(CELL("format";M48);1)="D";"سداد مبكر";"") )

السلام عليكم تفضل أخي الملف به ماطلبت حساب عدد أيام التأخير.xls

وعليكم السلام ورحمة الله ممكن تجعل الملف مشترك عن طريق حفظه علي السيرفر بعد تفعيل خاصية Shared

=IF(LEFT(CELL("format",M48),1)="D","سداد مبكر","") جرب هذه

السلام عليكم تفضل المرفق الأعمدة F:H أعمدة مساعدة وقد أخفيتها ، تستطيع إظهارها قيمة التذاكر.xlsx

ثانيا الكود كما تلاحظ فهو كود خاص وفي حدث التغيير أي أنه سيتم تفعيله مباشرة إذا تحقق الشرط 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 في الصورة المرفقة شرح سريع له

وعليكم السلام ورحمة الله 1-التنسيق الشرطي أولا تعلم المساحة المعنية كما بالصورة A2:C4992 ثانيا تذهب لقائمة التنسيق الشرطي كما بالصورة ثم تضع التنسيق أن يتم تلوين الخلايا الثلاثة A,B,C في الصف الذي ينطبق عليه الشرط ================ الشرط هو: أن تتساوي خلية A مع مايعلوها مباشرة أو مادونها مباشرة عن طريق إختيار قاعدة تنسيق مشروط جديدة كما بالصورة والقاعدة كما يلي =OR($A2=$A3,$A2=$A1)

السلام عليكم أخي الكريم طلبك الأول تم بالتنسيق الشرطي Conditional Format والطلب الثاني تم بالكود الذي بالملف تفضل البحث عن التكرار في Irsalieh.xlsm

السلام عليكم أخي الكريم تفضل المرفق به المطلوبترقيم2.xlsx

السلام عليكم أخي الكريم تفضل المرفق به الدالة المطلوبة توزيع الافواج على القاعات2.xlsx

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

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

السلام عليكم طريقة تحديد جميع الخلايا عدا خليتين؟؟ الخطوة الأولي :تحديد جميع الخلاياCTRL+A كما أشرت الخطوة الثانية : تضغط CTRL فقط وتشير بالماوس علي ما تريد من خلايا ليتم إستثناؤها من الإختيار