Excel VBA如何通过Master工作表A1值动态引用目标工作表

原有硬编码指定工作表的写法是直接把工作表名称写死在参数里，现在需要从master工作表的A1单元格读取配置的表名，正确的赋值语句如下：

Set targetWS = Worksheets(Worksheets("master").Range("A1").Value)

常见报错排查点 #

• 确认当前工作簿中确实存在名为master的工作表，名称完全匹配，无多余空格、全角半角差异，否则会触发下标越界错误
• 确认master表A1单元格内填写的目标工作表名称和实际工作表名完全一致，可使用Trim()函数去除单元格内容前后可能存在的不可见空格，降低匹配失败概率
• 如果需要避免工作表不存在导致的运行报错，可以增加前置校验逻辑，参考实现：

Dim targetSheetName As String
' 读取配置并去除前后多余空格
targetSheetName = Trim(Worksheets("master").Range("A1").Value)
' 临时屏蔽错误判断工作表是否存在
On Error Resume Next
Set targetWS = Worksheets(targetSheetName)
On Error GoTo 0
' 校验失败提示
If targetWS Is Nothing Then
    MsgBox "配置错误：未找到名称为【" & targetSheetName & "】的工作表，请检查master表A1的配置内容"
    Exit Sub
End If

内容的提问来源于stack exchange，提问作者Bill