<ul id="qw8u2"></ul>

<ul id="qw8u2"></ul><ul id="qw8u2"></ul>

<ul id="qw8u2"></ul>

如何通過Excel中的組合框的選定值打開特定的工作表？

網友投稿 326 2025-04-01

如何通過Excel中的組合框的選定值打開特定的工作表？

假設您有一個組合框，其中包含當前工作簿的所有工作表名稱，如下所示。現在，您想在“組合框”中選擇相應的工作表名稱時打開一個特定的工作表。如何實現呢？本文中的方法可以為您提供幫助。

通過帶有VBA代碼的組合框的選定值打開特定的工作表

驚人的！在 Excel 中使用高效的選項卡，如 Chrome、Firefox 和 Safari！ 每天節省50％的時間，并減少數千次鼠標單擊！

下面的VBA代碼可以幫助您根據Excel中的“組合框”選擇轉到特定的工作表。請執行以下操作。

備注：如果組合框在工作表中不包含任何工作表名稱，請按照以下提示快速將所有工作表名稱添加到該組合框。如果已經有一個包含所有工作表名稱的組合框，請轉到 步驟1 直。

Tips:：在您的工作表中插入一個命令按鈕1，右鍵單擊它并選擇 查看代碼 從右鍵單擊菜單中。然后將以下VBA代碼復制并粘貼到代碼窗口，然后按其他 + Q 關閉鍵 Microsoft Visual Basic應用程序 窗口。單擊插入的命令按鈕，然后當前工作簿的所有工作表名稱將自動添加到ComboBox1中。

VBA代碼：輕松將所有工作表名稱添加到組合框

Private Sub CommandButton1_Click() Me.ComboBox1.Clear Dim strWs As String Dim i As Integer For i = 1 To ThisWorkbook.Sheets.Count Me.ComboBox1.AddItem Sheets(i).Name Next End Sub

Copy

如果已經有一個包含所有工作表名稱的組合框，請執行以下操作。

1。打開 設計模式 在下面 開發商 標簽。

2.右鍵單擊帶有工作表名稱的組合框，然后單擊 查看代碼 從右鍵單擊菜單中。

3.然后 Microsoft Visual Basic應用程序 彈出窗口，請用以下VBA代碼替換“代碼”窗口中的原始VBA代碼。

VBA代碼：通過組合框的選定值打開特定的工作表

Private Sub ComboBox1_Change() Dim actWsh As String actWsh = ComboBox1.Text Worksheets(actWsh).Select End Sub

Copy

備注：在代碼中，ComboBox1是包含工作表名稱的組合框的名稱。

4。按其他 + Q 關閉鍵 Microsoft Visual Basic應用程序 窗口，然后關閉 設計模式 在下面 開發商 標簽。

現在，在“組合框”中選擇任何工作表名稱時，將自動打開相應的工作表。

在Excel中輕松列出當前工作簿的所有工作表名稱：

在工作簿中使用工作表索引可幫助您輕松管理工作表。隨著 創建工作表名稱列表 實用程序 Kutools for Excel

，您可以輕松地創建一個包含當前工作簿中所有工作表名稱的工作表索引。之后，您只需單擊“索引”工作表中的工作表名稱即可快速切換到某個工作表。見下面的截圖：

立即下載并試用！ (30-天免費試用）

相關文章: 如何將組合框值復制到Excel中的活動單元格？如何在Excel中的組合框輸出中顯示日期格式？如何根據Excel中指定的單元格值隱藏或取消隱藏命令按鈕？如何防止或禁用在Excel中的組合框中鍵入？如何跳出組合框以選擇Excel中的特定單元格？

最佳辦公生產力工具

將小時轉化為分鐘 Kutools for Excel!

準備好增強您的 Excel 任務了嗎？利用的力量 Kutools for Excel - 您終極的節省時間的工具。簡化復雜的任務并像專業人士一樣瀏覽數據。以閃電般的速度體驗 Excel！

為什么需要 Kutools for Excel

??? 超過 300 項強大功能: Kutools 包含 300 多項高級功能，可簡化您在 1500 多種場景中的工作。

?? 卓越的數據處理能力：合并單元格、刪除重復項并執行高級數據轉換 - 所有這些都不費吹灰之力！

?? 高效的批量操作：當你可以聰明地工作時，為什么還要付出額外的努力呢？輕松批量導入、導出、組合和調整數據。