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

مجدى يونس

أوفيسنا
  • Content count

    2,253
  • تاريخ الانضمام

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

  • Days Won

    7

مجدى يونس last won the day on October 17

مجدى يونس had the most liked content!

السمعه بالموقع

378 Excellent

عن العضو مجدى يونس

  • الرتبه
    فريق الموقع

Profile Information

  • Gender (Ar)
    ذكر
  • Job Title
    تربية وتعليم معاشات
  • Interests
    بورسعيد مصر

اخر الزوار

3,867 زياره للملف الشخصي
  1. وعليكم السلام ورحمة الله وبركاتة امين
  2. فورم طباعة الفورم بالكامل

    وبارك فيكم والف شكر ووحشنى جميعا
  3. فورم طباعة الفورم بالكامل الفيديو ' لو الثلاثة فيهم بيانات If TextBox1.Value <> "" And TextBox2.Value <> "" And TextBox3.Value <> "" Then 'oاختار لى اخر خلية فى العمود x = Range("o" & Rows.Count).End(xlUp).Row 'اجعل الخلية الاولىمن التكست بوكس رقم 1 Range("o" & x + 1).Value = TextBox1.Value 'اعمل لى ازاحة عمود واحد ولكن فى نفس السطر Range("o" & x + 1).Offset(0, 1).Value = TextBox2.Value 'اعمل لى ازاحة عمودين ولكن فى نفس السطر Range("o" & x + 1).Offset(0, 2).Value = TextBox3.Value 'ارسل لى رسالة بنعم او لا للطباعة d = MsgBox("هل تريد الطباعة ", vbYesNo, "طباعة الفاتورة مع تحيات مجدى يونس ") 'لو المستخدم اختار زر نعم If d = vbYes Then 'اطبع فورم رقم 3 UserForm3.PrintForm 'فرغ البيانات للتكست ال الثلاثة TextBox1.Value = "" TextBox2.Value = "" TextBox3.Value = "" Else 'لو المستخدم اختار زر لا If d = vbNo Then 'فرغ بيانات التكست الثلاثة TextBox1.Value = "" TextBox2.Value = "" TextBox3.Value = "" 'غلق البيانات End If End If Else 'لو لم ادخل بيانات فى التكست الثلاثة ارسل الرسالة التالية MsgBox ("البيانات غير مكتملة") End If End Sub
  4. هل هذا المطلوب لا تنسى تفعيل الماكرو وعند الضغط على الزر ستظهر الرسالة ماكرو.rar
  5. الاخ صالح عند حفظ الملف بطريقة العرض SHOW سيفتح الملف مباشرة بالنسبة للماكرو فعل الماكرو
  6. وعليكم السلام ورحمة الله وبركاتة نتمنى تعديل الاسم للغة العربية حسب قواعد المنتدى ارسل ملف الاكسل بداخلة الكود
  7. برنامج وفكرة ممتازة نتمنى تكون باللغة العربية لان فكرتها تشد انتباه الاطفال بمعنى تنفع تبقئ تعليمى لهم
  8. محفظة اكواد للفورم

    الاخ مجدى لاشين ردا لى سؤالك جرب الدخول على محرر الأكواد عن طريق Alt + F11 قم بالدخول على القائمة Tools ثم References ستظهر لك نافذة بها خيارات وستجد بعض الخيارات في أولها كلمة Missing أي أنها مكتبة مفقودة قم بإزالة علامات الصح من جانب هذه الخيارات فقط من نافذة المشروع اعمل كليك يمين ثم اختر الأمر Insert ثم UserForm لإدراج فورم جديد من صندوق الأدوات Control Box اعمل كليك يمين في مكان فارغ ثم اختر الأمر Additional Controls ابحث عن الخيار Microsoft ListView Control وعلم في المربع بجواره ليتم إدراجه في صندوق الأدوات الآن قم برسم الأداة على الفورم الجديد ثم احفظ المصنف من علامة الحفظ وأخيراً بعد الحفظ قم بحذف الفورم الذي تم إدراجه ، ستظهر لك رسالة اختر منها No الآن قم بتشغيل الفورم الأساسي في الملف ستجد أنه يعمل إن شاء الله ربنا يسهل ويعمل معك
  9. من يربح المليون بتصميم جديد

    الاخوة الزملاء سبق وعملت مسابقة من سيربح المليون على الرابط التالى والرابط التالى التصميم جميل لكن للاسف الملف غير موجود
  10. فورم بحث في تفسير القرآن الكريم والقران الملف 3 صفحات انظر الصور الملف بحث في تفسير القرآن الكريم.
×