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

انا ضفت كل الميديا الى لاقيتها عندى

تم التعديل

خطأ اثناء فتح الملف

اخى ياسر تم التعديل كما تفضل كما تم اضافة فورم جديد ............................................... باقى الدرس الاخير ان شاء الله اتعلم محتوى الدرس جيدا ثم يتم اضافته اى المشروع ........................................... تقبل تحياتى VB6.rar

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

اخى ياسر تم التعديل كما تفضل كما تم اضافة فورم جديد تقبل تحياتى

اخى ابوعيد بارك الله فيك كود جميل واجابه موفقه تقبل تحياتى

اخى قم بتعديل السطر الاتى .Cells(1, c).Value = Me.Controls(Ad).Value الى .Cells(iNx, c).Value = Me.Controls(Ad).Value فى زر التعديل تقبل تحياتى

اخى ياسر ممكن توضيح بسيط Dim strPassword As String strPassword = "01097192367" YXL.Workbooks.Open App.Path & "/aseel.xlsx", UpdateLinks:=0, Password:="" & strPassword & "" PASSWORD:="" هل هنا يتم حزف الباسورد ام ماذا وايه الفرق بين الكود بتاعك والكود الاتى Dim NAME As String NAME = Text5.Text YXL.Workbooks.Open App.Path & "\" & NAME, Password:=Text6

المفروض الملف محمى برقم سرى 123 انا نزلت المرفق عندى وفتكيت الضغط واشتغل عادى

تم التعديل تم جعل فك حماية الملف تكون من داخل الفيجوال جرب المرفق تقبل تحياتى VBA.rar

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

اخى ياسر اخوانى الافاضل ده المشروع بتاعى وان شاء الله يتم تنفيذ الدرس الاخير ولكن بعد مشاهدته لاننى حتى الان لم استطع التطرق له بسبب مشاكل الانترنت تقبلوا تحياتى VBA.rar

فعلا البرنامج تقريبا شغال معايا كويس فيه مشاكل بسيطه ولكن فى النهايه قم باداء جميع الدروس بنجاح والحمد لله ................................ ويندوز اكس بى اوفيس 2010 تقبلوا تحياتى

برنس

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

اخى ياسر لقد قمت بحزف كود استدعاء ملف الاكسيل من حدث فتح الفورم وقمت بوضع الكود فى زر وبعد فتح الفورم قمت بالضغط على الزر لاستدعاء الملف فوجدت ان الملف ايضا مخفى ثم قمت بالضغط على زر اظهار الملف فتم اظهار الملف ثم قمت بالضغط على زر اخفاء الملف فتم اخفاء الملف سؤال بسيط ليه استخدمنا Private Sub Combo1_Click() Private Sub Combo1_Click() ومستخدمناش Private Sub Combo1_Change()

اخى ياسر والله فعلت الامر زى ما انت قولت هو انت فاكر يعنى اننا هنقدر نعدل عليك ولا ايه ................................................................ ولكن انتى عايزنى اكتب احط كود الاظهار طب ما انا محطتش كود الاخفاء من اساسه يبقى السؤال هل من الطبيعى انى بدون ما استخدم كود الاخفاء يبقى الملف مخفى ده عادى ولا ايه

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

اخى ياسر كما هو واضح من الصوره اننى لم اضف كود الاخفاء لملف الاكسيل ولكنى حينما افتح الفورم لا استطيع مشاهدته لاحظ ان الفورم مفتوح والملف غير موجود فى الشريط السفلى وهذه الصوره ايضا تثبت ان الملف مفتوح

اخى ياسر انا تنزلت النسخه الكامله ولكن عندد الحفظ يحدث الخطأ التالى وتظهر هذه الرساله وعند الضغط على زر OK يتم الخروج من البرنامج ويتم الحفظ اما عند الضغط على زر CANCEL يتم الدخول على هذه الشاشه وتظهر هذه الرساله ويتم الحفظ ايضا فهل هناك حل

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

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

اخى ياسر مثلا انا كنت صممت برنامج على vba يقوم بادخال بيانات البرنامج عباره عن 6 اعمده كل عمود يحتوى على 150تيكست بوكس يعنى فى النهايه كان عندى حوالى 1000كنترول على الفورم طبعا دلوقتى مع فيجوال6 يستحيل عمل مثل هذا البرنامج صح ولا ايه