如果您有一個包含大項目的數據驗證下拉列表，則需要在列表中上下滾動以查找合適的列表，或者直接在列錶框中鍵入整個單詞。 如果在下拉列表中鍵入第一個字母時有允許自動完成的方法，一切將變得更加容易。 本教程將提供一種VBA方法來幫助您實現它。
使用VBA代碼輸入下拉列表時自動完成
下拉列表的更多教程...
請執行以下操作，以在單元格中鍵入相應字母后使下拉列表自動完成。
1.打開包含要使其自動完成的下拉列表單元格的工作表。
2.在插入組合框之前，需要將“開發人員”選項卡添加到Excel功能區。 如果功能區上顯示“開發人員”標籤， 轉到步驟3。 否則，請執行以下操作：單擊 文件 > 選項 打開 選項 窗口。 在這個 Excel選項 窗口中，單擊 自定義功能區 在左窗格中，檢查 開發人員 框，然後單擊 OK 按鈕。 看截圖：
3。 點擊 開發人員 > 插入 > 組合框（ActiveX控件）.
4.在當前工作表中繪製一個組合框。 右鍵單擊它，然後選擇 精選樓盤 從右鍵單擊菜單中。
5。 在裡面 精選樓盤 對話框中，請替換原始文本 （姓名） 場與 TempCombo。
6。 關閉 設計模式 通過點擊 開發人員 > 設計模式。
7.右鍵單擊當前工作表選項卡，然後單擊 查看代碼 從上下文菜單中。 看截圖：
8.在開幕 Microsoft Visual Basic for Applications 窗口，請將以下VBA代碼複製並粘貼到工作表的“代碼”窗口中。
VBA代碼：在下拉列表中鍵入時自動完成
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
9。 按 其他 + Q 同時關閉按鍵 Microsoft Visual Basic應用程序 窗口。
從現在開始，單擊下拉列表單元格時，下拉列表將自動提示。 您可以開始輸入字母，以使所選單元格中的相應項目自動完成。 看截圖：
備註： 此代碼不適用於合併的單元格。
使用Excel中的複選框輕鬆創建下拉列表：
帶有復選框的下拉列表 的效用 Kutools for Excel 可以幫助您根據需要在指定範圍，當前工作表，當前工作簿或所有打開的工作簿中輕鬆創建帶有復選框的下拉列表。
立即下載並嘗試！ （30天免費試用）
如何在Excel中使用多個複選框創建下拉列表？
許多Excel用戶傾向於創建帶有多個複選框的下拉列表，以便每次都從列表中選擇多個項目。 實際上，您無法使用數據驗證功能創建帶有多個複選框的列表。 在本教程中，我們將向您展示兩種在Excel中創建帶有多個複選框的下拉列表的方法。 本教程提供了解決問題的方法。
在Excel中從另一個工作簿創建下拉列表
在工作簿中的工作表之間創建數據驗證下拉列表非常容易。 但是，如果數據驗證所需的列表數據位於另一個工作簿中，您將怎麼辦？ 在本教程中，您將詳細了解如何從Excel中的另一個工作簿創建拖放列表。
在Excel中創建可搜索的下拉列表
對於具有眾多價值的下拉列表，找到合適的價值並非易事。 以前，我們已經介紹了一種在下拉框中輸入第一個字母時自動完成下拉列表的方法。 除了自動完成功能之外，您還可以使下拉列表可搜索，以提高在下拉列表中查找適當值時的工作效率。 為了使下拉列表可搜索，請嘗試本教程中的方法。
在Excel下拉列表中選擇值時自動填充其他單元格
假設您已經根據單元格區域B8：B14中的值創建了一個下拉列表。 在下拉列表中選擇任何值時，都希望在選定單元格中自動填充單元格範圍C8：C14中的相應值。 為了解決該問題，本教程中的方法將對您有所幫助。
