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

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

الخبراء
 عرض الملف الشخصي  عرض المشاركات

  • Posts

    342

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

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

  • Days Won

    6

 نوع المحتوي 

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

  1. عبدالسلام ابوالعوافي
    inout.rar
  2. عبدالسلام ابوالعوافي
    جرب درجة القرار (5 درجات ).rar
  3. عبدالسلام ابوالعوافي
    جزاك الله خير استاذ محمد
  4. عبدالسلام ابوالعوافي
    اعتذر اخي .. تفضل updated file1 - Copy.rar
  5. عبدالسلام ابوالعوافي
    الملف المرفق بيه طريقتان .. الاولى .. تنفيد الكود واظهار النتائج عند التغيير علي الخلايا في الاعمدة A>>G الثانية .. تنفيذ الكود من الزر اختر احدى الطريقتين ..مع العلم اني طبقت علي العمود L فقط .. وطبق الخطوات علي العمودين الاخرين M-N
  6. عبدالسلام ابوالعوافي
    تمام اخي فهمت عليك .. كل مافي الامر انه عند الضغط علي الليبيل يشتغل الكود الاتي .. UserForm1.Show
  7. عبدالسلام ابوالعوافي
    ضع في الخلية C2 الصيغة الاتية واسحب لاسفل =IF(SUMPRODUCT(--(($A$2:$A$26&"-"&$B$2:$B$26)=(A2&"-"&B2)))>1;"مكرر";"")
  8. عبدالسلام ابوالعوافي
    جرب خذف كل الـ Addins في الاكسل
  9. عبدالسلام ابوالعوافي
    اخي الكريم .. لم افهم ماتقصده بالضبط .. بالنسبة للمرفق فهو يقوم باخفاء واظهار Frame وليس فورم اخر
  10. عبدالسلام ابوالعوافي
    جرب Copy of hospital_facture.rar
  11. عبدالسلام ابوالعوافي
    =IF(COUNTIF(A2:A22;INDEX(A2:A20;MATCH(1;(SUBTOTAL(3;OFFSET(A2:A20;ROW(A2:A20)-2;0;1)));0)))=SUBTOTAL(3;A2:A20);INDEX(A2:A20;MATCH(1;(SUBTOTAL(3;OFFSET(A2:A20;ROW(A2:A20)-2;0;1)));0));"====") جرب
  12. عبدالسلام ابوالعوافي
    تم تعديل المعادلات .. وفيما يخص الفورم .. لم اقم باي تعديل عليه والمشكلة موجودة مسبقا .. تنظيم المعاملات 3.rar
  13. عبدالسلام ابوالعوافي
    اقساط حضانة .rar
  14. عبدالسلام ابوالعوافي
    Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column <> 2 Or Target = "" Then Exit Sub If Target < 10 Or Target > 20 Then MsgBox "يجب ادخال قيمة بين 10 و 20" Target = "" Target.Select End If End Sub تضع الكود في حدث ورقة العمل .. في العمود B يجب ادخال قيمة بين 10 و 20
  15. عبدالسلام ابوالعوافي
    جرب هذا الملف .. اذا كنت فهمت ماتقصد test.rar
  16. عبدالسلام ابوالعوافي
    جرب هذا الملف .. مع ملاحظة ان الموجود في المرفق هو فكرة الحل .. بمعنى .. قم بتعديل النطاقات داخل الملف عند اضافة بيانات جديدة تنظيم المعاملات 2.rar
  17. عبدالسلام ابوالعوافي
    قمت بالتعديل علي الفورم في مشاركة سابقة وهو يشتغل بشكل جيد .. ولكن للتعيدل علي الكود الحالي قم باضافة هذا السطر If Lr < 9 Then Lr = 9 في هذا الموضع
  18. عبدالسلام ابوالعوافي
  19. عبدالسلام ابوالعوافي
    ماذا لو اضيف هذا السطر
  20. عبدالسلام ابوالعوافي
    تقبل الله صالح اعمالكم وكل عام وانتم بخير ..
  21. عبدالسلام ابوالعوافي
    جرب Private Sub CommandButton1_Click() Dim lr As Integer Dim i As Integer lr = Cells(Rows.Count, "C").End(xlUp).Row For i = 4 To lr If Cells(i, 3) = Me.ComboBox2 Then Cells(i, 2) = Me.TextBox2 Cells(i, 3) = Me.ComboBox1 Cells(i, 4) = Me.TextBox1 End If Next End Sub
  22. عبدالسلام ابوالعوافي
    اخي الكريم .. لم افهم كل ماتقصد .. لكن جرب هذه المعادلة =IF(COUNT(F9:H9)<3;"";IF(E9>=$B$5;"ناجح";"راسب"))
  23. عبدالسلام ابوالعوافي
    بعد اذن اخي علي جرب اقتصاد.rar
  24. عبدالسلام ابوالعوافي
    للعد .. استعمل Countifs بدلا من Countif
  25. عبدالسلام ابوالعوافي
    يشتغل تمام معي .. قد تكون المشكلة في الاوفيس عندك .. جرب علي جهاز تاني
×
×
  • اضف...

Important Information

  I accept