KutoolsforOffice — 一套方案,五大工具。事半功倍。三月特賣:20% 折扣

如何讓下拉式清單預設顯示第一個項目,而非空白?

作者Xiaoyang修改日期

下拉列表是 Excel 工作表中一項實用功能,能簡化並標準化資料輸入流程——使用者只需從預先定義的選項中挑選,無需逐一鍵入數值。然而,您可能曾遇到這種情況:點擊下拉儲存格後,初始選項顯示為空白,而非第一個實際資料項目。此問題通常源於編輯來源清單後,結尾仍殘留空白列,或刪除靠近末尾的項目,導致資料驗證將非預期的空白欄位納入清單頂端。尤其在長清單中,每次都要不斷向上捲動、跳過空白項目才能選取第一個有效選項,不僅效率低落,更令人感到沮喪。

顯示下拉式清單中頂部項目為空白的螢幕截圖

解決此問題不僅能提升使用者便利性,更能有效避免意外選取空白值,進而影響後續的資料處理或報表製作。本文將介紹實用方法,確保您的下拉式清單首項始終置頂,徹底杜絕這些不必要的空白。

使用資料驗證功能讓下拉式清單顯示第一個項目而非空白

透過 VBA 程式碼自動讓下拉式清單顯示第一個項目而非空白

使用 Excel 表格作為源區域


使用資料驗證功能讓下拉式清單顯示第一個項目而非空白

避免下拉清單頂端出現空白項目的有效方法之一,是透過公式設定資料驗證,以動態界定正確的範圍。此方法能確保僅納入來源清單中已填入資料的儲存格,即使因刪除資料而在清單末尾產生多個空白列,也不受影響。此解決方案特別適合經常調整來源清單,或偏好使用簡易公式而非巨集的使用者。

1. 選取您要建立下拉式清單的儲存格,接著前往 Excel 功能區,點擊資料 資料驗證 資料驗證,系統就會開啟「資料驗證」對話方塊,如下圖所示:

插入資料驗證下拉式清單的螢幕截圖

2. 在「資料驗證」對話方塊的設定頁籤中,將允許設為清單,並在來源方框中輸入下列公式,以動態引用僅包含實際資料的範圍:

=OFFSET(Sheet 3!$A$1,0,0,COUNTA(Sheet 3!$A:$A)-1,1)

注意:在此公式中,Sheet 3 為存放源數據的工作表,而 A1 是清單的起始儲存格。請依您的實際工作表配置調整。COUNTA 函數可確保僅納入非空白儲存格(從 A1 開始)。若您的來源清單內部(不僅結尾)刻意包含空白列,此方法可能無法完全排除這些空白,因此建議保持來源清單連續,以獲得最佳效果。

使用公式設定資料驗證選項的螢幕截圖

3. 點擊確定套用設定。設定完成後,當您點擊任何已設定的下拉清單儲存格,清單將直接於頂端顯示第一筆實際資料項目。只要範圍涵蓋 A 欄所有項目,且主資料區塊內無空白儲存格,即使來源資料變更,此效果仍會維持不變。結果如下圖所示:

顯示最終下拉式清單,且第一個項目位於清單頂端的螢幕截圖

提示:日後若需擴充或縮減來源清單,無需手動更新資料驗證設定!只要範圍開頭沒有空白儲存格,公式就會自動調整。但請留意:若清單內部(非僅結尾)存在空白,雖然計算時會自動跳過,仍可能在下拉清單中產生非預期的間隔,影響使用體驗。

潛在問題:若您的來源區域可能包含刻意留空的間隔,或含有合併儲存格與非連續資料,建議改用 Excel 表格作為來源區域,或參考下方的 VBA 方法,以獲得更彈性的處理方式。


透過 VBA 程式碼自動讓下拉式清單顯示第一個項目而非空白

在某些情境下,僅調整資料驗證來源可能仍顯不足——例如資料頻繁變動,或因來源區域結構問題而產生空白選項。透過簡潔的 VBA 程式碼,即可確保每次啟用含資料驗證的儲存格時,下拉清單自動選取並顯示第一個可用項目,不僅提升資料輸入效率,更減少使用者點擊次數。

1. 在插入下拉清單後,於含下拉清單的工作表標籤上按右鍵,從內容功能表選擇檢視程式碼,系統將自動開啟 Microsoft Visual Basic for Applications 編輯器。請將下列程式碼貼至對應的工作表模組(非標準模組)中,此程式碼會於背景運作,每次選取驗證儲存格時自動重設下拉清單:

VBA 程式碼:自動在下拉式清單中顯示第一筆資料項目:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Updateby Extendoffice 20160725
    Dim xFormula As String
    On Error GoTo Out:
    xFormula = Target.Cells(1).Validation.Formula1
    If Left(xFormula, 1) = "=" Then
        Target.Cells(1) = Range(Mid(xFormula, 1)).Cells(1).Value
    End If
Out:
End Sub

展示如何使用 VBA 程式碼的螢幕截圖

2. 貼上程式碼後,請將活頁簿儲存為啟用巨集的 .xlsm 檔案(建議此格式),並關閉 VBA 編輯器視窗。返回工作表,點擊任一包含下拉清單的儲存格——啟用該儲存格時,下拉清單的第一個項目將自動顯示。

提示與注意事項:此 VBA 方法極適合追求無縫使用者體驗的場景,尤其適用於動態清單、長清單,或難以避免出現空白項目的清單。請務必啟用巨集以確保正常運作,並提前告知其他使用者——部分環境基於安全性考量會限制巨集功能。

疑難排解:若程式碼似乎未生效,請再次確認是否已正確置入 VBA 編輯器中的對應工作表程式碼視窗,並確保下拉清單使用的是標準資料驗證清單。

限制:VBA 解決方案僅在使用者點選下拉儲存格時觸發;若儲存格透過其他方式填入(例如公式計算結果或貼上內容),則不會生效。一旦您移除該儲存格的下拉清單,或將儲存格移至不含 VBA 程式碼的其他工作表,自動選取功能將立即失效。


使用 Excel 表格作為源區域

若您的下拉來源清單具備動態特性且希望便於維護,建議將來源清單轉換為 Excel 表格。表格會隨著資料的新增或刪除自動調整範圍,確保清單始終保持最新狀態。但請注意,Excel 表格不會自動排除空白儲存格——表格中的任何空白項目仍會顯示在下拉清單中,除非您明確加以篩選排除(例如在 Excel 365 與 Excel 2021 中使用 FILTER 函數)。

1. 選取您的原始資料,並按下 Ctrl + T 將其轉換為表格。請確保頂端無空白列,並透過「表格設計」頁籤為表格指定一個有意義的名稱,例如 MyList

2. 設定資料驗證時,請使用結構化參照指向表格欄位。在「資料驗證」的來源中輸入:

=INDIRECT("MyList[Column1]")

請將 Column 1 替換為您的實際欄位名稱(即欄位標題)。此方法會動態納入表格欄位中所有已填寫的項目,確保資料更新時清單完整性不受影響!

此方法特別適合用於源數據經常更新,且多位使用者需高效管理驗證清單的環境。


最佳 Office 生產力工具

🤖KUTOOLS AI 助手:基於以下內容徹底革新數據分析:智慧執行     產生程式碼  建立自訂公式    分析資料並產生圖表  呼叫增強函數……
熱門功能尋找、醒目提示或標記重複值     刪除空白行     合併列或儲存格而不遺失資料     不使用公式的四捨五入……
高級 LOOKUP多重條件 VLookup    多重數值 VLookup     跨多個工作表 VLookup      模糊查找……
高級下拉列表快速建立下拉式清單     相依式下拉式清單     多選下拉式清單……
欄位管理員新增指定數量的欄位移動欄位切換隱藏欄位的可見狀態比較範圍與欄位……
精選功能網格聚焦     設計視圖   增強編輯欄    工作簿與工作表管理員     資源庫(自動文字)  日期提取     合併工作表    加密/解密儲存格    依清單傳送電子郵件     超級篩選      特殊篩選(篩選粗體儲存格/斜體/刪除線……) ......
頂尖 15 工具組12 文字工具添加文本刪除特定字符,……)   50+ 圖表 類型甘特圖,……)   40+ 實用公式基於生日計算年齡,……)   19 插入工具插入二維碼從路徑插入圖片,……)   12 轉換工具金額轉大寫匯率轉換,……)   7 合併和拆分工具高級合併行分割儲存格,……)……以及更多
在您的慣用語言中使用 Kutools—支援英文、西班牙文、德文、法文、中文及另外 40+ 種語言!

運用 Kutools for Excel 強化您的 Excel 技能,體驗前所未有的高效能!Kutools for Excel 提供超過 300 項進階功能,大幅提升生產力並節省寶貴時間。立即點擊,取得您最需要的功能……


Office Tab 為 Office 帶來分頁式介面,讓您的工作更輕鬆自在!

  • 在 Word、Excel、PowerPoint 中啟用分頁式編輯與閱讀功能,以及 Access、Visio 與 Project。
  • 在同視窗的新分頁中開啟並建立多份文件,而非另開新視窗。
  • 每天為您提升 50% 的工作效率,並省下數百次滑鼠點擊!

所有 Kutools 增益集,一個安裝程式

Kutools for Office 套件整合了 Excel、Word、Outlook 與 PowerPoint 的增益集,以及 Office Tab Pro,非常適合需要跨多個 Office 應用程式協作的團隊使用!

ExcelWordOutlookTabsPowerPoint
  • 全能套件— 包含 Excel、Word、Outlook 與 PowerPoint 增益集,以及 Office Tab Pro
  • 一個安裝程式,一個授權— 數分鐘內即可完成設定(支援 MSI)
  • 協同運作更出色— 在多個 Office 應用程式間實現流暢的生產力體驗
  • 30 天完整功能試用— 無需註冊,無需信用卡
  • 超值之選— 比單獨購買各增益集更省費用