查找非空的最后一行

mianhuaqiu · 发表于 2024-9-15 09:08

j55 = Worksheets("总表").Range("F100000").End(xlUp).Row

这个总表的F列是有数据的，一直到200行；

但是用这句代码运行时，老是显示 j55=1，明明应该是200才对，老是显示1；
是不是有BUG

用其他的表，用这个代码就正常。

shiruiqiang · 发表于 2024-9-15 09:09

没附件说个啥

醉眼看尘世 · 发表于 2024-9-15 09:10

j55 = Worksheets("总表").Range(ROWS.COUNT,"f")).End(xlUp).Row

ynzsvt · 发表于 2024-9-15 09:16

应该是f的10万单元格都是有内容的，这样就得到第一行了。
这里的有内容包括公式产生的空白或者复制过来的空白。

mianhuaqiu · 发表于 2024-9-15 09:20

ynzsvt 发表于 2024-9-15 09:16
应该是f的10万单元格都是有内容的，这样就得到第一行了。
这里的有内容包括公式产生的空白或者复制过来的 ...

十分感谢，确实是这个原因。是复制过来的空白。
如果要避免这个问题，找最后一个非空的应该怎么改写啊。

mianhuaqiu · 发表于 2024-9-15 09:21

shiruiqiang 发表于 2024-9-15 09:09
没附件说个啥

文件有加密，发不出去的，见谅~

彼岸归航 · 发表于 2024-9-15 09:32

mianhuaqiu 发表于 2024-9-15 09:20
十分感谢，确实是这个原因。是复制过来的空白。
如果要避免这个问题，找最后一个非空的应该怎么改写啊。

F100000改成F1048576不就行了

mianhuaqiu · 发表于 2024-9-15 09:56

彼岸归航发表于 2024-9-15 09:32
F100000改成F1048576不就行了

哈哈，确实，感谢

ykcbf1100 · 发表于 2024-9-15 17:20

最大非空行号：
r = .UsedRange.Find("*", , -4163, , 1, 2).Row

jaxxcyh · 发表于 2024-9-16 09:13

ykcbf1100 发表于 2024-9-15 17:20
最大非空行号：
r = .UsedRange.Find("*", , -4163, , 1, 2).Row

find几个参数能否解释一下含义？

		自动登录	找回密码
密码			免费注册

[求助] 查找非空的最后一行