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

عبدالسلام ابوالعوافي

الخبراء
  • Posts

    342
  • تاريخ الانضمام

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

  • Days Won

    6

كل منشورات العضو عبدالسلام ابوالعوافي

  1. ActiveSheet.Unprotect "123" ActiveSheet.Protect "123" السطر الاول في بداية الكود والسطر الثاني في اخر الكود ... 123 هي كلمة السر
  2. جمع الارقام يختلف عن جمع التاريخ جمع الارقام =SUM(IFERROR(--MID(B1;ROW($B$1:$B$20);1);0)) جمع التاريخ =SUM(IFERROR(--MID(--SUBSTITUTE(TEXT(B1;"dd/mm/yyyy");"/";0);ROW($B$1:$B$20);1);0)) معادلة صفيف . اي يجب الضعط علي كنترول شفت انتر
  3. Private Sub TextBox1_Change() lr = WorksheetFunction.CountIf(Range("a1:b32"), TextBox1.Text) If TextBox1.Value <> "" And lr = 1 Then TextBox2.Value = WorksheetFunction.VLookup(TextBox1.Text, Range("a1:b32"), 2, 0) Else TextBox2.Value = "" End If End Sub
  4. لو تجرب الملف علي جهاز اخر .. اعتقد المشكلة في نسخة الاوفيس عندك .. لان الكود صحيح ويشتغل معي تمام علي نسخة 2013
  5. اخي اسامة .. الملف يشتغل تمام معي فكرة العمل انه يقوم بتامين الخلايا ( الخميس الماضي وماقبله ) عند فتح الملف وايضا يقوم بتلوين الخلايا بلون مختلف كما في الصورة اضغط علي Debug وخد سكرين شوت للكود لاعرف المشكلة .. وايضا اخبرني عن اصدار الاوفيس
  6. بعد اذنكم .. لما لا تجرب هذه المعادلة =INT((E2+10)/20)
  7. وان لم تنجح معك .. جرب الاتي في العمود A طريقتي والعمود C طريقة الاستاذ سليم every_minute.rar
  8. الاكسس افضل طريقة .. لكن يمكن تجربة الاتي ضع في الخلية B2 في مجموع الدرجات المعادلة الاتية =IF([arabic.xlsx]Sheet1!B2="";"";[arabic.xlsx]Sheet1!B2)
  9. جزاك الله خير استاذ سليم .. ملف مفيد ويوفر الكثير من الوقت
  10. لما لا تجعل زر التصغير في الفورم نفسه كما في المرفق MinimizeUserform.rar
  11. وعليكم السلام ورحمة الله اهلا وسهلا بك .. جميل جدا فكرة الاكسل في دقيقة وبداية موفقة .. اتمنى الاستمرار وجزاك الله خير
  12. وعليكم السلام .. لم افهم سؤالك جيدا ولكن وجدت هذا الخطا وقمت بتعديله كما في الصورة
  13. جزاك الله خير استاذ محمد وجعل الله اعمالكم في ميزان حسناتكم
×
×
  • اضف...

Important Information