วิธีป้องกันการลบแถวหรือคอลัมน์ในสมุดงานที่แชร์ที่ไม่มีการป้องกัน
เมื่อคุณแชร์เวิร์กบุ๊กกับผู้อื่นคุณจะป้องกันไม่ให้ผู้อื่นลบคอลัมน์หรือแถวของเวิร์กบุ๊กที่แชร์โดยไม่ปกป้องเวิร์กบุ๊กได้อย่างไร ที่นี่ฉันพบรหัส VBA ที่สามารถป้องกันไม่ให้ผู้อื่นลบคอลัมน์และแถวในสมุดงานที่แชร์
ป้องกันการลบแถวหรือคอลัมน์ในสมุดงานที่แชร์ด้วย VBA
ป้องกันการลบแถวหรือคอลัมน์ในสมุดงานที่แชร์ด้วย VBA
1 กด Alt + F11 เพื่อเปิด a Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง
2 คลิก สิ่งที่ใส่เข้าไป > โมดูล เพื่อเปิดหน้าต่างโมดูลจากนั้นคัดลอก VBA ต่อไปนี้ไปที่หน้าต่าง
VBA: ป้องกันการลบแถวหรือคอลัมน์
Sub StopDeleteRowCols()
'Updateby20221221
Dim xBarControl As CommandBarControl
Application.OnKey "^{-}", ""
For Each xBarControl In Application.CommandBars.FindControls(ID:=293)
xBarControl.Enabled = False
Next
For Each xBarControl In Application.CommandBars.FindControls(ID:=294)
xBarControl.Enabled = False
Next
End Sub
3 คลิก วิ่ง หรือ F5 บนแป้นพิมพ์เพื่อเรียกใช้รหัสนี้
จากนั้นเมื่อผู้อื่นคลิกขวาเพื่อลบคอลัมน์หรือแถวที่เลือกจะไม่สามารถใช้ตัวเลือกลบในเมนูบริบทได้ ดูภาพหน้าจอ:
นอกจากนี้ยังป้องกันไม่ให้ผู้ใช้ใช้ปุ่มลัด Ctrl + - เพื่อลบแถวหรือคอลัมน์
หมายเหตุ
(1) หากคุณแชร์สมุดงานของคุณกับไฟล์ รีวิว > แชร์สมุดงานคุณไม่สามารถเพิ่มมาโคร VBA ได้อีกต่อไป ดังนั้นคุณควรเพิ่ม VBA ก่อนที่จะแชร์เวิร์กบุ๊ก
(2) VBA นี้จะปิดใช้งานไฟล์ ลบ ในเมนูบริบทในสมุดงานทั้งหมดเมื่อคุณคลิกขวาที่คอลัมน์หรือแถวที่เลือก
(3) ในการกู้คืนไฟล์ ลบ ในเมนูบริบทโปรดแทนที่ทั้งสองอย่าง เท็จ กับ จริง ใน VBA ด้านบนและเรียกใช้ VBA อีกครั้ง
สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน
เพิ่มพูนทักษะ Excel ของคุณด้วย Kutools สำหรับ Excel และสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน Kutools สำหรับ Excel เสนอคุณสมบัติขั้นสูงมากกว่า 300 รายการเพื่อเพิ่มประสิทธิภาพและประหยัดเวลา คลิกที่นี่เพื่อรับคุณสมบัติที่คุณต้องการมากที่สุด...
แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก
- เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
- เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
- เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!