أكاديمية الصقر للتدريب

لوحة التميز الأسبوعي
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
أحمد يوسف ali mohamed ali-- لا تميز خلال هذه الفترة YasserKhalil كود بسيط لمعرفة معلومات مهمه عن جهازك - حسام خطاب اكسيل اسئله واجابات


اعلان هنا
ألعاب فلاش أون لاين
أعلن هنا
أعلن هنا
صفحتنا على الفيس بوك
أعلن هنا


أهلا وسهلا بك زائرنا الكريم في أكاديمية الصقر للتدريب، لكي تتمكن من المشاركة ومشاهدة جميع أقسام المنتدى وكافة الميزات ، يجب عليك إنشاء حساب جديد بالتسجيل بالضغط هنا أو تسجيل الدخول اضغط هنا إذا كنت عضواً .





استخدام الفورم فقط

السلام عليكم ورحمة الله وبركاته ،، اريد ظهور الفورم فقط... واخفاء شيت االاكسل وعدم ظهوره اطلاقا. وضعت هذا الكود في Priv ..



17-06-2019 02:45 صباحا
نصر الإيمان
menu_open
عضو ماسي
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 15-02-2018
رقم العضوية : 4397
المشاركات : 332
الجنس : ذكر
تاريخ الميلاد : 29-12-1985
يتابعهم : 8
يتابعونه : 3
قوة السمعة : 750
الاعجاب : 88
 offline 
السلام عليكم ورحمة الله وبركاته ،،
اريد ظهور الفورم فقط... واخفاء  شيت االاكسل وعدم ظهوره اطلاقا.
وضعت هذا الكود في Private Sub Workbook_Open()

Private Sub Workbook_Open()

Application.Visible = False
UserForm_1.Show
End Sub

وتم اخفاء الشيت بنجاح
ولكن عند اظهار النتيجه النهائية تعطي خطآ
MzA2NzU0MQ669

NDUxNDAyMQ373710
جزاكم الله خيرا... ما السبب في ذلك ؟؟
 
 
  استخدام الفورم فقط.rar   تحميل rar مرات التحميل :(7)
الحجم :(54.304) KB





17-06-2019 07:21 صباحا
مشاهدة مشاركة منفردة [1]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 8179
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 19
يتابعهم : 0
يتابعونه : 428
قوة السمعة : 23808
الاعجاب : 2472
 offline 
look/images/icons/i1.gif استخدام الفورم فقط
وعليكم السلام يا دكتور
جرب تعديل مثل هذه الأسطر واستخدم الدالة Val
سأعطيك مثال وكرر مع نفس الأسطر
Me.TextBox20.Value = Format((Me.TextBox6.Value / Me.TextBox34.Value) * 100, "0.0") & "%"


Me.TextBox20.Value = Format((Val(Me.TextBox6.Value) / Val(Me.TextBox34.Value)) * 100, "0.0") & "%"

أثارت هذه المشاركة إعجاب: نصر الإيمان، محمد الدسوقى،



17-06-2019 07:43 صباحا
مشاهدة مشاركة منفردة [2]
نصر الإيمان
menu_open
عضو ماسي
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 15-02-2018
رقم العضوية : 4397
المشاركات : 332
الجنس : ذكر
تاريخ الميلاد : 29-12-1985
يتابعهم : 8
يتابعونه : 3
قوة السمعة : 750
الاعجاب : 88
 offline 
look/images/icons/i1.gif استخدام الفورم فقط
جزاك الله خيرا استاذ ياسر
ظبطت معي ...
هل هناك كود استاذ ياسر لاخفاء الاكسل والاعتماد على الفورم فقط...
حيث انني عند غلق الفورم ..يطلب مني الحفظ او عدم الحفظ...
وعند فتحه مره اخرى تأتي صفحة الاكسل وليس الفورم؟؟؟؟

أثارت هذه المشاركة إعجاب: YasserKhalil،



17-06-2019 02:21 مساء
مشاهدة مشاركة منفردة [3]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 8179
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 19
يتابعهم : 0
يتابعونه : 428
قوة السمعة : 23808
الاعجاب : 2472
 offline 
