如何在 Excel 中將下拉方塊的值複製到活動儲存格？

在某些情況下，您可能需要將從下拉方塊中選取的值複製到活動儲存格。通常，您需要進入下拉方塊，然後手動進行複製並貼上到活動儲存格中。本文介紹了一種便捷的方法，可以在選擇下拉方塊中的值時自動更新活動儲存格。

使用 VBA 程式碼將下拉方塊的值複製到活動儲存格

VBA 1：通過命令按鈕將下拉方塊的值複製到活動儲存格
VBA 2：自動將下拉方塊的值複製到活動儲存格

使用 VBA 程式碼將下拉方塊的值複製到活動儲存格

以下 VBA 程式碼可以幫助您自動將下拉方塊的值複製到活動儲存格。請按照以下步驟操作。

VBA 1：通過命令按鈕將下拉方塊的值複製到活動儲存格

1. 首先，您需要在工作表中插入一個命令按鈕，如下圖所示。

2. 右鍵單擊該命令按鈕，然後從右鍵菜單中點擊 檢視程式碼。參見截圖：

3. 在彈出的 Microsoft Visual Basic for Applications 視窗中，將程式碼窗口中的原始程式碼替換為以下 VBA 程式碼。

VBA 程式碼：將下拉方塊的值複製到活動儲存格

Private Sub CommandButton1_Click()
   ActiveCell.Value = Me.ComboBox1.Text
End Sub

備註：在程式碼中，CommandButton1 是插入的命令按鈕的名稱，而 ComboBox1 是要複製值的下拉方塊的名稱。請根據需要更改它們。

4. 按 Alt + Q 鍵關閉 Microsoft Visual Basic for Applications 視窗。

從現在開始，當您需要將下拉方塊的值複製到活動儲存格時，只需選擇該儲存格，然後點擊命令按鈕即可完成。

VBA 2：自動將下拉方塊的值複製到活動儲存格

以下 VBA 程式碼可以幫助您在選擇下拉方塊中的值時自動更新活動儲存格。您可以按照以下步驟操作。

1. 確保在開發工具標籤下的 設計模式 已啟用。

2. 右鍵單擊要複製值的下拉方塊，然後從右鍵菜單中點擊 檢視程式碼。參見截圖：

3. 在彈出的 Microsoft Visual Basic for Applications 視窗中，將 程式碼窗口 中的原始程式碼替換為以下 VBA 程式碼。

VBA 程式碼：將下拉方塊的值複製到活動儲存格

Private Sub ComboBox1_Change()
  ActiveCell.Value = Me.ComboBox1.Value
End Sub

備註：在程式碼中，ComboBox1 是要複製值的下拉方塊的名稱。

4. 按 Alt + Q 鍵關閉 Microsoft Visual Basic for Applications 視窗，並在開發工具標籤下關閉 設計模式。

從現在開始，當從下拉方塊中選擇值時，所選記錄將自動顯示在活動儲存格中。

相關文章：

• 如何在 Excel 的下拉方塊輸出中顯示日期格式？
• 如何根據指定的儲存格值隱藏或取消隱藏 Excel 中的命令按鈕？
• 如何根據 Excel 中下拉方塊的選定值打開特定的工作表？
• 如何防止或禁用在 Excel 下拉方塊中輸入文字？
• 如何在 Excel 中通過 Tab 鍵從下拉方塊切換到選擇特定儲存格？