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

أبوســـارة1973

03 عضو مميز
  • Posts

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

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

  • Days Won

    1

كل منشورات العضو أبوســـارة1973

  1. السلام عليكم صباح الخير فليسمح لي الأستاذ بن علية حاجي بالرد النتائج متساوية لأن الثواني والدقائق في جميع خلايا عمود البداية متساوية ( 27:12 ) وكذلك الحال في عمود وقت النهاية ( 52:41) أما بالنسبة للساعات فإنها تزيد ساعة في كل صف بكلا العمودين لذلك ستكون النتائج متساوية جرب تغير الوقت في أحد العمودين وسترى أن النتيجة ستتغير
  2. الأستاذ الكبير عبدالله باقشير عمل رائع ومتميز
  3. أحسنت أخي إبراهيم ابوليله. نعم هذا هو المطلوب ، ولكن لم تضمن الكود الشرط المطلوب وهو عدم السماح بالتكرار أي لا يقبل إدخال قيمة قد تم إدخالها
  4. السلام عليكم جميعاً أنا في بدايتي مع البرمجة في vba Excel وقد صادفت المشكلة التالية : في userform1 من املف المرفق توجد listbox وعند الضغط مزدوجاً على أحد عناصر listbox يقوم بإدخال قيمة العنصر في textbox1 وبقية textboxs من 2- 10 ولكن المطلوب هو أن يقوم بإدخال العنصر من القائمة الذي نضغط عليه مزدوجاً في textbox1 فقط ، وعند الضغط ثانية ( مزدوجا) على عنصر آخر يقوم بإدخاله في textbox2 وهكذا حتي يتم اختيار ما لا يزيد عن عشرة عناصر ، وبشرط عدم التكرار فكيف يكون التعديل على هذا الكود في الملف المرفق ؟ في انتظار ردودكم class.rar
  5. السلام عليكم هل يمكن أن تدلوني على وصلة في هذا المنتدى أو في غيره لملف أكسيل يحتوي على فورم إدجال بيانات الموظفين مع صورة للموظف، وإذا كان بإمكان الأخوة المقتدرين أن ينفذوا لي هذا المطلوب مشكورين. ودمتم في صحة وعافية
  6. الأستاذة أم عبد الله الأستاذ سليم حاصبيا الأستاذ محمد أبو البراء شكرا لكم جميعا
  7. السلام عليكم لو فرضنا أن في العمود الأول القيم التالية 28.25 30.5 44.75 40 والمطلوب في العمود الثاني أن يظهر القيم على النحوالتالي 28.0 30.5 45.0 40 أي يقوم بتحويل المنازل العشرية ( 0.25) إلى نصف (0.50) كما في المثال السابق وتحويل المنزلة العشرية (0.75) إلى 1 فكيف ستكون الدالة هل نستخدم لها دلة roundup ? أرجو أن تكتبوا لي الدالة كاملة مع خالص شكري
  8. شكرا لقد عدلت الكود وهو يعمل 100% جزاك الله خيرا
  9. كيف سيكون التعديل على الكود إذا كنت أريد أن أحدد فقط الخلايا لحد الصف رقم 33 مثلاً بدلاً من كونه حالياً حتى آخر صف في االشيت Lr = Cells(Rows.Count, "B").End(xlUp).Row
  10. السلام عليكم أخي العزيز أرفق ملف الأكسيل ووضح فيه المطلوب لا أحد يعرف ما تريد من الصورة المرفقة
  11. كيف سيكون التعديل على الكود إذا كنت أريد أن أحدد فقط الخلايا لحد الصف رقم 33 مثلاً بدلاً من كونه حالياً حتى آخر صف في االشيت Lr = Cells(Rows.Count, "B").End(xlUp).Row
×
×
  • اضف...

Important Information