【教學】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