下面的代码产生错误“运行时错误'1004':对象'_Worksheet'的方法'范围'失败”,如果引用的工作表未激活。但是,如果我有工作表并运行代码,我相信有问题的工作表已正确设置为代码参考的对象,并且我尝试了几种针对它的设置。
Private Sub clearImport()
Dim Ws As Worksheet
Set Ws = ThisWorkbook.Sheets("Returned")
k = Ws.Range("P65536").End(xlUp).Offset(1).Row
Ws.Range(Cells(2, 1), Cells(k, 23)).Delete
End Sub