Question

Excel 求教各位，为什么此代码老是提示下标越界

Answer 1

要看哪个语句越界的，一般这样的语句容易造成越界：
Set sht = Worksheets("成绩表")

如果没有【成绩表】这个工作表就会越界。

你在越界的时候，点调试，就会在错误的语句上显示黄色
看看sht.Cells(i, "A").Value的值是什么，如果是数字，那么就是个数超过了工作表的数量，如果是文本，就是这个名字的工作表不存在。