tar70 قام بنشر يوليو 22, 2021 مشاركة قام بنشر يوليو 22, 2021 مطلوب كود لاظهار رسالة عند اختيار خلية محمية فى شيت بعض خلاياه محمية رابط هذا التعليق شارك More sharing options...
عبدالفتاح في بي اكسيل قام بنشر يوليو 22, 2021 مشاركة قام بنشر يوليو 22, 2021 لماذا الكود طالما يمكنك ذلك بعمل حماية تحديد الخلايا رابط هذا التعليق شارك More sharing options...
tar70 قام بنشر يوليو 22, 2021 الكاتب مشاركة قام بنشر يوليو 22, 2021 نعم الخلية محمية وتم عمل كود لجعل الخلية غيى محمية فى حالة ادخال بيانات بخلية اخرى اى عدم ازالة الحماية للخلية الا بعد ادخال بيانات خلية اخرى والمطلوب رسالة توضح الخلية المطلوب ادخال بياناتها حتى تزول حماية الخلية رابط هذا التعليق شارك More sharing options...
tar70 قام بنشر يوليو 22, 2021 الكاتب مشاركة قام بنشر يوليو 22, 2021 مرفق شيت للتوضيح final 1.xlsm رابط هذا التعليق شارك More sharing options...
عبدالفتاح في بي اكسيل قام بنشر يوليو 22, 2021 مشاركة قام بنشر يوليو 22, 2021 ما فائدة ارفاق ملف محمي كيف سنضع لك الكود جرب هذا الكود على حسب ما فهمت Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Intersect(Target, Range("a1:b10")) Is Nothing Then Exit Sub MsgBox "this cell is protected,pleace unprotect it " & Target.Address End Sub 1 رابط هذا التعليق شارك More sharing options...
أفضل إجابة أ / محمد صالح قام بنشر أغسطس 25, 2021 أفضل إجابة مشاركة قام بنشر أغسطس 25, 2021 حسب فهمي للمطلوب يمكنك إضافة هذا الشرط لحدث عن تغير التحديد If Target.Column > 6 And Target.Column < 14 And Target.Row > 2 Then For Each c In Range("f" & Target.Row & ":m" & Target.Row) If Not c.Locked Then MsgBox "يرجى إنهاء أعمال " & Cells(1, c.Column) & " أولا": Exit For Next c End If للعلم يتم جلب قيمة الصف الأول في العمود المسموح بتعديله قبل كلمة أولا بالتوفيق رابط هذا التعليق شارك 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.