اذهب الي المحتوي
أوفيسنا

حركة جديدة (تجليد الفورم) بابسط الطرق مع اداة Active Skin


الردود الموصى بها

سلمت يداك الأخ والأستاذ الفاضل / شوقى ربيع

جزاك الله كل خير وزادك الله من العلم الكثير والكثير

 

ملحوظة :                 فى المشاركة الاولى  الكود السطر 28                       Application.Visible = True

                             فى المثال العملى نفس السطر   أصبح                      Application.Visible = False 

أنا استخدمت السطر Application.Visible = True   لأنى أريد اختبار الفورم والاكسل متاح أمامى فتم تطبيق الشكل الذى اخترته على الفورم وعلى برنامج الاكسل معا

فكيف يمكن تطبيق الاداة فقط على الفورم فقط دون الاكسل عندما يكون  الاكسل متاحا  تحياتي لك

رابط هذا التعليق
شارك

منتهي الجمال والروعة اخي وحبيي

تقبل الله منا ومنكم صالح الاعمال

تقبل خالص تحياتي

رابط هذا التعليق
شارك

وهل استاذنا الكريم

عند تصميم شكل الفورم بهذا الشكل وبهذه الطريقة الرائعة في برنامجي

يظل شكل الفورم كما هو حتي لو قمت بنقل برنامجي علي جهاز آخر لا يوجد به هذه الاداة

ام يرجع الفورم لشكله العادي لو تم نقل البرنامج الي جهاز آخر

جزاك الله خيرا

رابط هذا التعليق
شارك

مشكوررررررررررررررر

جزاك الله خيرا

 

 

تسلم ايدك استاذ شوقى

 

جزاك الله كل خير

 

 

سلمت يمينك استاذ شوقى ربيع

بارك الله فيك وزادك من علمه

 

 

 

سلمت يداك الأخ والأستاذ الفاضل / شوقى ربيع

جزاك الله كل خير وزادك الله من العلم الكثير والكثير

 

ملحوظة :                 فى المشاركة الاولى  الكود السطر 28                       Application.Visible = True

                             فى المثال العملى نفس السطر   أصبح                      Application.Visible = False 

أنا استخدمت السطر Application.Visible = True   لأنى أريد اختبار الفورم والاكسل متاح أمامى فتم تطبيق الشكل الذى اخترته على الفورم وعلى برنامج الاكسل معا

فكيف يمكن تطبيق الاداة فقط على الفورم فقط دون الاكسل عندما يكون  الاكسل متاحا  تحياتي لك

 

 

 

منتهي الجمال والروعة اخي وحبيي

تقبل الله منا ومنكم صالح الاعمال

تقبل خالص تحياتي

 

 

السلام عليكم عمل جميل بارك الله فيك وزادك علما

 

 

وهل استاذنا الكريم

عند تصميم شكل الفورم بهذا الشكل وبهذه الطريقة الرائعة في برنامجي

يظل شكل الفورم كما هو حتي لو قمت بنقل برنامجي علي جهاز آخر لا يوجد به هذه الاداة

ام يرجع الفورم لشكله العادي لو تم نقل البرنامج الي جهاز آخر

جزاك الله خيرا

السلام عليكم

جزيتم خيرا وبارك الله فيكم على عباراتكم الطيفة

رابط هذا التعليق
شارك

 

سلمت يداك الأخ والأستاذ الفاضل / شوقى ربيع

جزاك الله كل خير وزادك الله من العلم الكثير والكثير

 

ملحوظة :                 فى المشاركة الاولى  الكود السطر 28                       Application.Visible = True

                             فى المثال العملى نفس السطر   أصبح                      Application.Visible = False 

أنا استخدمت السطر Application.Visible = True   لأنى أريد اختبار الفورم والاكسل متاح أمامى فتم تطبيق الشكل الذى اخترته على الفورم وعلى برنامج الاكسل معا

فكيف يمكن تطبيق الاداة فقط على الفورم فقط دون الاكسل عندما يكون  الاكسل متاحا  تحياتي لك

 

للاسف لا يمكن ذلك فهذه الادات تعمل على كلمل الملف يعني الشيت الاكسل واليوزر فورم وحتى محرر الاكواد

هته الاداة مصممة اصلا ل VB6 وليس لل VBA انما قمنا بتركيبها على الاكسل

رابط هذا التعليق
شارك

وهل استاذنا الكريم

عند تصميم شكل الفورم بهذا الشكل وبهذه الطريقة الرائعة في برنامجي

يظل شكل الفورم كما هو حتي لو قمت بنقل برنامجي علي جهاز آخر لا يوجد به هذه الاداة

ام يرجع الفورم لشكله العادي لو تم نقل البرنامج الي جهاز آخر

جزاك الله خيرا

يجب ان تكون الادات مثبة في الجهاز الذي ستنقل له الملف بل سيعطي خطاء لعدم وجود الاداة

ملاحظة ممكن تبرمج ملف دفعي تدرجه مع الملف يقوم بتثبت الادات عند فتح الملف اول مرة

سأحاول برمجة الملف و ارفقه مع  الموضوع

رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information