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

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


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





طلب مساعدة بخصوص طباعة من يوزر فوورم

حاليا انا صممت يوزر فورم يحتوي على اتنين تكست بوكس 1///2 استخدمت كود الترحيل والطباعة دا انه يرحل على تصميم الفاتورة ..


موضوع مغلق


11-03-2021 02:12 صباحا
معتز محمد
عضو
معلومات الكاتب ▼
تاريخ الإنضمام : 02-02-2020
رقم العضوية : 17916
المشاركات : 4
الجنس : ذكر
تاريخ الميلاد : 21-7-1993
يتابعهم : 0
يتابعونه : 0
قوة السمعة : 12
 offline 

حاليا انا صممت يوزر فورم يحتوي على اتنين تكست بوكس  1///2 



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



Sheet1.Activate

Range("a1").Value = TextBox1.Text
Range("a5").Value = TextBox2.Text


UserForm1.Hide
Sheet1.Activate
Range("a1:a5").PrintPreview


شغال معايا كويس جدا اما بعمل run من داخل الفيجوال بيسك



لكن فوجت اما استخدمت كود اخفاء الشيت وتشفير مشروع الفيجوال بيسك  استخدمت الكود دا لاخفاء الشيت 



Private Sub Workbook_Open()
Application.Visible = False
UserForm1.Show
End Sub


اصبح عند الضغط على الطباعة يتم اخفاء الفورم كما بالكود ولكن لم يتم تحويلى الى معاينه قبل الطباعة 


ويختفى الاكسيل نهائى واغلقه عن طريق task manger


أفضل إجابة مقدمة من salim وهي:
Application.Visible = False
هذه العبارة خطيرة جداً لانها تخفي الExcel بالكامل ولا تخفي الورقة كما تعتقد
عند استعمالها لا يمكنك رؤية برنامج الاكسل حتى ولو قمت بفتح مصنف جديد
اذن انت هنا تخفي الـــ Application التي هي الــ Excel فكيف تطلب الطباعة
عرض الإجابة




11-03-2021 09:44 صباحا
مشاهدة مشاركة منفردة [1]
salim
خبير معتمد
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 22-08-2017
رقم العضوية : 43
المشاركات : 853
الجنس : ذكر
تاريخ الميلاد : 1-5-1989
الدعوات : 1
يتابعهم : 13
يتابعونه : 33
قوة السمعة : 6607
عدد الإجابات: 67
 offline 
look/images/icons/i1.gif طلب مساعدة بخصوص طباعة من يوزر فوورم
Application.Visible = False
هذه العبارة خطيرة جداً لانها تخفي الExcel بالكامل ولا تخفي الورقة كما تعتقد
عند استعمالها لا يمكنك رؤية برنامج الاكسل حتى ولو قمت بفتح مصنف جديد
اذن انت هنا تخفي الـــ Application التي هي الــ Excel فكيف تطلب الطباعة

11-03-2021 03:17 مساء
مشاهدة مشاركة منفردة [2]
معتز محمد
عضو
معلومات الكاتب ▼
تاريخ الإنضمام : 02-02-2020
رقم العضوية : 17916
المشاركات : 4
الجنس : ذكر
تاريخ الميلاد : 21-7-1993
يتابعهم : 0
يتابعونه : 0
قوة السمعة : 12
 offline 
look/images/icons/i1.gif طلب مساعدة بخصوص طباعة من يوزر فوورم

ربنا يبارك في حضرتك تم حل الامر بنجاح شكر ليك 
الامر تم حله عند الضغط على زر الطباعة وضعت الكود الاتى قبل بدء امر الطباعة بالكود 
Application.Visible = true
ووضعت فى نهاية كود الطباعة نفس الامر لكنه اخفاء 

Application.Visible = False
واتحلت المشكلة بحمد لله شاكر جدا لحضرتك على تنبييهي بالامر ربنا يبارك في حضرتك 
 



الكلمات الدلالية
بخصوص ، مساعدة ، يوزر ، فوورم ، طباعة ،


 










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

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