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

عبدالله المجرب

أوفيسنا
 عرض الملف الشخصي  عرض المشاركات

  • Posts

    5411

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

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

  • Days Won

    47

 نوع المحتوي 

كل منشورات العضو عبدالله المجرب

  1. عبدالله المجرب
    مساهمة ممتازة وللفائدة وهناك العديد من دوال التفقيط للاساتذة الكرام اخرها هذه http://www.officena.net/ib/index.php?showtopic=39447 وهنا http://www.officena.net/ib/index.php?showtopic=40647
  2. عبدالله المجرب
    وضح اكثر وللعلم اذا قمت بنسخ التنسيق الخاص باي خلية فان التنسيق الشرطي يتم نسخه ايضاً
  3. عبدالله المجرب
    احسنت اخي رجب كنت بحاول في الحل بالاكواد لكن بعد هذا الكود مفيش كلام
  4. عبدالله المجرب
    السلام عليكم هل تقصد هكذا انه اذا تم اخيار العملية ترجيع تكون مسبوقة بعلامة سالب فقد تم التعديل فاليك المرفق للتجربة مساعدة في فاتورة.rar
  5. عبدالله المجرب
    محاولة ان شاء الله تصيب في قادم الايام
  6. عبدالله المجرب
    السلام عليكم ان كان كود اخونا ابو حنين يفي بالغرض فهذا اختصار له Private Sub CommandButton1_Click() Range("A1:C100").Copy ورقة2.Cells(1, 1) ورقة2.Select Application.CutCopyMode = False End Sub
  7. عبدالله المجرب
    اتقدم بالاصالة عن نفسي ونيابة عن جميع الاعضاء بالتهنئة الى الاخ الكريم أبوحنين بمناسبة ترقيته الى عضو مميز وان شاء الله نرى فيه النشاط المعهود دائماً === سينقل الموضوع الى المنتدى الاجتماعي بعد فترة
  8. عبدالله المجرب
    حياك الله استاذ طارق كفييت ووفيت
  9. عبدالله المجرب
    للفائدة الباسوورد هي kind
  10. عبدالله المجرب
    قم بضغط الملف قبل رفعه
  11. عبدالله المجرب
    عمل مميز ونشاط ملحوظ وابداع متواصل ان شاء الله تستمر على هذا المنوال
  12. عبدالله المجرب
    السلام عليكم اليك الملف بعد التعديل مساعدة في فاتورة.rar
  13. عبدالله المجرب
    السلام عليكم نرجو منك اخي الفاضل الاتزام بقواعد المشاركة من حيث عنوان الطلب
  14. عبدالله المجرب
    السلام عليكم هل المقصود هذا المربع الحواري
  15. عبدالله المجرب
    ارفق الملف الذي فيه الخطاء
  16. عبدالله المجرب
    ان شاء الله سأحل ضيفاً عليكم في الاكسس لنقتبس من علمكم
  17. عبدالله المجرب
    السلام عليكم جرب هذا التعديل Sub fatl() Range("a239:g300").ClearContents x = 8: xx = 239 Do Until Cells(x, 1) = "" If Cells(x, 7) <> 0 And Cells(x, 7) < 50 Then Range(Cells(x, 1), Cells(x, 7)).Copy Range("A" & xx).PasteSpecial Paste:=xlPasteValues xx = xx + 1 End If x = x + 1 Loop Application.CutCopyMode = False End Sub
  18. عبدالله المجرب
    اخي ارفق ملف
  19. عبدالله المجرب
    العفو منك استاذ عبدالفتاح ما اجمل تواضع العلماء ان شاء الله نراك كما السابق في قسم الاكسل
  20. عبدالله المجرب
    السلام عليكم طريقة عرض الموضوع بهذه الطريقة لا تساعد على الاجابة نرجو وضع مرفق للعمل المباشر عليه
  21. عبدالله المجرب
    اولا الفرق بين التاريخين 01/04/2012 وبين 11/04/2012 هو 10ايام وليس 9 ثانياً اليك هذا المرفق حساب السن في اكتوبر.rar
  22. عبدالله المجرب
    السلام عليكم شاهد الصور المرفقة
  23. عبدالله المجرب
    السلام عليكم جرب المرفق بعد التعديل 2.zip
  24. عبدالله المجرب
    السلام عليكم اخي الكريم لا اجد الوقت الكافي خصوصاً هذه الايام ولكن اليك هذه الروابط ربما تفيدك http://www.officena.net/ib/index.php?showtopic=36524 ========= http://www.officena.net/ib/index.php?showtopic=29935
  25. عبدالله المجرب
    ضع مرفق به توضيح لطلبك
×
×
  • اضف...

Important Information

  I accept