الى فرسان الاكسل

[عبد القادر محمد مهدى]

اخوانى الخبراء اريد عمل جماية لكل عمود على حدة بورقة الأسماء

ارجو منكم المساعدة

جزاكم الله خير الجزاء

مرفق الملف

 04 2017.rar

[ليلى الهلالي]

السلام عليكم أخي.

هل المقصود حماية المعادلات أم حماية العمل؟

إذا كان المقصود حماية المعادلات إليك هذا الكود يحمي المعادلات فقط من التغير أو المسح.

Private Sub Worksheet_Selectionchange(ByVal Target As Range)
If Not Intersect(Target, [a1:iv36536]) Is Nothing Then
If Target.HasFormula = True Then ActiveCell.Offset(0, 1).Select
End If
End Sub

[عبد القادر محمد مهدى]

أشكرك أخى الكريم  morestudy

 

اريد حماية المعادلات

وأيضأ اريد ..... حماية العمود "C" وهو عبارة عن أسماء الطلبة وأحيانا اريد فك الحماية لكتابة اسم عير موجود بالعمود

 

[ليلى الهلالي]

السلام عليكم أخي

مرفق ملف العمل بعد عمل المطلوب كذلك تم إرفاق صور لشرح خطوات حماية أعمدة أو صفوف ولكن أولاً عليك تضليل الأعمدة أو الصفوف التي تريد حمايتها فقط ثم اتبع خطوات الشرح.

كلمة السر 123 بإمكانك تغييرها إذا رغبت واتبع خطوات الشرح لتغيير الكلمة.

كذلك أخي بإمكانك أن تطلع على هذا الرابط ستجد في المفيد جداً في هذا الموضوع.

https://www.officena.net/ib/topic/72900-حماية-خلايا-او-نطاق-من-التعديل/

حماية أعمدة.rar

04 2017.rar

تم تعديل أكتوبر 30, 2016 بواسطه morestudy

[عبد القادر محمد مهدى]

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

بارك الله فيك اخى morestudy

وجزاك الله عنى خير الجزاء 

جل جميل ومفيد جداً  وبعد الاطلاع على مشاركة الأخ جلال الجمال_ابو أدهم"  العضو الذهبى

وجدت الحل الدقيق فى مشاركتة ولكن من الصعب على فك الحماية 

اريد أن أتعلم فك الحماية واعادة الحماية فى ملف الأخ جلال الجمال_ابو أدهم" 

مرفق ملف العضو الذهبى جلال الجمال_ابو أدهم"

 

حماية خلايا باسلوب جديد.rar

[ليلى الهلالي]

 

السلام عليكم.

كود الأستاذ جمال في غاية الروعة ولا زلت تلميذة  مبدئة في مجال الأكواد لذا عليك الانتظار حتى يرد عليك الأستاذ جمال في المشاركة التي وضعتها في موضوعه.

تم تعديل أكتوبر 31, 2016 بواسطه morestudy

[عبد القادر محمد مهدى]

أشكرك اخى الكريم على مجودك الرائع

بارك الله فيك