如何在Excel中使用命名區域資料填充組合框?


在Excel電子表格中新增組合框將透過為使用者提供預設的選擇項來提高其功能和可用性。透過將組合框附加到指定的區域,您可以輕鬆更改選項列表,而無需更改任何公式或程式碼。在本文中,我們將介紹使用命名區域資料填充組合框的步驟。無論您的Excel熟練程度如何,本文都將向您展示如何最大限度地發揮組合框的潛力並加快資料錄入過程。

在開始培訓之前,務必瞭解Excel及其術語的基礎知識。熟悉單元格、區域和公式等術語將很有幫助。此外,由於我們將使用Excel中內建的窗體控制元件建立組合框,因此需要支援窗體控制元件的Excel版本。

使用命名區域資料填充組合框

在這裡,我們將首先命名單元格區域,然後插入組合框並向工作表新增VBA程式碼來完成任務。讓我們來看一個簡單的過程,瞭解如何使用Excel中命名區域的資料填充組合框。

步驟1

考慮一個Excel工作表,其中工作表中的資料類似於下圖。

首先,選擇標題單元格區域,然後單擊名稱框。然後,輸入名稱“Head”並單擊Enter鍵。

選擇單元格 > 名稱框 > Head > Enter。

步驟2

然後按照上述步驟,使用其標題值命名每一列的單元格。

步驟3

然後單擊“開發工具”,單擊“插入”,然後在“ActiveX控制元件”下選擇組合框。

開發工具 > 插入 > 組合框。

步驟4

然後繪製兩個組合框。然後右鍵單擊工作表名稱並選擇“檢視程式碼”以開啟VBA應用程式,然後將以下程式碼複製到文字框。

繪製 > 右鍵單擊 > 檢視程式碼 > 複製。

程式碼

Private Sub ComboBox1_Change()
   Dim xRg As Range
   Set xRg = Range(Me.ComboBox1.Text)
   Me.ComboBox2.List = Application.WorksheetFunction.Transpose(xRg)
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
   Dim xRg As Range
   Set xRg = Range("Head")
   Me.ComboBox1.List = Application.WorksheetFunction.Transpose(xRg)
End Sub

步驟5

然後使用Alt + Q關閉VBA,並退出設計模式以完成任務。

結論

在本教程中,我們使用了一個簡單的示例來演示如何使用Excel中命名區域的資料填充組合框,以突出顯示特定資料集。

更新於:2023年9月7日

瀏覽量:332

啟動您的職業生涯

完成課程獲得認證

開始學習
廣告