如何解决需要选择一系列列中的所有行已占用行和空白行以便稍后进行格式化
我尝试了几种不同的方法,我认为最好使用范围联合或 for 循环。现在我无法让这个工会运作,我也不知道为什么。
我有几列 (D:G) 我正在格式化并且行数每次都在变化,所以这需要是动态的。
我希望能够选择 D:G 中的所有行,包括中间的空白行,直到最后一个被占用的行。
我从尝试选择范围的并集开始。 这是我的代码:
Dim DGunion As Range
Set DGunion = Union((Range("D2",Range("D" & Rows.Count).End(xlUp))),_
(Range("E2",Range("E" & Rows.Count).End(xlUp))),_
(Range("F2",Range("F" & Rows.Count).End(xlUp))),_
(Range("G2",Range("G" & Rows.Count).End(xlUp))))
DGunion.Select
我得到的错误是需要运行时错误 424 对象
解决方法
抛开你不需要 Union
来完成这个任务,你的代码失败的原因是你有太多的括号。
传递给 Union
的每个参数都带有括号。这会使用 ByRef
覆盖默认的 ByVal
行为,因此传递 Union
无法处理的 Value 数组。
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。