Làm cách nào để ngăn sao chép và dán qua ô với danh sách thả xuống trong Excel?
Đối với ô có danh sách sổ xuống xác thực dữ liệu, khi sao chép nội dung từ ô khác và dán vào ô đó, danh sách thả xuống sẽ biến mất và được thay thế bằng nội dung dán mới. Trong một số trường hợp, bạn muốn ngăn việc sao chép và dán nội dung khác lên ô bằng danh sách thả xuống, bạn sẽ làm gì để giải quyết? Trong bài viết này, bạn sẽ nhận được một phương pháp VBA để giải quyết vấn đề này.
Ngăn sao chép và dán qua ô với danh sách thả xuống trong Excel
Ngăn sao chép và dán qua ô với danh sách thả xuống trong Excel
1. Mở trang tính với ô danh sách thả xuống mà bạn muốn ngăn sao chép và dán.
2. nhấn Khác + F11 các phím đồng thời để mở Ứng dụng Microsoft Visual Basic cửa sổ.
3. bên trong Ứng dụng Microsoft Visual Basic , bấm đúp vào tên trang tính hiện tại trong ngăn bên trái, sau đó sao chép và dán mã VBA bên dưới vào Trình chỉnh sửa mã. Xem ảnh chụp màn hình:
Mã VBA: Ngăn sao chép và dán qua ô với danh sách thả xuống
Private Sub Worksheet_Change(ByVal Target As Range)
'Updated by Extendoffice 20200903
Dim xValue As String
Dim xCheck1 As String
Dim xCheck2 As String
Dim xRg As Range
Dim xArrCheck1() As String
Dim xArrCheck2() As String
Dim xArrValue()
Dim xCount, xJ As Integer
Dim xBol As Boolean
' If Target.Count > 1 Then
' Exit Sub
' End If
xCount = Target.Count
ReDim xArrCheck1(1 To xCount)
ReDim xArrCheck2(1 To xCount)
ReDim xArrValue(1 To xCount)
Application.EnableEvents = False
On Error Resume Next
xJ = 1
For Each xRg In Target
xArrValue(xJ) = xRg.Value
xArrCheck1(xJ) = xRg.Validation.InCellDropdown
xJ = xJ + 1
Next
Application.Undo
xJ = 1
For Each xRg In Target
xArrCheck2(xJ) = xRg.Validation.InCellDropdown
xJ = xJ + 1
Next
xBol = False
For xJ = 1 To xCount
If xArrCheck2(xJ) <> xArrCheck1(xJ) Then
xBol = True
Exit For
End If
Next
If xBol Then
MsgBox "The selected cells containg data validation drop-down lists, no pasting allowed."
Else
xJ = 1
For Each xRg In Target
xRg.Value = xArrValue(xJ)
xJ = xJ + 1
Next
End If
Application.EnableEvents = True
End Sub4. nhấn Khác + Q chìa khóa để thoát khỏi Ứng dụng Microsoft Visual Basic cửa sổ.
5. Khi bạn dán nội dung vào một ô có danh sách thả xuống, một hộp thoại sẽ bật lên để nhắc nhở bạn không được phép dán. Xem ảnh chụp màn hình:
Chú thích: VBA này chỉ hoạt động trong dán ô đơn. Nếu bạn sao chép và dán vào nhiều ô, nó sẽ không hoạt động.
Dễ dàng tạo danh sách thả xuống với các hộp kiểm trong Excel:
Sản phẩm Danh sách thả xuống có hộp kiểm tiện ích của Kutools cho Excel có thể giúp bạn dễ dàng tạo danh sách thả xuống với các hộp kiểm trong một phạm vi được chỉ định, trang tính hiện tại, sổ làm việc hiện tại hoặc tất cả các sổ làm việc đã mở dựa trên nhu cầu của bạn.
Tải xuống bản đầy đủ tính năng miễn phí trong 30 ngày của Kutools cho Excel ngay bây giờ!
Các bài liên quan:
Làm thế nào để tạo danh sách thả xuống với nhiều hộp kiểm trong Excel?
Nhiều người dùng Excel có xu hướng tạo danh sách thả xuống với nhiều hộp kiểm để chọn nhiều mục từ danh sách mỗi lần. Trên thực tế, bạn không thể tạo danh sách có nhiều hộp kiểm với Xác thực dữ liệu. Trong hướng dẫn này, chúng tôi sẽ chỉ cho bạn hai phương pháp để tạo danh sách thả xuống với nhiều hộp kiểm trong Excel. Hướng dẫn này cung cấp phương pháp để giải quyết vấn đề.
Tạo danh sách thả xuống từ một sổ làm việc khác trong Excel
Khá dễ dàng để tạo danh sách sổ xuống xác thực dữ liệu giữa các trang tính trong sổ làm việc. Nhưng nếu dữ liệu danh sách bạn cần để xác thực dữ liệu nằm trong một sổ làm việc khác, bạn sẽ làm gì? Trong hướng dẫn này, bạn sẽ học cách tạo danh sách drop fown từ một sổ làm việc khác trong Excel một cách chi tiết.
Tạo danh sách thả xuống có thể tìm kiếm trong Excel
Đối với một danh sách thả xuống với nhiều giá trị, việc tìm một giá trị thích hợp không phải là một công việc dễ dàng. Trước đây, chúng tôi đã giới thiệu một phương pháp tự động hoàn thành danh sách thả xuống khi nhập ký tự đầu tiên vào hộp thả xuống. Bên cạnh chức năng tự động hoàn thành, bạn cũng có thể làm cho danh sách thả xuống có thể tìm kiếm được để nâng cao hiệu quả làm việc trong việc tìm kiếm các giá trị thích hợp trong danh sách thả xuống. Để làm cho danh sách thả xuống có thể tìm kiếm được, hãy thử phương pháp trong hướng dẫn này.
Tự động điền các ô khác khi chọn giá trị trong danh sách thả xuống của Excel
Giả sử bạn đã tạo một danh sách thả xuống dựa trên các giá trị trong phạm vi ô B8: B14. Khi bạn chọn bất kỳ giá trị nào trong danh sách thả xuống, bạn muốn các giá trị tương ứng trong phạm vi ô C8: C14 được tự động điền vào một ô đã chọn. Để giải quyết vấn đề, các phương pháp trong hướng dẫn này sẽ giúp bạn.
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!
