morsy515a قام بنشر ديسمبر 23, 2017 مشاركة قام بنشر ديسمبر 23, 2017 مساعدة : حماية نطاق معين من الخلايا بدون حماية ورقة العمل مع عد القدرة على اختيارها vba حماية نطاق من الخلايا.rar رابط هذا التعليق شارك More sharing options...
علي المصري قام بنشر ديسمبر 23, 2017 مشاركة قام بنشر ديسمبر 23, 2017 (معدل) جرب الطريقة التالية Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Column = 6 Then Cells(Target.Row, Target.Column).Offset(0, 1).Select End If End Sub حماية نطاق من الخلايا.rar تم تعديل ديسمبر 23, 2017 بواسطه علي المصري رابط هذا التعليق شارك More sharing options...
سليم حاصبيا قام بنشر ديسمبر 23, 2017 مشاركة قام بنشر ديسمبر 23, 2017 جرب هذا الملف حماية نطاق من الخلايا Salim.rar رابط هذا التعليق شارك More sharing options...
morsy515a قام بنشر ديسمبر 23, 2017 الكاتب مشاركة قام بنشر ديسمبر 23, 2017 شكرا جزيلا استاذ على شكرا جزيلا استاذ سليم من فضلك استاذ على المصرى لو اردت ان اقوم بعمل ذلاك على عمود رقم الجلوس و عمود المجموع كيف ذلك و لو كنت اريد ان اقوم بانشاء جدول و جعل هذا الكود يعمل علي هذا الجدول ما سوف اوقم به رابط هذا التعليق شارك More sharing options...
سليم حاصبيا قام بنشر ديسمبر 23, 2017 مشاركة قام بنشر ديسمبر 23, 2017 59 دقائق مضت, morsy515a said: شكرا جزيلا استاذ على شكرا جزيلا استاذ سليم من فضلك استاذ على المصرى لو اردت ان اقوم بعمل ذلاك على عمود رقم الجلوس و عمود المجموع كيف ذلك و لو كنت اريد ان اقوم بانشاء جدول و جعل هذا الكود يعمل علي هذا الجدول ما سوف اوقم به رداً على هذا السؤال اليك هذا الملف ( عمود رقم الجلوس و عمود المجموع و يعمل علي هذا الجدول ) حماية نطاق من الخلايا Salim1.rar رابط هذا التعليق شارك More sharing options...
علي المصري قام بنشر ديسمبر 23, 2017 مشاركة قام بنشر ديسمبر 23, 2017 59 minutes ago, morsy515a said: شكرا جزيلا استاذ على شكرا جزيلا استاذ سليم من فضلك استاذ على المصرى لو اردت ان اقوم بعمل ذلاك على عمود رقم الجلوس و عمود المجموع كيف ذلك و لو كنت اريد ان اقوم بانشاء جدول و جعل هذا الكود يعمل علي هذا الجدول ما سوف اوقم به أولا شكرا جزيلا استاذ سليم وعلى موضوعاتك التي افادتني كثيرا جزاك الله خيرا بالنسب للرد على السؤال : الجواب كالتالي If Target.Column = 6 Then الرقم 6 هنا هو رقم العمود يمكنك العد من اول عمود A برقم 1 إلى ان تصل للعمود الذي تريده واكتب الرقم بدل الرقم 6 يعني استبدل السطر If Target.Column = 6 Then بالسطر If Target.Column = 3 Or Target.Column = 6 Then رابط هذا التعليق شارك 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.