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

محي الدين ابو البشر

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

  • Posts

    878

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

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

  • Days Won

    6

 نوع المحتوي 

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

  1. محي الدين ابو البشر
    السلام عليكم بارك الله بك ابداعات مميزة جزاك الله كل خير
  2. محي الدين ابو البشر
    السلام عليكم بارك الله بك وبجودك المميزة جعلها الله في ميزان حسناتك وجزاك الله كل خير ودمت ذخراً
  3. محي الدين ابو البشر
    السلام عليكم ما هذا الإبداع بارك الله بك وبجهودك وجزاك الله كل خير دمتم ذخراً
  4. محي الدين ابو البشر
    السلام عليكم اتمنى أني فهمت المطلب انظر المرفق officena.rar
  5. محي الدين ابو البشر
    السلام عليكم الله يحميكم ويديم عليكم الصحة والعافية انتم بناة الأجيال الله يتمم عل خير
  6. محي الدين ابو البشر
    السلام عليكم الحمد لله ان موسوم الامتحانات قد انقضى وعاد الغوالي إلى المنتدى الغالي كل عام وأنتم بخير
  7. محي الدين ابو البشر
    رحمه الله واسكنه جناته
  8. محي الدين ابو البشر
    السلام عليكم بارك الله بك شرح موفق ومقيد جزاك اله كل خير بوركت جهودك السلام عليكم ولا أروع من شرح جزاك الله كل خير استاذ جمال انت من عمالقة هذا المنتدى وقد استفدت من حضرتك الكثير أدامك الله ذخراً
  9. محي الدين ابو البشر
    السلام عليكم انظر المرفق اذا كانت ما فهمته منك صحيح طبقت الموضوع على R3 اذا كان المطلوب نتابع باذن الله تحويل عمل الدالة sumif لكود vba (1).rar
  10. محي الدين ابو البشر
    السلام عليكم بالحقيقة كلام جميل بل رائع برك الله بك وجزاك الله كل خير وفقك الله
  11. محي الدين ابو البشر
    السلام عليكم الحمد لله انه تم المطلوب كنت افكر في الموضوع وكنت سأقترح عليك ذلك احسنت صنعا وجزاك الله كل خير ولك بمثل ما دعوت
  12. محي الدين ابو البشر
    For r = 3 To 24 ' Me.Controls("TextBox" & r) = "" With WARED SH = .C جرب هذا التعديل
  13. محي الدين ابو البشر
    السلام عليكم بالمناسبة الاستاذ خالد الرشيدي وهو من درر هذا المنتدى اصبح قليل الظهور عسى خيراً طمنا عنك استاذنا العزيز
  14. محي الدين ابو البشر
    السلام عليكم أخي العزيز اعطاك الله العافية على هذا الجهد ارجو أن تعيد النظر بالسطر If TextBox14.Text = WARED.Range("A", khh).Value Then If TextBox14.Text = WARED.Range("A"& khh).Value Then جرب هذا التعديل وبالتوفيق
  15. محي الدين ابو البشر
    السلام عليكم يبدو أني تأخرت The file link that you requested is not valid.
  16. محي الدين ابو البشر
    السلام عليكم اعتقد ان ما تطلبه متوفر في الاكسل عندي ملف بحاجة لابحث عنه ادو لي بأن أجده
  17. محي الدين ابو البشر
    السلام عليكم ورمضان مبارك تقبل الله صيامكم وقيامكم وبعد عاد النور إلى منتدانا الحبيب بعودة الأستاذ ياسر حمداً لله على السلامة
  18. محي الدين ابو البشر
    السلام عليكم أخي العزيز جرب المرفق Microsoft Excel Worksheet جديد.rar
  19. محي الدين ابو البشر
    السلام عليكم أعتقد والله أعلم أم المشكلة في السطر التالي: last = Sheets("ناجح").Cells(Rows.Count, "a").End(xlUp).Row هنا يجب التأكد أن آخر سطر في الداتا يتمثل في العمورد a وغلا يجب التعديل على هذا العمود ليتوافق مع الداتا الموجودة لديك
  20. محي الدين ابو البشر
    السلام عليكم حسب فهمي للسؤال أعتقد أن المعادلة هكذا =I7*H7&"\"&G7*I7
  21. محي الدين ابو البشر
    Sheets(xx).Cells(azsh, 1).PasteSpecial Sheets("أمر شغل جديد").Range("A9:S20").SpecialCells(xlCellTypeConstants, 23).ClearContents Application.CutCopyMode = False السلام عليكم أخي الغزيز فقط أضق الطر المبين بين السطرين المبينين واتمنى أن يكون المطلوب
  22. محي الدين ابو البشر
    السلام عليكم عدة أيام ولم تظهر أي مشاركة للأستاذ ياسر أبو البراء مما أدى إلى تغير الصفحة الأولى في منتدانا القيم هذا أصبح شكلها غريباً بعض الشيء!!!! عسى يكون الأمر خيراً
  23. محي الدين ابو البشر
    السام عليكم اخي الكريم اهلا وسهلا بك في هذا المنتدى الرائع بارك الله بك وبجهودك وبالتوفيق وإلى المزيد من الأفكار
  24. محي الدين ابو البشر
    السلام عليكم ورحمة الله كل عام وأنت بخير و جميع المسلمين و الامة العربية و اعضاء المنتدى بالف خير
  25. محي الدين ابو البشر
    السلام عليكم يار رجل هاي تاني مرة بشوف هيك حلقات تكرارية (بس نسيت المرة الأولى ) بارك الله بك وبجودك أحسنت
×
×
  • اضف...

Important Information

  I accept