promotion image of download ymail app
Promoted
? 發問時間: 電腦與網際網路軟體 · 8 年前

EXCEL如何選擇Sheet?

假如一個EXCEL檔裡有好幾百個sheet

每個sheet皆以數字命名(但sheet未按照數字順序排列)

請問有什麼方法可以"輸入sheet名稱後"就跳至那個sheet頁面??

5 個解答

評分
  • RCC
    Lv 6
    8 年前
    最佳解答

    樓上大大似有問題,可改如下試試

    Sub 工作表選擇()

    Dim a As String

    Dim mySht As New Worksheet

    a = InputBox("請輸入工作表名稱:")

    Set mySht = Sheets(a)

    mySht.Select

    End Sub

    參考資料: 經驗
    • Commenter avatar登入以對解答發表意見
  • 8 年前

    也感謝ericsivs大大

    不過使用您的方法會跳到我指定的sheet後幾個sheet去

    但還是謝謝您~

    • Commenter avatar登入以對解答發表意見
  • 鬍鬚
    Lv 7
    8 年前

    考慮一下超連結吧!!

    • Commenter avatar登入以對解答發表意見
  • 匿名使用者
    8 年前

    001回答待商榷

    可能會移到第 X 張, 而不是名稱為 X 的工作表

    2012-07-19 09:49:04 補充:

    把宣告改

    Dim a As String

    便可解決

    • Commenter avatar登入以對解答發表意見
  • 您覺得這個回答如何?您可以登入為回答投票。
  • 8 年前

    請參考以下VBA

    Sub 工作表選擇()

    Dim a As Integer

    a = InputBox("請輸入工作表名稱:")

    Worksheets(a).Select

    End Sub

    2012-07-19 10:35:43 補充:

    感謝Worlon大的指點,我考慮的不夠周詳。

    參考資料: 自己
    • Commenter avatar登入以對解答發表意見
還有問題?馬上發問,尋求解答。