Làm thế nào để tự động hoàn thành khi nhập trong danh sách thả xuống Excel?

Đối với danh sách thả xuống xác thực dữ liệu có nhiều mục, bạn cần cuộn lên và xuống trong danh sách để tìm mục bạn cần hoặc nhập chính xác toàn bộ từ vào hộp danh sách. Có cách nào để làm cho danh sách thả xuống tự động hoàn thành khi nhập các ký tự tương ứng không? Điều này sẽ giúp mọi người làm việc hiệu quả hơn trong trang tính với danh sách thả xuống trong ô. Hướng dẫn này cung cấp hai phương pháp để giúp bạn đạt được nó.

Tạo danh sách thả xuống tự động hoàn thành bằng mã VBA
Dễ dàng tạo danh sách thả xuống tự động hoàn thành sau 2 giây
Các hướng dẫn khác cho danh sách thả xuống ...

Tạo danh sách thả xuống tự động hoàn thành bằng mã VBA

Vui lòng thực hiện như sau để danh sách thả xuống tự động hoàn thành sau khi nhập các chữ cái tương ứng vào ô.

Trước tiên, bạn cần chèn một hộp tổ hợp vào trang tính và thay đổi các thuộc tính của nó.

1. Mở trang tính chứa các ô danh sách thả xuống mà bạn muốn chúng tự động hoàn thành.
2. Trước khi chèn Combo box, bạn cần thêm tab Developer vào ribbon Excel. Nếu tab Nhà phát triển hiển thị trên dải băng của bạn, chuyển sang bước 3. Nếu không, hãy làm như sau để tab Trình phát triển hiển thị trong ruy-băng: Bấm Tập tin > Các lựa chọn để mở Các lựa chọn cửa sổ. Trong này Tùy chọn Excel cửa sổ, nhấp Tuy Biên ruy-băng trong ngăn bên trái, chọn Nhà phát triển và sau đó bấm vào OK cái nút. Xem ảnh chụp màn hình:
   
3. Nhấp chuột Nhà phát triển > Chèn > Hộp tổ hợp (Điều khiển ActiveX).
   
4. Vẽ một hộp tổ hợp trong bảng tính hiện tại. Nhấp chuột phải vào nó và sau đó chọn Bất động sản từ menu chuột phải.
   
5. Trong tạp chí Bất động sản hộp thoại, vui lòng thay thế văn bản gốc trong (Tên) lĩnh vực với TempCombo.
   
6. Tắt Chế độ thiết kế bằng cách nhấp chuột Nhà phát triển > Chế độ thiết kế.

Sau đó, áp dụng mã VBA bên dưới

1. Nhấp chuột phải vào tab trang tính hiện tại và nhấp vào Mã Chế độ xem từ menu ngữ cảnh. Xem ảnh chụp màn hình:
   
2. Trong phần mở đầu Microsoft Visual Basic cho các ứng dụng cửa sổ, vui lòng sao chép và dán mã VBA bên dưới vào cửa sổ Mã của trang tính.
   Mã VBA: Tự động điền khi nhập vào danh sách thả xuống

   Private Sub Worksheet_SelectionChange(ByVal Target As Range)
   'Update by Extendoffice: 2020/01/16
       Dim xCombox As OLEObject
       Dim xStr As String
       Dim xWs As Worksheet
       Dim xArr
       
       Set xWs = Application.ActiveSheet
       On Error Resume Next
       Set xCombox = xWs.OLEObjects("TempCombo")
       With xCombox
           .ListFillRange = ""
           .LinkedCell = ""
           .Visible = False
       End With
       If Target.Validation.Type = 3 Then
           Target.Validation.InCellDropdown = False
           Cancel = True
           xStr = Target.Validation.Formula1
           xStr = Right(xStr, Len(xStr) - 1)
           If xStr = "" Then Exit Sub
           With xCombox
               .Visible = True
               .Left = Target.Left
               .Top = Target.Top
               .Width = Target.Width + 5
               .Height = Target.Height + 5
               .ListFillRange = xStr
               If .ListFillRange = "" Then
                   xArr = Split(xStr, ",")
                   Me.TempCombo.List = xArr
               End If
               .LinkedCell = Target.Address
           End With
           xCombox.Activate
           Me.TempCombo.DropDown
       End If
   End Sub
   Private Sub TempCombo_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
       Select Case KeyCode
           Case 9
               Application.ActiveCell.Offset(0, 1).Activate
           Case 13
               Application.ActiveCell.Offset(1, 0).Activate
       End Select
   End Sub

   
3. Ấn Bản Khác + Q các phím đồng thời để đóng Ứng dụng Microsoft Visual Basic cửa sổ.

Từ bây giờ, khi nhấp vào một ô danh sách thả xuống, danh sách thả xuống sẽ tự động nhắc. Bạn có thể bắt đầu nhập chữ cái để tự động hoàn thành mục tương ứng trong ô đã chọn. Xem ảnh chụp màn hình:

Dễ dàng tạo danh sách thả xuống tự động hoàn thành sau 2 giây

Đối với hầu hết người dùng Excel, phương pháp VBA trên khó thành thạo. Nhưng với Danh sách thả xuống có thể tìm kiếm tính năng của Kutools cho Excel, bạn có thể dễ dàng bật tính năng tự động hoàn tất cho danh sách thả xuống xác thực dữ liệu trong một phạm vi cụ thể chỉ trong 2 giây. Hơn nữa, tính năng này có sẵn cho tất cả các phiên bản Excel.

Mẹo: Trước khi áp dụng công cụ này, vui lòng cài đặt Kutools cho Excel trước hết. Tải xuống miễn phí ngay bây giờ.

1. Để bật tính năng tự động hoàn thành trong danh sách thả xuống của bạn, trước tiên hãy chọn phạm vi có danh sách thả xuống. Sau đó, điều hướng đến Kutools tab, chọn Danh sách thả xuống > Làm cho danh sách thả xuống có thể tìm kiếm được, tự động bật lên.
2. Trong tạp chí Làm cho danh sách thả xuống có thể tìm kiếm được hộp thoại, bấm vào OK để lưu cài đặt.

Kết quả

Sau khi cấu hình hoàn tất, nhấp vào ô danh sách thả xuống trong phạm vi đã chỉ định sẽ hiển thị hộp danh sách. Khi nhập các ký tự, miễn là một mục khớp chính xác, toàn bộ từ đó sẽ ngay lập tức được đánh dấu trong hộp danh sách và có thể được điền vào ô danh sách thả xuống chỉ bằng cách nhấn phím Enter.

Các bài liên quan: