excel 扩展给定范围的VBA筛选器

5cnsuln7  于 2023-03-09  发布在  其他
关注(0)|答案(1)|浏览(173)

我试图在指定范围内设置一个过滤器,每当有人更改项目编号或大小写时,该过滤器都会应用。但是,我只希望应用B11 - B38范围内的过滤器。每当我尝试运行代码时,它也会应用B40 - BXXXX范围内的过滤器。
有没有人有过类似的经历?
当前代码:

Set Sh = ThisWorkbook.Sheets("Overall")
Sh.Rows("11:39").Ungroup
Sh.AutoFilterMode = False
Sh.Rows("11:39").EntireRow.Hidden = False
Sh.Rows("11:38").Group
Sh.Range("B11:B38").AutoFilter Field:=1, Criteria1:="<>0", Operator:=xlFilterValues, VisibleDropDown:=True

我试过取消分组范围,隐藏和取消隐藏特定的范围等。

jtw3ybtb

jtw3ybtb1#

Excel会自动将指定的范围向下扩展到下一个空行,这就是最初为自动筛选指定的范围(“B11:B38”)似乎无法正常工作的原因。
作为一个简单的解决方法,您可以利用此行为并在第38行之后插入一个空行。如果需要,甚至可以隐藏此行。

相关问题