急救,关于excel中的sheet为何删除不掉?

Question

...
       '删除多余的sheet
        For Each workSheet As Excel.Worksheet In xlsWorkBook.Worksheets
            If workSheet.Name.Length > 5 Then
                If workSheet.Name.Substring(0, 5) = "Sheet" Then
                    workSheet.Delete()
                End If
            End If
        Next
......
已经跟踪过了.都执行到了,但是结果确没有被删除!
是不是权限问题?该怎么做呢?

Answer 1

只剩下一个工作表的时候 就这样了excel最后一个工作表不能被删除你手动在excel试验一下就知道了