يوسف عطا قام بنشر يونيو 30, 2009 مشاركة قام بنشر يونيو 30, 2009 (معدل) للتوضيح أيها الأفاضل عملت برنامج كونترول الدور الثانى يحتوى على الصفحة الرئيسية ( بها زراير مربوطة بماكرو للصفحات الأخرى ) صفحة البيانات الخاصة بالمدرسة صفحة الرصد على السرى صفحة النتيجة وبها كل بيانات الطلاب وأرقام الجلوس والسرى والدرجات التى يتم رصدها فى صفحة الرصد على السرى وقمت بوضع باسوورد لهذه الصفحة فلا تظهر بياناتها إلا بالباسوورد صفحة الشهادات وقمت بإخفاء علامات تبويب الأوراق المشكلة أن الملف عندما يغلق يفتح على الشيت الذى كان مفتوحاً قبل اغلاق الملف آخر مرة فإذا تم إغلاق الملف على الشيت المحمى فعندما يفتحه شخص ما من جديد لا يجد أمامه إلا رسالة الباسوورد ولو لم يكتبها صحيحة لا يستطيع فتح أى شيت بالملف رغم أن باقى الشيتات ليست محمية بباسوورد ويتم فتحها عادى ولكنها بالطبع مخفية عن طريق إخفاء علامات تبويب الأوراق المطلوب أحد الحلين التاليين كما أتصور أولاً وضع زر فى الصفحة المحمية بباسوورد بحيث من لا يعرف الباسوورد يضغط عليه فيفتح له الصفحة الرئيسية ومنها يستطيع الذهاب لأى شيت يريد ثانيا كود يجعل الصفحة الرئيسية للملف دائماً ظاهرة دائماً حتى فى حالة إستخدام خاصية إخفاء علامات تبويب الأوراق من قائمة أدوات ثم خيارات ثم عرض هل هذا ممكن ؟؟ سواء الحل الأول أو الثانى أعتقد أن أحدهما يحل المشكلة شاكر لكم الأفضال يا مبدعى المنتدى الأفاضل بالطبع سأقوم برفع البرنامج فى موضوع مستقل بمجرد حل المشكلة تم تعديل يونيو 30, 2009 بواسطه يوسف عطا رابط هذا التعليق شارك More sharing options...
احمدزمان قام بنشر يونيو 30, 2009 مشاركة قام بنشر يونيو 30, 2009 السلام عليكم Sub auto_open() sheets(1).select end sub هذا الكود سوف يفتح الملف على اول ورقة موجودة في الملف ايا كان اسمها رابط هذا التعليق شارك More sharing options...
أبو عادل قام بنشر يونيو 30, 2009 مشاركة قام بنشر يونيو 30, 2009 جزاك الله كل خير اخي احمد على كل شيء تقدمه لإخوانك رابط هذا التعليق شارك More sharing options...
احمدزمان قام بنشر يونيو 30, 2009 مشاركة قام بنشر يونيو 30, 2009 اخي mfawaz جزاك الله كل خير وبارك الله فيك رابط هذا التعليق شارك More sharing options...
يوسف عطا قام بنشر يونيو 30, 2009 الكاتب مشاركة قام بنشر يونيو 30, 2009 الف شكر أستاذ أحمد ربنا يبارك فيك رابط هذا التعليق شارك More sharing options...
يوسف عطا قام بنشر يونيو 30, 2009 الكاتب مشاركة قام بنشر يونيو 30, 2009 للأسف ولا أدرى ما السبب قمت بنسخ الكود ولكنه لم يعمل معى أعتقد أننى أخطأت فى طريقة وضع الكود ولكنى لا أعرف بالضبط ياليت مساعدة أخرى من عطفك أحمد بك رابط هذا التعليق شارك More sharing options...
احمدزمان قام بنشر يوليو 1, 2009 مشاركة قام بنشر يوليو 1, 2009 السلام عليكم اخي يوسف عطا جرب المرفق بداخلة الكود OpenFileAtPage1.rar رابط هذا التعليق شارك More sharing options...
يوسف عطا قام بنشر يوليو 1, 2009 الكاتب مشاركة قام بنشر يوليو 1, 2009 الله ينور عليك أحمد بك يعقوب أنا كونت بحط الكود فى الووركشيت علشان كدة مادانيش نتيجة لكن لاحظت إن حضرتك حاطط الكود فى الموديول ولما عملت كدة تمت العملية بنجاح عندى إستفسار لو تكرمت هل يمكن وضع كود معين يقوم بعمل معين فى شيت معين ليقوم بنفس العمل فى شيت آخر داخل نفس المصنف ؟؟ وكيف يتم ذلك ؟؟ الف شكر مرة أخرى رابط هذا التعليق شارك More sharing options...
احمدزمان قام بنشر يوليو 1, 2009 مشاركة قام بنشر يوليو 1, 2009 السلام عليكم وهذه صيغة الكود الذي يعمل مع WORKBOOK Private Sub Workbook_Open() Sheets(1).Select End Sub اما الجزء الثاني لم افهمه ممكن توضح اكثر جزاك الله كل خير لماذا لأنه هنا يختلف صيغة الكود حسب ماتريد عملة بالضبض فـ يمكنك ان تشير الى مجال معين في ورقة اخرى باستخدام اسم الورقة و المجال SHEETS(1).RANGE("A1:C11") وغير ذلك طرق اخرى يوجد شرح لذلك من طرف الأستاذ الفاضل القدير هادي سالم - راجع مشاركاته رابط هذا التعليق شارك More sharing options...
يوسف عطا قام بنشر يوليو 1, 2009 الكاتب مشاركة قام بنشر يوليو 1, 2009 علم وجارى المراجعة عزيزى الغالى أحمد بك يعقوب الف شكر لإهتمامك تقبل تحياتى رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان