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

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

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

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

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

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

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

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

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

تحياتي

تم تعديل بواسطه 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

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

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

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

وسؤال اخر

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

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

.

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

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

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

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

Important Information