Bagaimana cara melengkapi otomatis saat mengetik di daftar drop-down Excel?

Untuk daftar drop-down validasi data dengan banyak item, Anda perlu menggulir ke atas dan ke bawah dalam daftar untuk menemukan yang Anda butuhkan atau ketik seluruh kata ke dalam kotak daftar dengan benar. Apakah ada cara untuk membuat daftar drop-down dilengkapi secara otomatis saat mengetik karakter yang sesuai? Ini akan membantu orang bekerja lebih efisien di lembar kerja dengan daftar drop-down di sel. Tutorial ini menyediakan dua metode untuk membantu Anda mencapainya.

Buat daftar drop-down lengkapi otomatis dengan kode VBA
Mudah membuat daftar drop-down lengkapi otomatis dalam 2 detik
Tutorial lainnya untuk daftar drop-down ...

Buat daftar drop-down lengkapi otomatis dengan kode VBA

Harap lakukan hal berikut untuk membuat daftar drop-down pelengkapan otomatis setelah mengetik huruf yang sesuai di sel.

Pertama, Anda perlu memasukkan kotak kombo ke dalam lembar kerja dan mengubah propertinya.

1. Buka lembar kerja yang berisi sel daftar drop-down yang ingin Anda jadikan pelengkapan otomatis.
2. Sebelum menyisipkan kotak Kombo, Anda perlu menambahkan tab Pengembang ke pita Excel. Jika tab Pengembang ditampilkan di pita Anda, beralih ke langkah 3. Jika tidak, lakukan hal berikut agar tab Pengembang muncul di pita: Klik File > Opsi untuk membuka Opsi jendela. Di dalam Opsi Excel window, klik Sesuaikan Pita di panel kiri, periksa Pengembang kotak, dan kemudian klik OK tombol. Lihat tangkapan layar:
   
3. Klik Pengembang > Menyisipkan > Kotak Kombo (Kontrol ActiveX).
   
4. Gambarlah kotak kombo di lembar kerja saat ini. Klik kanan lalu pilih Properties dari menu klik kanan.
   
5. Dalam majalah Properties kotak dialog, harap ganti teks asli di (Nama) bidang dengan TempCombo.
   
6. Matikan Mode Desain dengan mengklik Pengembang > Mode Desain.

Kemudian, terapkan kode VBA di bawah ini

1. Klik kanan pada tab lembar saat ini dan klik Lihat kode dari menu konteks. Lihat tangkapan layar:
   
2. Di pembukaan Microsoft Visual Basic untuk Aplikasi jendela, silakan salin dan tempel kode VBA di bawah ini ke dalam jendela Kode lembar kerja.
   Kode VBA: Pelengkapan otomatis saat mengetik di daftar drop-down

   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. Tekan lain + Q tombol secara bersamaan untuk menutup Aplikasi Microsoft Visual Basic jendela.

Mulai sekarang, ketika mengklik sel daftar drop-down, daftar drop-down akan muncul secara otomatis. Anda dapat mulai mengetik surat untuk membuat item terkait selesai secara otomatis di sel yang dipilih. Lihat tangkapan layar:

Buat daftar drop-down lengkapi otomatis dengan mudah dalam 2 detik

Bagi sebagian besar pengguna Excel, metode VBA di atas sulit dikuasai. Tapi dengan Daftar Drop-down yang Dapat Dicari fitur dari Kutools untuk Excel, Anda dapat dengan mudah mengaktifkan pelengkapan otomatis untuk daftar tarik-turun validasi data kisaran tertentu hanya dalam 2 detik. Terlebih lagi, fitur ini tersedia untuk semua versi Excel.

jenis: Sebelum menerapkan alat ini, harap instal Kutools untuk Excel pertama. Buka unduhan gratis sekarang.

1. Untuk mengaktifkan pelengkapan otomatis di daftar dropdown Anda, pertama-tama pilih rentang dengan dropdown. Kemudian, navigasikan ke Kutools tab, pilih Daftar Drop-down > Jadikan Daftar Drop-down Dapat Dicari, Popup Otomatis.
2. Dalam majalah Jadikan Daftar Drop-down Dapat Dicari kotak dialog, klik OK untuk menyimpan pengaturan.

Hasil

Setelah konfigurasi selesai, mengklik sel daftar drop-down dalam rentang yang ditentukan akan memunculkan kotak daftar. Saat memasukkan karakter, selama satu item sama persis, seluruh kata akan segera disorot dalam kotak daftar dan dapat diisi ke dalam sel daftar drop-down hanya dengan menekan tombol Enter.

Artikel terkait: