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

أبو محمد أشرف

04 عضو فضي
  • Posts

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

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

  • Days Won

    2

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

  1. جزاك الله خيرا أبو أحمد والأخ الكريم apt و لم تتمكن من فعل ذلك أرفق الملف ونحن في الخدمة
  2. رائع أبو حنين والأخ abuthawabh حدد بالضبط من ين تبدأ الطباعة من الخلية كام الى الخلية كام حد المدى المراد طباعته وإن شاء الله تجد المطلوب
  3. الأستاذ عبد الله باقشير جزاك الله خيرا مرورك أسعدني كثيرا وكذلك الشكر موصول للأستاذ الخلوق الحبيب الينا أبو أحمد على مروره وفتحه الموضوع مرة ثانية
  4. رائع دوما أستاذنا الحبيب وجاري تحميل الملف
  5. تفضل أخي iRow = ws.Cells(Rows.Count, 1) _ .End(xlUp).Offset(1, 0).Row يتم التعديل في السطر التالي اما السطر التالي وفيه نحدد ان التكست بوكس 1 هو اساس بداية الادخال بعد مسح البيانات Me.TextBox1.SetFocus
  6. أخي الحبيب رجاء التوضيح أكثر حتى يتسني لي مساعدك أو احد اعضاء المنتدى الكرام
  7. تفضل أخي هل هذا هو المطلوب وكان هناك خطأ في الكود الخاص بي الفورم الأول وتم تصحيحه الكود الخطأ كالتالي Cells(10000, "k").End(xlUp).Offset(1, 0).Value = TextBox9.Value Cells(10000, "j").End(xlUp).Offset(1, 0).Value = TextBox10.Value والصواب Cells(10000, "j").End(xlUp).Offset(1, 0).Value = TextBox9.Value Cells(10000, "k").End(xlUp).Offset(1, 0).Value = TextBox10.Value أبو محمد أشرف.rar
  8. تفضل أخي هل هذا يفي بالمطلوب وتحت أمرك في اي شيء وقد قمت بتفعيل زر الزيادة والنقصان الموجود في الجدول 3 أي في الخلية w1 وكذلك تم تفعيل زر الزيادة والنقصان قي الجدول 1 ووضع معادلة vlookup في الشهادة 1 و3 حتى تعمل الأزرار بنجاح وكنت بصدد وضع كود للقدير عبد المجرب أبو احمد لإيقاف الزر عن العد عند حد معين واظهار رسالة بذلك لكن الوقت لم يسعفني لو حبيت اوضعهولك بلغني شيت كنترول2.rar
  9. السلام عليكم لقد قمت بعمل كود الطباعة ورقة واحدة وكذلك طباعة الكل ولكني الآن مشغول عندما اعود إن شاء الله سأقوم بعمل الباقي لأني مشغول جدا الان شيت كنترول.rar
  10. السلام عليكم ورحمة الله وبركاته أولا : أخي قم بضبط إعدادات اللغة من الويندوز لوحة التحكم ثم قم بضبطها إن لم تفلح جرب الطريقة الثانية جرب هذه الطريقة في محرر الاكواد من قائمة Tools ثم Option من تاب Editor Format ثم Font اختر نوع الخط هذا Courier New (Arabic)
  11. قم بحفظ الملف من النسخة الأصلية بإصدار أقل حتى يفتح على الاصدارات الأخرى دون خلل
  12. الأستاذ المحترم عبد الفتاح كيره جزاك الله خيرا ولا تحرمنا دوما من وجودك بالمنتدى
  13. كنت قد قمت بتصميم هذا الشيت عندما كنت أعمل في إحدى المدارس الخاصة مرتبات.rar
  14. بعد إذن الرائعين احمد عبد الناصر حمادة عمر هذا المرفق فيه الكود الذي كتباه clearcontent.rar clearcontent2.rar
  15. السلام عليكم اخي الحبيب هل هذا هو المطلوب وقد قمت بنقل الشيتات كلها مع صفحة التسجيل كلها في ملف واحد مخازن1.rar
  16. بعد إذن الاستاذ القدير عبد الله باقشير هذا هو الملف بعد ادراج الكود فيه فورم بسيط لادخال تاريخ.rar
  17. رائع استاذ محمد مع التنبيه أن هذا الكود يوضع في حدث الورقة thisworkbook
  18. أرفق الملف وسيتم العمل عليه إن شاء الله
  19. أرفق الملف اخي ليسهل العمل عليه
  20. رائع دوما أستاذنا القدير ونسأل الله أن يمن علينا وعلى اليمن السعيد بالأمن والأمان
×
×
  • اضف...

Important Information