look/images/icons/i1.gif استخدام الفورم فقط
وجزيت خيراً يا دكتور
أنت بالفعل في الكود وضعت سطر لإخفاء الإكسيل
يمكنك وضع كود للحفظ والإغلاق حتى لا تظهر لك رسالة الحفظ ..

بالمناسبة لا تنسى وضع الكود الذي أخبرت به في أول مشاركة في حدث فتح المصنف

أثارت هذه المشاركة إعجاب: نصر الإيمان،



17-06-2019 06:53 مساء
مشاهدة مشاركة منفردة [4]
محمد الدسوقى
menu_open
خبير
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 22-08-2017
رقم العضوية : 47
المشاركات : 685
الجنس : ذكر
تاريخ الميلاد : 14-10-1973
الدعوات : 63
يتابعهم : 9
يتابعونه : 583
قوة السمعة : 7262
الاعجاب : 356
 offline 
look/images/icons/i1.gif استخدام الفورم فقط
أخى الكريم ... اتفضل
-----------------
يمكن وضع الأكواد التالية فى حدث المصنف عند الفتح وقبل الاغلاق

الأول عند فتح الملف يقوم بالدخول على اليوزرفورم مباشرة دون المرور على الاكسيل
Private Sub Workbook_Open()
Application.Visible = False
UserForm_1.Show
End Sub



الكود الثانى قبل الخروج من الملف يقوم بالحفظ تلقائيا
ويفضل فى هذه الحالة ادراج زر إغلاق على اليوزرفورم ؛ حتى يتم امر الخروج من خلاله
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.DisplayAlerts = False
ThisWorkbook.Save
End Sub

 

أثارت هذه المشاركة إعجاب: ali mohamed ali، نصر الإيمان، YasserKhalil،



17-06-2019 07:40 مساء
مشاهدة مشاركة منفردة [5]
ali mohamed ali
menu_open
مشرف على منتدى الاكسيل
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 20-11-2017
رقم العضوية : 1757
المشاركات : 1396
الدولة : مصر
الجنس : ذكر
الدعوات : 1
يتابعهم : 0
يتابعونه : 57
قوة السمعة : 6339
الاعجاب : 964
 offline 
look/images/icons/i1.gif استخدام الفورم فقط
بارك الله فيك استاذ محمد وجزاك الله كل خير

أثارت هذه المشاركة إعجاب: محمد الدسوقى،


توقيع :ali mohamed ali
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]
ساهم دائماً فى حل أى مشكلة او أستفسار لديك مع إضافة رد بشكره
أو دعوة لمن قدم اليك المساعدة,فالجميع هنا يعمل على مساعدة
 الاخرين لوجه الله وان تحتسب له اجر عند الله

17-06-2019 08:40 مساء
مشاهدة مشاركة منفردة [6]
نصر الإيمان
menu_open
عضو ماسي
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 15-02-2018
رقم العضوية : 4397
المشاركات : 332
الجنس : ذكر
تاريخ الميلاد : 29-12-1985
يتابعهم : 8
يتابعونه : 3
قوة السمعة : 750
الاعجاب : 88
 offline 
look/images/icons/i1.gif استخدام الفورم فقط
المشاركة الأصلية كتبت بواسطة: YasserKhalil
وجزيت خيراً يا دكتور
أنت بالفعل في الكود وضعت سطر لإخفاء الإكسيل
يمكنك وضع كود للحفظ والإغلاق حتى لا تظهر لك رسالة الحفظ ..

بالمناسبة لا تنسى وضع الكود الذي أخبرت به في أول مشاركة في حدث فتح المصنف


تظهر رسالة  خطآ  استاذ ياسر عندما وضعت الكود الذي اخبرتني به ؟؟؟
لمشاهدة الروابط يلزمك التسجيل في أكاديمية الصقر للتدريب
 
 
  يوزر فورم.rar   تحميل rar مرات التحميل :(4)
الحجم :(38.513) KB





17-06-2019 09:39 مساء
مشاهدة مشاركة منفردة [7]
نصر الإيمان
menu_open
عضو ماسي
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 15-02-2018
رقم العضوية : 4397
المشاركات : 332
الجنس : ذكر
تاريخ الميلاد : 29-12-1985
يتابعهم : 8
يتابعونه : 3
قوة السمعة : 750
الاعجاب : 88
 offline 
