找到不相交的行VBA结束

时间:2016-09-07 06:29:23

标签: excel vba count cell

这个问题可能已被提出,我在研究中没有发现它。

我有一行数字,在电子表格上以“DC:4”开头。该行的长度可以增加或减少(可能达到“GG:4”)。对于我的宏的给定运行,我希望找到第4行中没有空单元格的数量,因此它可以是2或262。 我可以做类似的事情:

     Sheets("sheet 1").Cells(4, Columns.Count).End(xlToLeft).Column

但是,由于在这一行数字开始之前有106个空白单元格,因此失败了。非常感谢任何帮助。

干杯

2 个答案:

答案 0 :(得分:3)

这可以使用WorksheetFunctions Count和CountA完成。

如果您想要第4行中非空单元格的数量,请使用xml

CountA

如果您希望第4行中仅包含数字的单元格数使用WorksheetFunction.CountA(Rows(4))

Count

答案 1 :(得分:1)

尝试Sheets("sheet 1").UsedRange.Specialcells(xlCellTypeLastCell).Column

这通常会返回正确的列

如果要检查某一行,请按以下方式使用:

Sheets("sheet 1").Rows(4).Entirerow.Specialcells(xlCellTypeLastCell).Column