Làm cách nào để ngăn việc xóa hàng hoặc cột trong sổ làm việc không được bảo vệ được chia sẻ?
Khi bạn chia sẻ sổ làm việc với người khác, làm cách nào bạn có thể ngăn người khác xóa các cột hoặc hàng của sổ làm việc được chia sẻ của bạn mà không bảo vệ sổ làm việc? Ở đây tôi tìm thấy mã VBA có thể ngăn người khác xóa các cột và hàng trong sổ làm việc được chia sẻ.
Ngăn chặn việc xóa hàng hoặc cột trong sổ làm việc được chia sẻ với VBA
Ngăn chặn việc xóa hàng hoặc cột trong sổ làm việc được chia sẻ với VBA
1. nhấn Alt + F11 để mở một Microsoft Visual Basic cho ứng dụng cửa sổ.
2. nhấp chuột Chèn > Mô-đun để mở cửa sổ Mô-đun, sau đó sao chép VBA sau vào cửa sổ.
VBA: Ngăn xóa hàng hoặc cột.
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. nhấp chuột chạy nút hoặc F5 trên bàn phím để chạy mã này.
Sau đó, khi người khác nhấp chuột phải để xóa các cột hoặc hàng đã chọn, tùy chọn Xóa không thể được áp dụng trong menu ngữ cảnh. Xem ảnh chụp màn hình:
Ngoài ra, nó ngăn người dùng sử dụng phím tắt Ctrl + - để xóa hàng hoặc cột.
Lưu ý:
(1) Nếu bạn đã chia sẻ sổ làm việc của mình với Đánh giá > Chia sẻ sổ làm việc, bạn không thể thêm bất kỳ macro VBA nào nữa. Do đó, bạn nên thêm VBA trước khi chia sẻ sổ làm việc.
(2) VBA này sẽ vô hiệu hóa Xóa bỏ trong menu ngữ cảnh trong tất cả các sổ làm việc khi bạn bấm chuột phải vào các cột hoặc hàng đã chọn.
(3) Để khôi phục Xóa bỏ trong menu ngữ cảnh, vui lòng thay thế cả hai Sai với Thật trong VBA ở trên và chạy lại VBA.
Công cụ năng suất văn phòng tốt nhất
Nâng cao kỹ năng Excel của bạn với Kutools for Excel và trải nghiệm hiệu quả hơn bao giờ hết. Kutools for Excel cung cấp hơn 300 tính năng nâng cao để tăng năng suất và tiết kiệm thời gian. Bấm vào đây để có được tính năng bạn cần nhất...
Tab Office mang lại giao diện Tab cho Office và giúp công việc của bạn trở nên dễ dàng hơn nhiều
- Cho phép chỉnh sửa và đọc theo thẻ trong Word, Excel, PowerPoint, Publisher, Access, Visio và Project.
- Mở và tạo nhiều tài liệu trong các tab mới của cùng một cửa sổ, thay vì trong các cửa sổ mới.
- Tăng 50% năng suất của bạn và giảm hàng trăm cú nhấp chuột cho bạn mỗi ngày!