【教學】Excel VBA 如何切換到指定工作表,並選取工作表中的指定儲存格?

excel vba 切換工作表 選取儲存格

將下方程式碼複製到自己的巨集中,首先設定要切換的工作表名稱,接著嘗試取得該名稱的工作表,若存在則切換到指定工作表,反之回傳找不到工作表

    Dim targetSheet As Worksheet
    Dim sheetName As String

    ' 設定要切換的工作表名稱
    sheetName = "MyNewSheet"

    ' 嘗試取得該名稱的工作表
    On Error Resume Next
    Set targetSheet = Worksheets(sheetName)
    On Error GoTo 0

    If Not targetSheet Is Nothing Then
        ' 切換到指定工作表
        targetSheet.Activate
        MsgBox "已切換到工作表:" & sheetName
    Else
        MsgBox "找不到名稱為 '" & sheetName & "' 的工作表。"
    End If

也可使用簡化程式,不做判斷工作表是否存在,缺點是當工作表不存在時程式可能會出現錯誤

Sheets("NewSheet").Activate

將下方程式碼複製貼上到自己的巨集中,並將”工作表名稱”修改為自己的工作表名稱,將範圍”A1″修改為欲選取的儲存格位置或範圍

Sheets("工作表名稱").Range("A1").Select

【教學】Excel VBA 如何切換到指定工作表,並選取工作表中的指定儲存格?

發佈留言

發佈留言必須填寫的電子郵件地址不會公開。 必填欄位標示為 *

Scroll to top