Làm cách nào để tắt các chức năng cắt, sao chép và dán trong Excel?
Giả sử bạn có một sổ làm việc với dữ liệu quan trọng mà bạn cần bảo vệ khỏi bị cắt, sao chép và dán. Làm thế nào để đạt được nó? Bài viết này cung cấp phương pháp VBA để bạn vô hiệu hóa đồng thời các hàm cắt, sao chép và dán trong sổ làm việc Excel.
Tắt các chức năng cắt, sao chép và dán với mã VBA
Tắt các chức năng cắt, sao chép và dán với mã VBA
Vui lòng làm như sau để vô hiệu hóa các chức năng cắt, sao chép và dán trong sổ làm việc Excel.
1. Trong sổ làm việc, bạn cần tắt các chức năng cắt, sao chép và dán, vui lòng nhấn Khác + F11 các phím đồng thời để mở Microsoft Visual Basic cho các ứng dụng cửa sổ.
2. bên trong Microsoft Visual Basic cho các ứng dụng cửa sổ, vui lòng nhấp đúp Sổ làm việc này ở bên trái Dự án , sau đó sao chép và dán mã VBA bên dưới vào ThisWorkbook (Mã) cửa sổ. Xem ảnh chụp màn hình:
Mã VBA: Vô hiệu hóa chức năng cắt, sao chép và dán cùng một lúc trong Excel
Private Sub Workbook_Activate()
Application.CutCopyMode = False
Application.OnKey "^c", ""
Application.CellDragAndDrop = False
End Sub
Private Sub Workbook_Deactivate()
Application.CellDragAndDrop = True
Application.OnKey "^c"
Application.CutCopyMode = False
End Sub
Private Sub Workbook_WindowActivate(ByVal Wn As Window)
Application.CutCopyMode = False
Application.OnKey "^c", ""
Application.CellDragAndDrop = False
End Sub
Private Sub Workbook_WindowDeactivate(ByVal Wn As Window)
Application.CellDragAndDrop = True
Application.OnKey "^c"
Application.CutCopyMode = False
End Sub
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
Application.CutCopyMode = False
End Sub
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Application.OnKey "^c", ""
Application.CellDragAndDrop = False
Application.CutCopyMode = False
End Sub
Private Sub Workbook_SheetDeactivate(ByVal Sh As Object)
Application.CutCopyMode = False
End Sub
3. Sau đó, vui lòng nhấn Khác + Q chìa khóa để thoát khỏi Microsoft Visual Basic cho các ứng dụng cửa sổ.
Bây giờ bạn không thể cắt hoặc sao chép dữ liệu từ sổ làm việc này, trong khi đó, dữ liệu bạn đã sao chép từ các trang tính hoặc sổ làm việc khác không thể được dán vào sổ làm việc này.
Chú thích: Chức năng kéo và thả cũng bị tắt sau khi chạy đoạn mã VBA trên.
Các bài liên quan:
- Làm thế nào để tắt nhấp chuột phải vào tab trang tính trong Excel?
- Làm cách nào để tắt menu chuột phải trong bảng tính hoặc toàn bộ bảng tính được chỉ định trong Excel?
- Làm cách nào để ngăn hoặc tắt chế độ chỉnh sửa bằng cách nhấp đúp vào ô 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!