如图,VBA怎么把B列中第一个空值上面的数据赋给Z?

发布网友发布时间：2023-07-04 05:40

共2个回答

热心网友时间：2023-09-29 23:06

65536是office2003版的excel的最大行号，
office2007版以后最大行号已经是100多万行了。
因此不建议再使用65536这个数字来求上界了，
建议直接使用Rows.count来表示最大行号，
这样不管你使用的是2003版还是高版本，Rows.count都适用。
求上界行号可以这么写：
Z = Range("A" & Rows.count).End(3).Row
意思是，把A列最后单元格的上界单元格的行号赋值给变量Z。
你前面说的那个问题，一列数据中间有空单元格，你只想得到第一个空单元格上方的行号，你可以考虑求下界行号，即：
Z = Range("A1").End(4).Row

热心网友时间：2023-09-29 23:06

直接循环从第一行开始往下查找B列的第一个空单元格，然后把空单元格的行号n-1返回就可以了。