اذهب الي المحتوي
أوفيسنا

الردود الموصى بها

قام بنشر (معدل)

بسم الله الرحمن الرحيم

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

هل يمكن عمل حماية تلقائية لجميع خلايا المستند بحيث تصبح كل خلية فارغة غير محمية

و لكن بمجرد كتابة أي شيء فيها تصبح محمية بشكل تلقائي وفوري ؟

وحينئذن لا يمكن للمستخدم إجراء أي تعديل إلا من خلال كلمة مرور هل يمكن ذلك ؟؟

أتمنى أن يكون ذلك ممكنا .

تحياتي

تم تعديل بواسطه halwim
قام بنشر

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

أخي الكريم nse ماشاء الله ،، ماكنت أتوقع أن تتحفنا بهذا الكنز في وقت سريع وقياسي ،، شكرا كثيرا لك .

بالنسبة للحماية بعد الكتابة ناجحة 100% وكذلك فك الحماية ، لكن أتمنى أن تكون طريقة فك أو إلغاء الحماية من خلال ظهور صندوق يمكن تعبأته بكلمة المرور بحيث يخرج الصندوق فورا عند محاولة تحرير الخلية التي تم حمايتها بالكود ،

وأعتقد أن الفكرة سوف تتضح أكثر إذا قمت بمشاهدة المرفق الموجود في المشاركة رقم (5) على الرابط التالي :

http://www.officena.net/ib/index.php?act=S...=14&t=11532

تحياتي

  • 2 weeks later...
قام بنشر (معدل)

اخي nse

بارك الله فيك وجزاك الله الف خير

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

وسؤال اخر

كيف احدد خلايا لا تنطبق عليها الحمايه التلقائيه

جزاك الله الف خير ونور الله دربك ورزقك صلاح النيه والذريه

.

تم تعديل بواسطه التحري نون
  • 1 month later...
قام بنشر

اذا كان الكود المرفق يقوم بحماية الخلية

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Locked = False Then

Me.Unprotect Password:="123"

Target.Locked = True

Me.Protect Password:="123", DrawingObjects:=True, Contents:=True, Scenarios:=True

End If

End Sub

كيف اقوم باستثناء بعض الخلايا وامكانية التعديل عليها

  • 1 year later...
قام بنشر
هل من الممكن الحمايه بعد دقيقتين مثلا

نعم يمكن ذ لك

اذا كان الكود المرفق يقوم بحماية الخلية

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Locked = False Then

Me.Unprotect Password:="123"

Target.Locked = True

Me.Protect Password:="123", DrawingObjects:=True, Contents:=True, Scenarios:=True

End If

End Sub

كيف اقوم باستثناء بعض الخلايا وامكانية التعديل عليها

سارفق ملف لشرح ذلك

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

وسؤال اخر

كيف احدد خلايا لا تنطبق عليها الحمايه التلقائيه

جزاك الله الف خير ونور الله دربك ورزقك صلاح النيه والذريه

.

ستجد الاجابة في الشرح الخاص بالسؤال السابق

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

يجب ان تكون عضوا لدينا لتتمكن من التعليق

انشئ حساب جديد

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

سجل حساب جديد

تسجيل دخول

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

سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information