اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

طارق محمود

أوفيسنا
  • Posts

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

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

  • Days Won

    40

طارق محمود last won the day on نوفمبر 29 2020

طارق محمود had the most liked content!

السمعه بالموقع

831 Excellent

عن العضو طارق محمود

  • تاريخ الميلاد 19 نوف, 1963

البيانات الشخصية

  • Gender (Ar)
    ذكر
  • Job Title
    Eng
  • البلد
    مصر

وسائل التواصل

  • MSN
    tarekmahmoud_2@hotmail.com
  • Yahoo
    ziko_001

اخر الزوار

9,223 زياره للملف الشخصي
  1. تفضل الملف وليس به EDATE _2حساب عدد أيام التأخير.xls
  2. صديقي العزيز من منا لايزال يعمل علي 2003 !!! عموما الملف ليس به أكواد قد يكون دالة مثل EDATE التي بالعمود F ، قد لاتكون متاحة في ذلك العهد البعيد !!! ها ها
  3. السلام عليكم أخي الكريم ، أستاذ سليم حصبيا بارك الله فيك وفي وقتك وجهدك بعد إذنك ، ممكن الحل بلا أكواد يكون أنسب أخي / محمد احمد العصري يمكنك الحل عن طريق فصل العمود إلي ثلاث أعمدة ثم ترتبها كما تريد أنظر الصورة
  4. بالإضافة لردود الأساتذة وحيث انك لم ترفع ملف لما تريد وحسب ما فهمت جرب المعادلة التالية حيث تضع الرقم المطلوب بالخلية A1 =IF(MOD(A1,8)>0,"لايقبل القسمة علي 8","قابل القسمة /8")
  5. =IFERROR(IF(TODAY()=I48;"العقد إنتهى اليوم";IF(TODAY()>I48;"العقد منتهي";IF(TODAY()<H48;"لم يتم تداوله";"العقد ساري")));IF(LEFT(CELL("format";M48);1)="D";"سداد مبكر";"") )
  6. السلام عليكم تفضل أخي الملف به ماطلبت حساب عدد أيام التأخير.xls
  7. وعليكم السلام ورحمة الله ممكن تجعل الملف مشترك عن طريق حفظه علي السيرفر بعد تفعيل خاصية Shared
  8. =IF(LEFT(CELL("format",M48),1)="D","سداد مبكر","") جرب هذه
  9. السلام عليكم تفضل المرفق الأعمدة F:H أعمدة مساعدة وقد أخفيتها ، تستطيع إظهارها قيمة التذاكر.xlsx
  10. ثانيا الكود كما تلاحظ فهو كود خاص وفي حدث التغيير أي أنه سيتم تفعيله مباشرة إذا تحقق الشرط 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 في الصورة المرفقة شرح سريع له
  11. وعليكم السلام ورحمة الله 1-التنسيق الشرطي أولا تعلم المساحة المعنية كما بالصورة A2:C4992 ثانيا تذهب لقائمة التنسيق الشرطي كما بالصورة ثم تضع التنسيق أن يتم تلوين الخلايا الثلاثة A,B,C في الصف الذي ينطبق عليه الشرط ================ الشرط هو: أن تتساوي خلية A مع مايعلوها مباشرة أو مادونها مباشرة عن طريق إختيار قاعدة تنسيق مشروط جديدة كما بالصورة والقاعدة كما يلي =OR($A2=$A3,$A2=$A1)
  12. السلام عليكم أخي الكريم طلبك الأول تم بالتنسيق الشرطي Conditional Format والطلب الثاني تم بالكود الذي بالملف تفضل البحث عن التكرار في Irsalieh.xlsm
  13. السلام عليكم أخي الكريم تفضل المرفق به المطلوبترقيم2.xlsx
  14. السلام عليكم أخي الكريم تفضل المرفق به الدالة المطلوبة توزيع الافواج على القاعات2.xlsx
  15. السلام عليكم أخي الكريم الكود في حدث الوزرقة أي أنه يتم تفعيله أوتوماتيكيا إذا حدث التغيير المناسب في هذه الورقة ويعتمد الكود علي خطوتين 1- إذا تم إختيار خلية بالعمود E ، يتم تسجيل محتوي هذه الخلية ، وهذا هو الدور القديم للموظف قبل التغيير 2- إذا تم تغيير خلية بالعمود E ، يتم نقل الدور القديم (الذي تم تسجيله) وبيانات الموظف لمساحة التغييرات تفضل المرفق تتبع التغيرات.xlsm
×
×
  • اضف...

Important Information