منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : حماية عمود داخل ورقة الاكسل
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم اخواني لو سمحتم اقوم بتصدير بيانات الدتاجريد الى شيت اكسل
اريد جعل عمود K من الاكسل محمي و لا يقبل التعديل كيف يتم ذلك لو تكرمتم
حاولت بهكذا كود لكن ما ضبطت worlsheet.columns("K:K").Hidden = True
بارك الله فيكم
(29-12-23, 01:57 PM)العيدروس كتب : [ -> ]السلام عليكم اخواني لو سمحتم اقوم بتصدير بيانات الدتاجريد الى شيت اكسل
اريد جعل عمود K من الاكسل محمي و لا يقبل التعديل كيف يتم ذلك لو تكرمتم
حاولت بهكذا كود لكن ما ضبطت worlsheet.columns("K:K").Hidden = True
بارك الله فيكم

جرب
worlsheet.Protect()
worlsheet.Range("A1:Z1000").Style.Locked = False
worlsheet.Range(worlsheet.Cells(1, "K"), worlsheet.Cells(65536, "K")).Locked = True
بارك الله فيك اخ 3sem
جزاك الله كل خير .. تم بالفعل حماية العمود
كود :
' تحديد عمود K وحمايته في ورقة العمل
With Worksheet.Columns("K:K")
   .Locked = True ' قفل العمود
   .Hidden = True ' إخفاء العمود
   .ColumnWidth = 0 ' تحديد عرض العمود بصفر لإخفائه بشكل كامل
End With

' حماية ورقة العمل بكاملها لتفعيل الحماية
Worksheet.Protect("كلمة المرور")