Excel VBA：清除多个工作簿中的动态范围内容

Question

我想请求一些代码清除不同工作簿中范围内容的帮助。

我已经开始使用2本工作簿和2张工作表。当我试图清除第二个工作簿中名为“TEST”的工作表中的某个范围时，我开始陷入困境。如果我把它弄错了，我就可以将其复制到其他范围。

在第二个工作簿（y）中，行数是动态的，标题需要保持不变。

这就是我得到的：

Sub Delinquency3()
Dim x As Workbook
Dim y As Workbook

Set x = Workbooks.Application.ActiveWorkbook
Set y = Workbooks.Open("Z:\Test\List\6. _ Macros\delinquency\Test_delinquent_updated_on_10-13-2014.xlsm")


Application.EnableEvents = False


         With y.Sheets("TEST")
         .Range("B2:L" & Cells(Rows.Count, "A").End(xlUp).Row).ClearContents
         End With

Application.EnableEvents = True

End Sub