vba - 为添加了新行的范围更新高级过滤器
问题描述
我有一个工作表,其中包含单元格 A1 到 J2 中的标准列表。第 1 行是标题。
下面我有一个包含我所有数据项的表格。具有动态行数的单元格 A8 到 J
Sheets("D0022").Range("A8:" & Sheets("D0022").Cells(Rows.Count, "J").End(xlUp).Row).AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:=Sheets("D0022").Range("a1:j2"), Unique:=True
当我运行它时,我得到一个运行时 1004 应用程序定义或对象定义错误
我可以帮助我解释为什么我的 VBA 代码不起作用
解决方案
尝试改变Sheets("D0022").Range("A8:" & Sheets("D0022").Cells(Rows.Count, "J").End(...
和
Sheets("D0022").Range("A8:J" & Sheets("D0022").Cells(Rows.Count, "J").End(...
"A8:J"
而不是"A8:"
.
否则,您不设置范围的列。
Sheets("D0022").Cells(Rows.Count, "J").End(xlUp).Row
仅计算列 J:J 的最后一行...
推荐阅读
- css - 滚动条不再出现
- python - 在不重复字符的情况下优化最长子串的蛮力方法
- html - Boostrap html 表格,添加了很多东西
- javascript - 首选哪种 Javascript 闭包场景?
- c - Gtk3:GMenu/GMenuItem:如何感知是否打开了子菜单?(子菜单的信号)
- flutter - 如何在颤动中为地图标记设置动画?
- python - Python - 删除网表文件中的最后一个字符
- ruby - 系统 Ruby 安装没有 GEM_HOME
- linux - 将 Jmeter(windows) 与 VM (Linux) 连接起来
- xml - 需要 XSLT 将 XML 包装在 CDATA 标记中,而不妨碍具有命名空间的根节点