look/images/icons/i1.gif استخدام الفورم فقط
جزاك الله خيرا استاذ ياسر
جزاك الله خيرا استاذ محمد الدسوقي
بارك الله فيكم دمتم بكل خير ومودة81

--------------------------
وضعت زر في صفحة النتيجه النهائية  للعودة مره اخرى لإعادة الإختبار 
ولكن يحدث خطآ ؟؟؟؟
هذا معناه ان المستخدم بعد الإختبار يغلف الملف ويقوم بفتحه مره أخرى!!!
فهل يمكن تكرار الإختبار دون غلق الملف؟؟




17-06-2019 11:18 مساء
مشاهدة مشاركة منفردة [8]
محمد الدسوقى
menu_open
خبير
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 22-08-2017
رقم العضوية : 47
المشاركات : 685
الجنس : ذكر
تاريخ الميلاد : 14-10-1973
الدعوات : 63
يتابعهم : 9
يتابعونه : 583
قوة السمعة : 7262
الاعجاب : 356
 offline 
look/images/icons/i1.gif استخدام الفورم فقط
وجزاكم الله خيرا دكتور / نصر
يمكن عمل طلبكم الأخير وذلك باضافة زر   CommandButton1 فى اليوزرفورم للنتيجة النهائية  ( زر عودة أو جديد أو .. )
بالضغط عليه يتم الانتقال إلى يوزرفورم الدخول للبدء من جديد
ويمكن وضع الكود التالى فى حدث هذا الزر CommandButton1_Click

Private Sub CommandButton1_Click()
Application.Visible = False
Unload Me
UserForm_1.Show  '  اسم اليوزرفورم المراد البدء به كل مرة
End Sub

أثارت هذه المشاركة إعجاب: نصر الإيمان، YasserKhalil،



20-06-2019 04:45 صباحا
مشاهدة مشاركة منفردة [9]
نصر الإيمان
menu_open
عضو ماسي
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 15-02-2018
رقم العضوية : 4397
المشاركات : 332
الجنس : ذكر
تاريخ الميلاد : 29-12-1985
يتابعهم : 8
يتابعونه : 3
قوة السمعة : 750
الاعجاب : 88
 offline 
look/images/icons/i1.gif استخدام الفورم فقط
جزاك الله خيرا استاذ محمد بارك الله فيك

أثارت هذه المشاركة إعجاب: محمد الدسوقى، YasserKhalil،





المواضيع المتشابهه
عنوان الموضوع الكاتب الردود الزوار آخر رد
حصرياً جلب قاعدة بيانات المدارس بنقرة واحدة باستخدام البرمجة داخل الإكسيل YasserKhalil
87 8279 YasserKhalil
جلب البيانات الانتخابية للعامل بالرقم القومي باستخدام VBA sameh_lotfy
14 176 YasserKhalil
ارسم شعار بأشكال باستخدام البرمجة داخل الإكسيل (موضوع ترفيهي) YasserKhalil
12 1296 YasserKhalil
فورم لحساب التكاليف للمنتج بالضريبة باستخدام الدالة VLOOKUP مجدى يونس
2 80 مجدى يونس
شرح كيفية تنسيق فورم مع استخدام العدسة المكبرة للكمبيوتر magnifier فيديو 1 مجدى يونس
7 430 مجدى يونس

الكلمات الدلالية
الفورم ، استخدام ،


 







اخلاء مسئولية: يخلى منتدى أكاديمية الصقر للتدريب مسئوليته عن اى مواضيع او مشاركات تندرج داخل الموقع ويحثكم على التواصل معنا ان كانت هناك اى إنتهاكات تتضمن اى انتهاك لحقوق الملكية الفكرية او الادبية لاى جهة - بالتواصل معنا من خلال نموذج مراسلة الإدارة .وسيتم اتخاذ الاجراءات اللازمة.
سياسة النشر: التعليقات المنشورة لا تعبر عن رأي منتدى أكاديمية الصقر للتدريب ولا نتحمل أي مسؤولية قانونية حيال ذلك ويتحمل كاتبها مسؤولية النشر.

الساعة الآن 09:52 صباحا

أعلن هنا
أعلن هنا
أعلن هنا