الردود والاستفسارات عن دروس الفيجوال بيسك6 والاكسيل ياسر العربي

[ياسر العربى]

ادي مثال يامعلم 

المثال دا بيقولك ان التكست  الواحده من الفيجوال بكل التكست اللي في vba

يعني 254 اضعاف الvba

وصلت الفكرة ولا لا

New folder (4).rar

[إبراهيم ابوليله]

ايوه كده ياريس

الله عليك

شوقنا للمواضيع الجامده دى

على فكره

مع احترامى الكامل لكل الاعضاء

انت استعجلت شويه فى الدرس بتاع ربط الاكسيل

بس على العموم الى اساسا ناوى يتابع هيتابع

ياريت لو تكون فيه نقاط محدده باسماء الدروس

الى هيتم تناولها

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

وياريت طبعا تكون بالتسلسل الى انت تشوفه

فى صالح الموضوع

تقبل تحياتى

[محمد حسن المحمد]

أخي الحبيب ياسر عندما أحاول فتح ملف ربط الإكسيل بالفيجوال بيزك 6 وأشغله يعطيني الآتي:

Microsoft Visual Basic
---------------------------
Compile error:

Can't find project or library
 علماً أنني أعمل على Visual Basic 6 Portable لأنني لم أستطع تحميل Visual Basic 6.0 Enterprise Edition

 ذلك يعني نقص مكتبة  Microsoft Excel 14,0 Object library    

عندي تقبل تحياتي

تم تعديل ديسمبر 29, 2015 بواسطه محمد حسن المحمد

[ياسر العربى]

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

عشان خاطر الاخوة ميفتكروش اني ببخل عنهم بحاجه او ان انا مقصر معاهم

وان شاء الله احاول انظم البنود والعناصر

لك كل الشكر  والتقدير

 

12 دقائق مضت, محمد حسن المحمد said:

أخي الحبيب ياسر عندما أحاول فتح ملف ربط الإكسيل بالفيجوال بيزك 6 وأشغله يعطيني الآتي:

Microsoft Visual Basic
---------------------------
Compile error:

Can't find project or library
 علماً أنني أعمل على Visual Basic 6 Portable لأنني لم أستطع تحميل Visual Basic 6.0 Enterprise Edition

 ذلك يعني نقص مكتبة  Microsoft Excel 14,0 Object library    

عندي تقبل تحياتي

حبيبي ابو يوسف 

تفضل بعمل الاتي

وشغل المشروع بعد كدا وقولي

الملاحظات

[محمد حسن المحمد]

أخي ياسر أعطاني التالي ولم ينفذ المشروع وقد عملت كما أبلغتني حيث وجدت  Microsoft Excel 12,0 Object library

 

---------------------------
Microsoft Visual Basic
---------------------------
Compile error:

User-defined type not defined
---------------------------
موافق   تعليمات   
---------------------------

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

 

[ياسر العربى]

هل من صورة للخطأ عشان احدد لك

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

[محمد حسن المحمد]

الملف ليس لي بل هو لك 

بعد محاولات تجاوزت المكتبة وها أنذا أقف أمام هذا الخطأ الذي ستقوم بعون الله بفك شيفرته. والسلام عليكم

[ياسر العربى]

تأكد انه تم اضافة المكتبة 

تأكد من ان ملف الاكسيل في نفس مسار البرنامج وبنفس الاسم والامتداد

احفظ المشروع ثم افتحه مره اخرى

قم بتحويل الملف لتنفيذي  وشغل الملف التنفيذي 

جرب وابلغني

 

 

وانت تقوم باضافة المكتبة هل من مكتبات اخرى مكتوب بجانبها missing

من اللي متأشر عليهم بعلامة صح

[محمد حسن المحمد]

السلام عليكم 

قلت لك أنه يخبرني بفقدان المكتبة 14 مكتوب بجانبها missing قمت بإلغاء إشارة الصح منها ووضعتها بجانب 12 

ولكن أظنني بحاجة مراجعة ربط الإكسيل مع الفيجوال بيزك 6 وكيفية استدعاء الإكسل علماً أنه ضمن الملف ذاته الذي به الملف التنفيذي فما قمت به هو فك الضغط عنها فقط.

