طاهر محمد قام بنشر نوفمبر 10, 2015 مشاركة قام بنشر نوفمبر 10, 2015 السلام عليكم ورحمة الله وبركاته اساتذتي الكرام هل هناك امكانية بأن نحمي بيانات الشيت المرفق بشكل تلقائي بمعني ان اي خليه يكتب بها بيانات يتم حمايتها تلقائيا وتصبح غير قابله للتعديل الا بعد فك الحمايه ( حيث تظهر رساله عند محاولة المسح او التعديل تفيد ادخال كلمة سر للتعديل او المسح) ويتم حمايتها مره اخري بعد تعديلها والخروج منها Book1.zip رابط هذا التعليق شارك More sharing options...
Yasser Fathi Albanna قام بنشر نوفمبر 10, 2015 مشاركة قام بنشر نوفمبر 10, 2015 Private Sub Worksheet_Change(ByVal Target As Range) If Me.[T1] Then Exit Sub If Not Application.Intersect(Target, Range("Yasser")) Is Nothing Then Application.EnableEvents = False Application.Undo Application.EnableEvents = True MsgBox "It is not your right to make any adjustment without reference to the Engineer / Yasser Fathi Al-Banna " End If End Sub السلام عليكم أخى الكريم هل تريد مثل المرفق ضع هذا الكود فى حدث الشيت ثم إتبع الخطوات التالية إفتح قائمة formulas ثم Name Manager ثم إختار New Name وأكتب فى الخانة Name وليكن إسم اخوك كما بالكود Yasser ثم أمام الخانة Refers To حدد الخلايا المراد حمايتها ثم إضغط OK ثم Close وجرب Book1.rar 4 رابط هذا التعليق شارك More sharing options...
عبد العزيز البسكري قام بنشر نوفمبر 10, 2015 مشاركة قام بنشر نوفمبر 10, 2015 السّلام عليكم و رحمة الله و بركاته ألف شكر أستاذنا الفاضل "ياسر فتحي البنّا" حل أكثر من رائع من أستاذ أروع بارك الله فيك جزاك الله خيرًا و زادها بميزان حسناتك تحياتي رابط هذا التعليق شارك More sharing options...
سليم حاصبيا قام بنشر نوفمبر 11, 2015 مشاركة قام بنشر نوفمبر 11, 2015 انسخ هذا الكود الى حدث الصفحة Private Sub Worksheet_Change(ByVal Target As Range) With ActiveSheet .Unprotect .Cells.Locked = True .Cells.SpecialCells(xlCellTypeBlanks).Locked = False .Protect End With End Sub 2 رابط هذا التعليق شارك More sharing options...
طاهر محمد قام بنشر نوفمبر 11, 2015 الكاتب مشاركة قام بنشر نوفمبر 11, 2015 (معدل) السلام عليكم ورحمة الله وبركاته في البداية اود ان اشكر كل من استاذي م/ ياسر فتحي البنا & ا ستاذ المعلم / سليم حاصبيا علي تفاعلهم مع المشاركة بالنسبة لكود ا/ سليم هذا هو تخيلي وطلبي بالفعل ولكن الحمايه بدون رقم سري مما يمكن الغير من العبث بمحتويات الشيت فهل من الممكن ان تظهر input massge عند محاولة التعديل تفيد بادخال الرقم السري لكي يتم التعديل (الحماية برقم سري) تم تعديل نوفمبر 11, 2015 بواسطه طاهر محمد رابط هذا التعليق شارك More sharing options...
سليم حاصبيا قام بنشر نوفمبر 11, 2015 مشاركة قام بنشر نوفمبر 11, 2015 تم التعديل جسب الطلب protect_non_empty.zip 1 رابط هذا التعليق شارك More sharing options...
Yasser Fathi Albanna قام بنشر نوفمبر 11, 2015 مشاركة قام بنشر نوفمبر 11, 2015 44 دقائق مضت, سليم حاصبيا said: تم التعديل جسب الطلب protect_non_empty.zip اخى الحبيب أ / سليم سلمت يمينك 2 رابط هذا التعليق شارك More sharing options...
مصطفى محمود مصطفى قام بنشر نوفمبر 12, 2015 مشاركة قام بنشر نوفمبر 12, 2015 في ١١/١١/٢٠١٥ ٢:٠٨:١٩, م / ياسر فتحى البنا said: formulas السلام عليكم استاذ سليم عمل كفوء جدا وراقي لكن لايعمل مع الخلايا المدمجة هل يمكن جعله يعمل مع الخلايا المدمجة شكرا لتعاونكم معنا السلام عليكم استاذ سليم عمل كفوء جدا وراقي لكن لايعمل مع الخلايا المدمجة هل يمكن جعله يعمل مع الخلايا المدمجة شكرا لتعاونكم معنا رابط هذا التعليق شارك More sharing options...
سليم حاصبيا قام بنشر نوفمبر 12, 2015 مشاركة قام بنشر نوفمبر 12, 2015 الخلايا المدمجة مشكلة بحد ذاتها بالنسبة لكود ال Vba لعدم الوقوع في هذا الغخ ينصح عدم استعمال الخلايا المدمجة (استبدالها من خلال Center Across Selection) 1 رابط هذا التعليق شارك More sharing options...
أبو أنس80 قام بنشر نوفمبر 24, 2015 مشاركة قام بنشر نوفمبر 24, 2015 بارك الله فيكم جميعا رابط هذا التعليق شارك More sharing options...
قيس111 قام بنشر نوفمبر 25, 2015 مشاركة قام بنشر نوفمبر 25, 2015 بالنسبه للموضوع جيد وبارك الله في جميع من قام بالعمل هنا فجزاكم الله خير أما أنا أحتاج فعلا هذا الكود ولكن لم أستطع أستخدامه بالخلايا المدمجه واتمنى مساعدتي لأن جميع الملفات أكسل الموجوده معي توجد بها خلايا مدمجه ولدي أكثر من ورقه في الملف أرجو مساعدتي ... تمنياتي للجميع بالتوفيق رابط هذا التعليق شارك More sharing options...
قيس111 قام بنشر ديسمبر 8, 2015 مشاركة قام بنشر ديسمبر 8, 2015 لا توجد ردود رابط هذا التعليق شارك More sharing options...
zizo1974 قام بنشر أبريل 9, 2016 مشاركة قام بنشر أبريل 9, 2016 السلام عليكم اعزائى استفدت جدا من مداخلتكم و لكن هل يمكن ان يتم الحماية بوقت على سبيل المثال بعد ساعة او بعد يوم مثلا بدلا من اغلاق الخلية بعد الكتابة مباشره رابط هذا التعليق شارك More sharing options...
أبوعيد قام بنشر أبريل 10, 2016 مشاركة قام بنشر أبريل 10, 2016 وعليكم السلام أهلا بك في منتدى أوفيسنا وأرجو أن تجد فيه حلا لكل مشاكل البرمجة أولا أخي وكما هو المعمول به في المنتدى أرجو أن تكتب اسم ظهورك zizo1974 باللغة العربية كما هو المعمول به في هذا الصرح العلمي حتى يسهل التعامل معك ثانيا : توضيحا لطلبك في الأعلى هل تريد أن الخلية يتم أغلاقها بعد فترة معينة ( ساعة أو يوم ) بعد عملية التعديل ؟ لاحظ معي لنفترض أننا ضبطنا الكود على أنه يغلق الخلية بعد ساعة من التعديل ولنفترض أن المستخدم قام في الساعة 2:00 بتعديل الخلية فإن الكود سيسمح للمستخدم بالتعديل على الخلية حتى الساعة 3:00 ولكن لو قام المستخدم بالتعديل على الخلية الساعة 2:30 فإن الكود سيسمح له بالتعديل حتى الساعة 3:30 إذن حتى يتجنب المستخدم اغلاق الخلية سيعدل فيها قبل انتهاء الساعة بدقائق حتى تحسب له ساعة أضافية هذه هي المشكلة!!!!! رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.