Excel vba清除定期更改的一系列数据

我想在excel中创build一个简单的vba函数，通过查找最后一个使用的行并将其设置为范围的末尾来清除从A列到K行以及从第6行到数据底部的一系列数据。 这是我没有工作的代码：

Sub clearNameData() Dim destSheet As Worksheet: Set destSheet = ThisWorkbook.Worksheets("Name Search") lMaxRows = destSheet.Cells(destSheet.Rows.Count, "A").End(xlUp).Row destSheet.range("A6:K & lMaxRows").ClearContents End Sub 

当我运行这个代码时，它给了我错误“运行时错误'1004'：'method''object'

我无法弄清楚如何得到即时尝试工作，尽pipe我的范围定义的每个语法组合。 任何帮助将不胜感激！

Answer 1

根据OP的要求，我正在将我的评论转到答案。

这个问题是在线上

 destSheet.range("A6:K & lMaxRows").ClearContents 

它需要更改为：

 destSheet.range("A6:K" & lMaxRows).ClearContents 

请注意，结尾的引号移动。 假设lMaxRows是500，这使得范围参数“A6：K500”，然后VBA可以评估为一个范围对象。 之前，这是stringA6：KlMaxRows，VBA 无法评估范围对象，因为variables是string的一部分。