سأعود إلى الحلقة الأولى . 

[ياسر العربى]

ارجو منك محاولة تنزيل النسخة الكاملة حتى تستطيع التعامل مع معظم الادوات 

والمكتبات 

وانا موجود حاول انشاء الملف من الاول من جديد وسيبك من المثال وقم بتطبيقه عندك

وبعد انتهائك من تنفيذه فلتخبرنا بالملاحظات

[عبد العزيز البسكري]

45 دقائق مضت, محمد حسن المحمد said:

السلام عليكم 

قلت لك أنه يخبرني بفقدان المكتبة 14 مكتوب بجانبها missing قمت بإلغاء إشارة الصح منها ووضعتها بجانب 12 

ولكن أظنني بحاجة مراجعة ربط الإكسيل مع الفيجوال بيزك 6 وكيفية استدعاء الإكسل علماً أنه ضمن الملف ذاته الذي به الملف التنفيذي فما قمت به هو فك الضغط عنها فقط.

سأعود إلى الحلقة الأولى . 

لا تقلق سيّدي القدير " محمّد حسن المحمّد " .. الفيجوال بيسك هو الذي بإذن الله في يومٍ ما يصبح لمّا يشاهد " محمّد حسن المحمّد " يضرب رأسه على الجدار ..

فائق إحتراماتي

[إبراهيم ابوليله]

اخى ياسر

انا تنزلت النسخه الكامله

ولكن عندد الحفظ

يحدث الخطأ التالى وتظهر هذه الرساله

وعند الضغط على زر OK

يتم الخروج من البرنامج

ويتم الحفظ

اما عند الضغط على زر CANCEL

يتم الدخول على هذه الشاشه

وتظهر هذه الرساله

ويتم الحفظ ايضا

فهل هناك حل

 

[محمد حسن المحمد]

عبد العزيز البسكري

• 
• عضو محترف
• 
•  749
• 1,058 مشاركات
• Location:بسكرة - الجزائر
• Interests:المطالعة - الاكسل - الأوتوبلاي

 

السلام عليكم ورحمة الله وبركاته

أخي الحبيب عبد العزيز

جزاكم الله خيراً على هذا التشجيع

أدعو الله أن يبقيكم ذخراً

لنا وأن يبارك بكم وبعملكم

أخوكم المحب لكم أبو يوسف

[ياسر العربى]

اخي الغالي ابراهيم

متى تحدث هذه المشكلة عند حفظ اي مشروع عموما ولا مشاريع معينة تحتوي ادوات غير الاساسية

ثانيا لا تقم بتسمية الادوات او الفورم  باللغة العربية لان بعض هذه المشاكل تكون ناتجه عن اللغة 

اذا كانت تظهر عند حفظ اي مشروع حاول تشيل البرنامج وتسطبه تاني

 

[عبد العزيز البسكري]

السّلام عليكم و رحمة الله و بركاته

أستاذي الفاضل " ياسر العربي "

صدّقني .. كل مرّة أقول فيها ستضبط معي .. يطلعلي العكس ..

كل شيء ماشي تمام التمام و الحمد لله ..بفضل الله ثم بفضلك أنت و سلسلة شروحاتك و دروسك ..

بارك الله فيك .. جزاك الله خيرا و زادك من علمه و فضله

إلاّ قضية SKIN ..لحد الأن لم أجد لها حلا إطلاقا .. رغم الملفات التى وضعتها أنتَ هنا بهذا الموضوع .. و رغم كل النصائح و التدابير ..

لم أشاهد هذه SKIN إطلاقا ..

نوّرني ما مشكلتي الله يخليك أخي الغالي ..

[ياسر العربى]

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

بوضوح 

[إبراهيم ابوليله]

اخى ياسر

كما هو واضح من الصوره

اننى لم اضف كود الاخفاء لملف الاكسيل

ولكنى حينما افتح الفورم

لا استطيع مشاهدته

لاحظ ان الفورم مفتوح

والملف غير موجود فى الشريط السفلى

وهذه الصوره ايضا تثبت ان الملف مفتوح

 

 

 

