2017-06-19 98 views
0
ActiveSheet.Range("$A$1:$V$").Offset(1, 17).SpecialCells(xlCellTypeVisible).EntireRow.Delete 

ActiveSheet.Range("$A$17:$V$110").AutoFilter Field:=4 

看起来有错误。有谁知道这个代码有什么问题?VBA Excel:如何删除已过滤的行排除标题

事实: 我已经编写了代码来过滤想要删除的字词。 所以,第二步是我想删除那些可见的过滤行。 然后清除所有过滤器以呈现所有内容。

回答

2

"$A$1:$V$"不是有效的Excel地址。根据你的第二行,我建议你想要

ActiveSheet.Range("$A$1:$V$110").Offset(1, 17).SpecialCells(xlCellTypeVisible).EntireRow.Delete