تغيير خصائص الـUserForm والخروج منه بمجرد الضغط خارجة دون الضغط على زر X

[ابو تميم]

أجمل تحياتي إلى أساتذتنا وعلمائنا الأعزاء

في الملف المرفق

عند الضغط على زر ( القائمة ) يظهر لدينا الـUserForm1 كما في الشكل رقم 1 وهنا يجب إغلاق اليوزر فورم بالضغط على زر X ولا يمكن الضغط على أي خلية داخل الورقة النشطة إلا إذا تم إغلاق اليوزر فورم..

المطلوب هنا هو

1. تغيير خصائص اليوزر فورم بحيث يظهر كما في الشكل رقم 2

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

ولكم جزيل الشكر والاحترام

تغيير خصائص اليوزر فورم في الاكسل.rar

[محمد يحياوي]

الاخ الكريم ابو تميم احب اولا ان اناقش المعلومة الاولى و هي انه يمكن العمل على الاوراق و الخلايا و الفورم مفتوح لاحظ الملف

تغيير خصائص اليوزر فورم في الاكسل.rar

[ابو تميم]

أخي الكريم محمد يحياوي

عمل رهيب جدا

ولكن كيف تم ذلك ؟؟؟ هل لك ان تشرح لي ما عملته بالضبط

وأرجو أن تنورني أكثر في خصائص الفورم وما هي الامور التي يمكنني عملها للخروج بفورم رهيب مثلما فعلت انت بالملف أعلاه

والآن ما هي المعلومة الثانية التي تنوي أن تناقشها ... أرجو أن تكون هنالك معلومات ثالثة ورابعة و... الخ في هذا الموضوع

ولك جزيل الشكر والاحترام

[محمد يحياوي]

اخي الكريم بالنسبة للمعلومة الاولى فهذا هو الشرح

بالنسبة للمعلومة الثانية في في هذا المثال

تغيير خصائص اليوزر فورم في الاكسل.rar

[ابو تميم]

أخي الكريم محمد يحياوي

فعلا عمل ممتاز ورهيب للغاية كما أرجو شرح العملية لأنها فعلا أعجبتني

والآن بقي لدينا المعلومة الثالثة في السؤال وهي إخفاء الفورم عند الضغط خارجه في أي خلية في نفس الورقة وعدم تخصيص زر خروج أو إغلاق

ولك جزيل الشكر والاحترام

[محمد يحياوي]

المعلومة الثالثة و عذرا على التاخير للانشغال

اضغط على اي خلية في الورقة

تغيير خصائص اليوزر فورم في الاكسل.rar

[محمد يحياوي]

اخي ابو تميم بالنسبة للشرح هناك بعض الدوال يجب الاستعانة بها موجودة في الموديل (yah) و تم استدعاؤها في الفورم

و هي تصلح لاي فورم

[ابو تميم]

أخي الكريم محمد يحياوي شكرا جزيلا لك

من بعد إذنك تم تعديل الكود لإغلاق اليوزر فورم بمجرد الضغط خارجه و وضعه في ThisWorkbook بدلا من وضعه في كل ورقة لأن ملف العمل عندي يحتوي على 540 ورقة وليس من المنطق أن أقوم بوضع الكود في كل ورقة

من بعد إذنك أستاذي الكريم محمد يحياوي الكود بعد التعديل في ThisWorkbook

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)

UserForm1.Hide

End Sub[/xml]

[/b][/font][/size][/color]

[color=#0000CD][size=5][font=arial,helvetica,sans-serif][b]ولكن أخي العزيز محمد يحياوي مشكلتي في الملف أن الفورم عند إزالة ظهور زر X أصبح هنا يظهر لدينا منطقة بيضاء في الفورم أسفل الأزرار هل هناك حل لإزالة هذه المنطقة البيضاء وظهور الفورم على حدود الأزرار فقط [/b][/font][/size][/color]

[color=#0000CD][size=5][font=arial,helvetica,sans-serif][b]علما أن هذه المنطقة البيضاء تظهر تارة وتختفي تارة أخرى ... ؟؟؟؟!!!!![/b][/font][/size][/color]

[color=#0000CD][size=5][font=arial,helvetica,sans-serif][b]ولك جزيل الشكر والاحترام[/b][/font][/size][/color]