excelvba如何查询出每一个工作表内容的最后一行和最后一列位置？

ykcbf1100 · 发表于 2024-6-25 09:38

楼主是想查找有数据的最大行号或列号吗？
不是查找最大已使用行号和列号吧？

louweiming5 · 发表于 2024-6-25 09:55

limonet 发表于 2024-6-25 09:35
关键字：address

感谢大神，解决了我的问题。虽然存在一个瑕疵，即：统计出来的数据对应的表名称不是按工作表本身名称显示的，而是按表的排列顺序显示的。但我还是非常感谢了！

ykcbf1100 · 发表于 2024-6-25 09:56

本帖最后由 ykcbf1100 于 2024-6-25 10:17 编辑

如果是求工作表已使用的最大行号和列号，8楼是正解。
.

louweiming5 · 发表于 2024-6-25 09:57

ykcbf1100 发表于 2024-6-25 09:38
楼主是想查找有数据的最大行号或列号吗？
不是查找最大已使用行号和列号吧？

是查找已使用行的最大行号和列标，谢谢关注。

limonet · 发表于 2024-6-25 10:04

louweiming5 发表于 2024-6-25 09:55
感谢大神，解决了我的问题。虽然存在一个瑕疵，即：统计出来的数据对应的表名称不是按工作表本身名称显示 ...

这是我理解的表6。

杨成云 · 发表于 2024-6-25 10:07

使用了自定义函数。答案供参考。

louweiming5 · 发表于 2024-6-25 10:16

limonet 发表于 2024-6-25 10:04
这是我理解的表6。

如果名称6是表6的话，它的最大行应该是852，而不是847！名称5却是852，大神可以看看。

ykcbf1100 · 发表于 2024-6-25 10:24

louweiming5 发表于 2024-6-25 10:16
如果名称6是表6的话，它的最大行应该是852，而不是847！名称5却是852，大神可以看看。

把Worksheets(i)改成Worksheets(CStr(i))就行了

limonet · 发表于 2024-6-25 10:29

louweiming5 发表于 2024-6-25 10:16
如果名称6是表6的话，它的最大行应该是852，而不是847！名称5却是852，大神可以看看。

是的。我错了。
修正一下代码：Split(Worksheets(CStr(i)).UsedRange.Address(, 0), ":")(1)

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

[求助] excelvba如何查询出每一个工作表内容的最后一行和最后一列位置？