سلام عليكم عندي كم سؤال اتمنة تجاوبني بمقطع الفيديو سؤال الاول كيف وضع حد اقصى للبيانات مع رسالة تنبيه داخل يوزر فورم فيجول بيزك اكسل سؤال الثاني كيف تكتب داخل TextBox من رقم 0 الى رقم 100فقط مع رسالة تنبيه داخل يوزر فورم فيجول بيزك اكسل سؤال الثالث كيف تعمل زر commandButton1 تحذف جميع البيانات Sheet و commandButton2 استرجاع جميع البيانات sheet داخل يوزر فورم فيجول بيزك اكسل
بعد اذن الاخ عماد اخي الكريم في حدث التغير لمربع الادخال اكتب الكود ده If textbox1.value ›100 then Msgbox " لقد تجاوز الحد المسموح به" End if وبالنسبة للحذف جميع البيانات في الورقة ، نكتب الكود ده في الزر sheet1.cells.clear وبالنسبة لتراجع ، نكتب الكود ده في الزر التاني Sheet1.application.undo نفعنا الله وإياكم جميعا
معلومات قيمة جدا 👍🏻👍🏻👍🏻👍🏻👍🏻👍🏻
جزاك الله خيراً وبارك الله فيك
جزاكم الله كل خير
جزاك الله خيراً وبارك الله فيك اخي الكريم
متشكر جدا
تحت امرك
@@Emad_ghazi تسلم بارك الله فيك
بعد اذن حضرتك لو ملف العمل يكون مضغوط يكون افضل لان احيانا كتير ملف الاكسيل لا يعمل او تالف ❤
حاضر
استاذ عماد
لو عامل فورم يرحل الي شيت اكسل
وبعد كده
عايذ الصفحه تتحول الي pdf عشان ارسلها علي الاوت لوك ازاي افتح الاوت لوك من الفورم وارسل pdf
ان شاء الله
سلام عليكم
عندي كم سؤال اتمنة تجاوبني بمقطع الفيديو
سؤال الاول كيف وضع حد اقصى للبيانات مع رسالة تنبيه داخل يوزر فورم فيجول بيزك اكسل
سؤال الثاني كيف تكتب داخل TextBox من رقم 0 الى رقم 100فقط مع رسالة تنبيه داخل يوزر فورم فيجول بيزك اكسل
سؤال الثالث كيف تعمل زر commandButton1 تحذف جميع البيانات Sheet و commandButton2 استرجاع جميع البيانات sheet
داخل يوزر فورم فيجول بيزك اكسل
بعد اذن الاخ عماد
اخي الكريم
في حدث التغير لمربع الادخال اكتب الكود ده
If textbox1.value ›100 then
Msgbox " لقد تجاوز الحد المسموح به"
End if
وبالنسبة للحذف جميع البيانات في الورقة ، نكتب الكود ده في الزر
sheet1.cells.clear
وبالنسبة لتراجع ، نكتب الكود ده في الزر التاني
Sheet1.application.undo
نفعنا الله وإياكم جميعا