貌似跟你的表名中刮号有关，换成其他符号试试我试过下划线可以试试表名前后加上单引号，这个试过也行ActiveSheet.Hyperlinks.Add Anchor:=Cells(i, 1), Address:="", SubAddress:="'" & sh.Name & "'" & "!A1" '添加超链接
sh.Name & "!A1" 这是出问题，引用不能用变量。
代码没有问题，我运行了下，很正常啊