تم تعديل ديسمبر 29, 2015 بواسطه إبراهيم ابوليله

[ياسر العربى]

[إبراهيم ابوليله]

اخى ياسر

انا مش قصدى رؤيه الفورم

انا قصدى انى لسه مكتبتش الكود الخاص

باخفاء ملف الاكسيل

ومع ذلك فلا اراه فى التاسك بار

راجع الصور

 

..............................................

سؤال اخر

كيف اتحكم فى ارتفاع الكومو

مع العلم باننى

قمت حينما اوم بزيادة او نقص الارتفاع من 315

يحدث خطأ

 

[ياسر العربى]

معلش ياعم ابراهيم اسمع كلامي وشوف الامر اللي قولت لك عليه عارف ليه انت لما تعمل الفورم في وضع فكسد

يتم اخفاءه من التاسك بار ولما يبقي فيه ازارا الخروج والماكس مايز والماين والاكس بيظهر عادي

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

وفيه ادوات الvba ممكن تستخدمها لو محتاج نفس ادوات اللي كنت بتستخدمها مع  الاكسيل

لو قصدك ملف الاكسل نفسه 

حط كود اظهاره

وجرب

YXL.Visible = True

تم تعديل ديسمبر 29, 2015 بواسطه ياسر العربى

[إبراهيم ابوليله]

اخى ياسر

والله فعلت الامر زى ما انت قولت

هو انت فاكر يعنى اننا هنقدر نعدل عليك ولا ايه

................................................................

ولكن انتى عايزنى اكتب

احط كود الاظهار

طب ما انا محطتش كود الاخفاء من اساسه

يبقى السؤال

هل من الطبيعى انى بدون ما استخدم كود الاخفاء

يبقى الملف مخفى

ده عادى

ولا ايه

 

[ياسر العربى]

لا عدل يامعلم براحتك

هو انا يعني خلاص معلم فيجوال

المهم من الطبيعي يحدث ذلك

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

[عبد العزيز البسكري]

1 ساعه مضت, إبراهيم ابوليله said:

اخى ياسر

انا مش قصدى رؤيه الفورم

انا قصدى انى لسه مكتبتش الكود الخاص

باخفاء ملف الاكسيل

ومع ذلك فلا اراه فى التاسك بار

راجع الصور

 

..............................................

سؤال اخر

كيف اتحكم فى ارتفاع الكومو

مع العلم باننى

قمت حينما اوم بزيادة او نقص الارتفاع من 315

يحدث خطأ

 

السّلام عليكم و رحمة الله و بركاته

أستاذنا القدير " إبراهيم أبو ليله "

سأجيبك سيّدي الكريم عن الشّطر الثاني من السّؤال .. لأنّي جرّبت العديد من المحاولات بهذا الأمر و حاولت تصغير إرتفاع ولم أفلح .. لكنّي إكتشفت حلاًّ  بسيطًا و هو كلّما قمتَ بتصغير أو تكبير حجم الخط و أنت واقف على الكومبوبوكس سيصغر أو يكبر إرتفاعة هو كذلك تلقائيًا..جرّب ذلك

فائق إحتراماتي

[عبد العزيز البسكري]

السّلام عليكم و رحمة الله و بركاته

لاحظ لو سمحت أستاذي القدير " ياسر العربي " الصّور التي تظهر عند محاولتي تسطيب ال SKIN ..

[إبراهيم ابوليله]

اخى ياسر

لقد قمت بحزف كود استدعاء ملف الاكسيل

من حدث فتح الفورم

وقمت بوضع الكود فى زر

وبعد فتح الفورم قمت بالضغط

على الزر لاستدعاء الملف

فوجدت ان الملف ايضا مخفى

ثم قمت بالضغط على زر اظهار الملف

فتم اظهار الملف

ثم قمت بالضغط على زر اخفاء الملف

فتم اخفاء الملف

سؤال بسيط

ليه استخدمنا

Private Sub Combo1_Click()

Private Sub Combo1_Click()

ومستخدمناش

Private Sub Combo1_Change()

 

تم تعديل ديسمبر 30, 2015 بواسطه إبراهيم ابوليله