omar elhosseini قام بنشر مارس 7, 2006 مشاركة قام بنشر مارس 7, 2006 السلام عليكم ورحمة الله وبركاته لدى ورقة اكسل بها ماكرو لعمل حماية للورقة واخر لفك الحماية وهما كالاتى : الاول هو- Sub Protect_on() ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios _ :=True End Sub والثانى - Sub Protect_off() ActiveSheet.Unprotect End Sub المطلوب هو كيف اضيف الى كل منهما كلمة سر ولتكن "123" لتعمل بدون ان يطلب البرنامج كلمة السر سواء عند تنفيذ ماكرو الحماية او عند تنفيذ ماكرو فك الحماية ولى طلب اخر هو كيف يمكن حماية ورقة بها حاولى 25 ماكرو من ان يطلع عليها غير مصصم الورقة ولكم جزيل الشكر رابط هذا التعليق شارك More sharing options...
هادى محمد المامون سالم قام بنشر مارس 7, 2006 مشاركة قام بنشر مارس 7, 2006 اخى الكريم : لحمايه الماكرو Tools VBproject Properties Protection ادخل كلمه السؤ التى تريدها السلام عليكم رابط هذا التعليق شارك More sharing options...
هادى محمد المامون سالم قام بنشر مارس 7, 2006 مشاركة قام بنشر مارس 7, 2006 اقصد ادخل كلمه السر التى تريدها رابط هذا التعليق شارك More sharing options...
omar elhosseini قام بنشر مارس 7, 2006 الكاتب مشاركة قام بنشر مارس 7, 2006 شكرا لك الاخ الكريك hs889 شكرا لك اخى تم فعلا حماية اكواد الماكرو من التعديل عليها وكان هذا الجزء الثانى من السؤال اما الجزء الاول من السؤال لأنى اجيد التعامل مع الاكسل ولا اجيد الفجوال بيسك كيف ادرج كلمة السر داخل كود الحماية وكود فك الحماية الموجدوين فى اول المشاركه ارجو من الاخوه الاعضاء او المشرفين الكرماء اجابة طلبى لشدة احتياجى له والسؤال مره اخرى هو : لدى ورقة اكسل بها ماكرو لعمل حماية للورقة واخر لفك الحماية وهما كالاتى : الاول هو- Sub Protect_on() ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios _ :=True End Sub والثانى - Sub Protect_off() ActiveSheet.Unprotect End Sub المطلوب هو كيف اضيف الى كل منهما كلمة سر ولتكن "123" لتعمل بدون ان يطلب البرنامج كلمة السر سواء عند تنفيذ ماكرو الحماية او عند تنفيذ ماكرو فك الحماية ولكم جزيل الشكر رابط هذا التعليق شارك More sharing options...
halwim قام بنشر يوليو 12, 2006 مشاركة قام بنشر يوليو 12, 2006 السلام عليكم ورحمة الله ....... منذ فترة حصلت على ملف فيه حماية من نوع خاص وهذا الملف سبق لي أن حملته من هذا المنتدى وحاليا لا أتذكر موقع الملف لكي أضع الرابط وسوف أقوم بإرفاقه . أرجو التركيز / بعدفتح الملف قم بكتابة أي شيء في العمودين A و C إلى مدى السطر 20 سوف تلاحظ خروج صندوق معنون بـ " إلغاء تأمين النطاق " يطالبك بوضع كلمة المرور . وكلمة المرور السرية هي 123 المطلوب / شرح كيف تم عمل هذا النوع من الحماية بحيث يخرج هذا الصندوق الرائع لكي نكتب فيه كلمة السر ؟؟ بحاجة ملحة لذلك أرجوالتكرم بالشرح أو بيان الطريقة إذا كانت ذاتية ومتاحة ضمن خدمات إكسل. PASSWORD_privacy.rar رابط هذا التعليق شارك More sharing options...
halwim قام بنشر يوليو 14, 2006 مشاركة قام بنشر يوليو 14, 2006 لازلت في انتظار شرح طريقة عمل إلغاء الحماية من خلال خروج رسالة فيها مكان لكتابة الرقم السري كما في الملف المرفق حسب البيان في مشاركتي أعلاه ^^^^^^^ رابط هذا التعليق شارك More sharing options...
halwim قام بنشر يوليو 19, 2006 مشاركة قام بنشر يوليو 19, 2006 للرفع رابط هذا التعليق شارك More sharing options...
omar elhosseini قام بنشر يوليو 19, 2006 الكاتب مشاركة قام بنشر يوليو 19, 2006 بسم الله الرحمن الرحيم الاخ halwim بعد التحية يمكنك عمل ذلك قبل ان تعمل حماية الورقة من قائمة ادوات ثم حماية ثم السماح للمستخدمين بتحرير النطاقات حدد النطاقات التى تريد عدم استخدامها الا فى حالة استخدام كلمة سر خاصة وبعد تحديد هذه النطاقات ضع لها كلمة السر "كلمة مرور النطاق" ثم فى النهاية عمل حماية للورقة تحياتى رابط هذا التعليق شارك More sharing options...
halwim قام بنشر يوليو 19, 2006 مشاركة قام بنشر يوليو 19, 2006 السلام عليكم الأخ تامر شكرا لك شكرا لمرورك ... قد جربت الطريقة التي ذكرت ونجحت.... نجحت 100% شكرا لردك الوافي . رابط هذا التعليق شارك More sharing options...
الردود الموصى بها