Thầy ơi em làm câu lệnh tắt không cho kéo cell để không làm mất định dạng
Private
Sub
Worksheet_SheetSelectionChange()
Application.CutCopyMode =
True
Application.CellDragAndDrop =
False
End
Sub
Nhưng sau khi add lệnh này thì tất cả các file excel đều không thể kéo được nữa. Dù xóa code rồi cũng vẫn thế.
Thầy có cách nào không ạ
Chào bạn bạn có thể dùng cách là lock phần bạn không muốn thay đổi định dạng và định dạng lại bằng code bạn nhé. bạn thử máy và mở lại chạy excel với quyền admin nhé.
Em vẫn phải để mọi người input dữ liệu vào và copy paste nên không thể lock được.
Nhưng lại không muốn mọi người làm thay đổi định dạng border hay conditional formatting. Vậy nên dùng code nào ạ
Chào bạn bạn có thể để import bằng code nhé, trước khi import bạn mở lock import xong lại lock lại.
Bạn có thể dùng code tạo conditional formatting
Mục đích là không muốn người khác thay đổi định dạng nhưng vẫn có thể nhập dữ liệu
=> bạn hoàn toàn dùng phương pháp protect sheet được.
Nhưng khi protect sheet cần quy định rõ vùng nào khóa, vùng nào không, khi khóa rồi thì có cho phép họ làm những gì (trong bảng protect sheet bạn lựa chọn các checkbox)
Lệnh khóa cũng không nên gắn kèm trong sự kiện của sheet mà đặt ngay tại đối tượng ThisWorkbook khi mở file (hoặc trước khi đóng file) => mục đích để khi file ở trạng thái bắt đầu hoạt động thì sheet mục tiêu đã ở trạng thái Protect Sheet rồi.