حماية عمود داخل ورقة الاكسل - نسخة قابلة للطباعة

حماية عمود داخل ورقة الاكسل - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : حماية عمود داخل ورقة الاكسل (/showthread.php?tid=47712)

حماية عمود داخل ورقة الاكسل - العيدروس - 29-12-23

السلام عليكم اخواني لو سمحتم اقوم بتصدير بيانات الدتاجريد الى شيت اكسل
اريد جعل عمود K من الاكسل محمي و لا يقبل التعديل كيف يتم ذلك لو تكرمتم
حاولت بهكذا كود لكن ما ضبطت worlsheet.columns("K:K").Hidden = True
بارك الله فيكم

RE: حماية عمود داخل ورقة الاكسل - 3sem - 29-12-23

(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

RE: حماية عمود داخل ورقة الاكسل - العيدروس - 29-12-23

بارك الله فيك اخ 3sem
جزاك الله كل خير .. تم بالفعل حماية العمود

RE: حماية عمود داخل ورقة الاكسل - HALIM ELEULMA - 05-01-24

كود :

' تحديد عمود K وحمايته في ورقة العمل

With Worksheet.Columns("K:K")

    .Locked = True ' قفل العمود

    .Hidden = True ' إخفاء العمود

    .ColumnWidth = 0 ' تحديد عرض العمود بصفر لإخفائه بشكل كامل

End With

' حماية ورقة العمل بكاملها لتفعيل الحماية

Worksheet.Protect("كلمة المرور")