如何在 Excel 中的使用者窗體上根據組合框選擇填充文字框?


Microsoft Excel 中的使用者窗體提供了一種有趣的方式來獲取使用者輸入和收集資料。它們包含許多控制元件,如文字框、按鈕、複選框和組合框,使使用者可以輕鬆輸入或選擇資料。根據組合框中的選擇填充文字框的能力是使用者窗體中的一項常見需求。本文將引導您在 Excel 中建立一個使用者窗體,並向您展示如何根據您在組合框中做出的選擇動態填充文字框。透過實施這些步驟,您可以透過在使用者做出選擇時自動填寫相關資料來改善使用者體驗。

根據組合框選擇填充文字框

這裡我們將首先插入一個使用者窗體,然後向窗體新增 VBA 程式碼來完成任務。因此,讓我們來看一個簡單的過程,瞭解如何在 Excel 中的使用者窗體上根據組合框選擇填充文字框。

步驟 1

考慮任何 Excel 工作表。首先,右鍵單擊工作表名稱,然後選擇“檢視程式碼”以開啟 VBA 應用程式。

右鍵點選 > 檢視程式碼。

步驟 2

然後單擊“插入”,然後選擇“使用者窗體”。然後繪製一個組合框控制元件和一個文字框控制元件。

插入 > 使用者窗體 > 組合框控制元件 > 文字框控制元件。

步驟 3

然後右鍵單擊使用者窗體,選擇“檢視程式碼”,並將下面的程式碼複製到文字框中。

右鍵點選 > 檢視程式碼 > 複製。

程式碼

Dim xRg As Range
Private Sub UserForm_Initialize()
   Set xRg = Worksheets("Sheet1").Range("A2:B8")
   Me.ComboBox1.List = xRg.Columns(1).Value
End Sub
Private Sub ComboBox1_Change()
   Me.TextBox1.Text = Application.WorksheetFunction.VLookup(Me.ComboBox1.Value, xRg, 2, False)
End Sub

步驟 4

然後使用 Alt + Q 退出 VBA。然後單擊“開發工具”,然後單擊“插入”,然後在“ActiveX 控制元件”下選擇“命令按鈕”。

Alt + Q > 開發工具 > 插入 > 命令按鈕。

步驟 5

然後繪製一個命令按鈕。然後右鍵單擊工作表名稱,選擇“檢視程式碼”,並將下面的程式碼複製到文字框中。

繪製 > 右鍵點選 > 檢視程式碼 > 複製。

程式碼

Private Sub CommandButton1_Click()
   Dim frm As UserForm1
   Set frm = New UserForm1
   frm.Show
End Sub

步驟 6

然後退出設計模式。然後單擊命令按鈕。然後您可以在組合框中看到所有收集的名稱。

從組合框中選擇一個名稱時,相應的員工編號將自動填充到文字框中,如下面的螢幕截圖所示。

結論

在本教程中,我們使用了一個簡單的示例來演示如何在 Excel 中的使用者窗體上根據組合框選擇填充文字框,以突出顯示特定資料集。

更新於: 2023-09-07

1K+ 瀏覽量

開啟你的 職業生涯

透過完成課程獲得認證

立即開始
廣告