Làm cách nào để khóa các ô được chỉ định mà không bảo vệ toàn bộ trang tính trong Excel?
Thông thường, bạn cần bảo vệ toàn bộ trang tính để khóa các ô khỏi việc chỉnh sửa. Có phương pháp nào để khóa ô mà không cần bảo vệ toàn bộ trang tính không? Bài viết này đề xuất một phương pháp VBA cho bạn.
Khóa các ô được chỉ định mà không bảo vệ toàn bộ trang tính bằng VBA
Khóa các ô được chỉ định mà không bảo vệ toàn bộ trang tính bằng VBA
Giả sử bạn cần khóa ô A3 và A5 trong trang tính hiện tại, mã VBA sau sẽ giúp bạn đạt được điều đó mà không cần bảo vệ toàn bộ trang tính.
1. Nhấp chuột phải vào tab trang tính và chọn Mã Chế độ xem từ menu chuột phải.
2. Sau đó sao chép và dán mã VBA bên dưới vào cửa sổ Mã. Xem ảnh chụp màn hình:
Mã VBA: Khóa các ô được chỉ định mà không bảo vệ toàn bộ trang tính
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 1 Then
If Target.Row = 3 Or Target.Row = 5 Then
Beep
Cells(Target.Row, Target.Column).Offset(0, 1).Select
End If
End If
End Sub
Chú thích: Trong mã, Cột 1, Hàng = 3 và Hàng = 5 cho biết ô A3 và A5 trong trang tính hiện tại sẽ bị khóa sau khi chạy mã. Bạn có thể thay đổi chúng khi bạn cần.
3. Nhấn nút Khác + Q các phím đồng thời để đóng Microsoft Visual Basic cho các ứng dụng cửa sổ.
Bây giờ ô A3 và A5 bị khóa trong trang tính hiện tại. Nếu bạn cố gắng chọn ô A3 hoặc A5 trong trang tính hiện tại, con trỏ sẽ tự động được di chuyển đến ô liền kề bên phải.
Các bài liên quan:
- Làm cách nào để khóa tất cả các tham chiếu ô trong công thức cùng một lúc trong Excel?
- Làm cách nào để khóa hoặc bảo vệ các ô sau khi nhập hoặc nhập dữ liệu trong Excel?
- Làm cách nào để khóa hoặc mở khóa các ô dựa trên các giá trị trong một ô khác trong Excel?
- Làm cách nào để khóa hình ảnh / hình ảnh vào hoặc bên trong ô trong Excel?
- Làm cách nào để khóa chiều rộng và chiều cao của ô khỏi việc thay đổi kích thước trong Excel?
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!