高手帮我修改一下

xiawangying

清除（第10张工作表起到最后一张工作表）中的第5行至最后一行内容，代码如下：
Sub 清除内容()
    Dim sht As Worksheet
    For Each sht In Worksheets
        If sht.Index > 9 Then
        sht.Range("a5:j65536").ClearContents
        End If
    Next
End Sub
假设第10张工作表表名为ABC，如果用工作表表名来表示，清除工作表表名为ABC起至最后一张工作表中的第5行至最后一行内容，代码应该怎么写


该贴已经同步到 xiawangying的微博

蓝楹lanying

楼主最好传一个附件