Xima Alfadni قام بنشر أكتوبر 23, 2014 قام بنشر أكتوبر 23, 2014 (معدل) هنالك استفسار بخصوص المشاركة الموجودة على الرابط التالى : http://www.officena....showtopic=48811 الاستاذ الموقر باقشير وللسادة خبراء الاكسيل الافاضل .. باختصار هذا الفورم فيه List ارجوا تبديل مكان labl مكان Textbox ليكون على اليسار و التكست على اليمين .. مع الشرح لعموم الفائدة هل هذا الملف يقبل هذا التعديل ، حيث انى ارى ان هنالك مداخلات كثيرة تطلب تعديلات على نفس هذا الفورم ولا يجاب عليها ! وشكرا تم تعديل أكتوبر 23, 2014 بواسطه Xima Alfadni
ibn_egypt قام بنشر أكتوبر 26, 2014 قام بنشر أكتوبر 26, 2014 (معدل) بعد إذن أستاذنا الفاضل عبدالله باقشير تفضل أخي الكريم أتمني أن يكون الملف المرفق يحتوي على ما تريد وكل ما حدث هو تبديل سطر الكود الخاص بأبعاد ال TextBoxs والخاص بأبعاد ال Labels وذلك في Private Sub UserForm_Activate جعل ابعاد الTextBoxs Move iWgt1 + Frmlft, MyTop, MyWith, iHgt وجعل أبعاد ال Labels Move Frmlft, MyTop, iWgt1, iHgt خالص تحياتي فورم ادخال و تعديل مرن باستخدام اسم نطاق للقائمة.rar تم تعديل أكتوبر 26, 2014 بواسطه ibn_egypt 1
Xima Alfadni قام بنشر أكتوبر 26, 2014 الكاتب قام بنشر أكتوبر 26, 2014 (معدل) الاخ و الاستاذ ابن مصر السلام عليكم نعم هو المقصود و شكرا على المعلومة القيمة لقد طبقتها و حاولت ان اجعل مساحة عرض الليبل نصف عرض مساحة التكست ولكن النتيجة كانت كالمرفقات ارجول التكرم بتصحيحها مع الشرح المبسط + الغاء ملء الشاشة ولكم جزيل على الشكر على جميل اهتمامكم تصحيح فورم.zip تم تعديل أكتوبر 26, 2014 بواسطه Xima Alfadni
ibn_egypt قام بنشر أكتوبر 26, 2014 قام بنشر أكتوبر 26, 2014 (معدل) تفضل أخي الكريم خالص تحياتي Form-Updated.rar تم تعديل أكتوبر 26, 2014 بواسطه ibn_egypt
Xima Alfadni قام بنشر أكتوبر 26, 2014 الكاتب قام بنشر أكتوبر 26, 2014 اشكرك على حسن تعاونك و تجاوبك معى لكن للاسف الملف ما بيفتح معى هل يمكنكم اعادة تحميله بعد اذنك تنسيق 2007 و اكرر شكرى
ibn_egypt قام بنشر أكتوبر 26, 2014 قام بنشر أكتوبر 26, 2014 أخى الفاضل جرب تحميله مرة أخرى فقد قمت بتعديل الملف المرفوع في المشاركة السابقة تحياتى
Xima Alfadni قام بنشر أكتوبر 26, 2014 الكاتب قام بنشر أكتوبر 26, 2014 للاسف اخى حاولت كثير ولكن كل مرة ما بيظبط معى ... هل ممكن تكتب لى الكود بالكامل و انا اضعه في الفورم الاول او تتكرم باعادة تحميل الملف واشكرك على حسن اهتمامك
ibn_egypt قام بنشر أكتوبر 26, 2014 قام بنشر أكتوبر 26, 2014 (معدل) للاسف اخى حاولت كثير ولكن كل مرة ما بيظبط معى ... هل ممكن تكتب لى الكود بالكامل و انا اضعه في الفورم الاول او تتكرم باعادة تحميل الملف واشكرك على حسن اهتمامك بص أخي الفاضل اذا أردت أن تجعل ال Labels نص عرض ال Textboxs قم بتغيير ابعاد ال Labels الموجودة في ال UserForm_Active بدلا من هذا .Move Frmlft, MyTop, (iWgt1 / 2), iHgt بالأبعاد التالية Move Frmlft, MyTop, (MyBox.Width / 2), iHgt وتستطيع أن تجعل ال Labels في الوسط حتى لا تكون بعيدة عن ال Textboxs وذلك بزيادة جزئية ال Frmlft قليلا كالتالي Move Frmlft+50, MyTop, (MyBox.Width / 2), iHgt بخصوص جعل البرنامج ليس بملئ الشاشة ... قم بحذف ال Private Sub UserForm_Initialize كاملا جرب خالص تحياتى تم تعديل أكتوبر 26, 2014 بواسطه ibn_egypt
Xima Alfadni قام بنشر أكتوبر 26, 2014 الكاتب قام بنشر أكتوبر 26, 2014 اخى الموقر اشكر على مجهودك و تعبك معى جزاك الله خير عندما عملت الكود كالتالى ظبط معى .Move Frmlft + 100, MyTop, (MyBox.Width / 2), iHgt اكرر عظيم شكرى و امتنانى
Xima Alfadni قام بنشر أكتوبر 27, 2014 الكاتب قام بنشر أكتوبر 27, 2014 اخى العزيز نظرا لخبرتك في هذا الفورم هل يمكن تعديل طريقة الحذف ليقوم بحذف النطاق المحدد فقط بدلا من حذف السطر باكمله هذا سيكون اكثر فائدة في حالة وجود بيانات اخرى في نفس السطر في انتظار ردكم الكريم وشكرا
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.