小编tra*_*cer的帖子

我一直在尝试使用一些片段来说明如何删除Excel VBA上的整行,但我无法修改它们以包含"IsNumber"验证.

我需要能够选择一个活动区域,例如:

Set r = ActiveSheet.Range("A1:C10")

并且当它经过一行一行(并检查该区域的每个单元格)时,如果单元格上有数字,则删除整行.

例如:

NA NA NA 21
NA 22 NA 44
00 NA NA NA
NA NA NA NA
55 NA NA NA

然后宏将删除所有行,除了第4行

NA NA NA NA

我正在尝试执行以下操作:如果它在第3列中找到字母"A",则将第2列的所有值(与"A"在同一行中)相加,但是,在标题之间是单一范围.

我已经尝试过使用数组和其他类型的函数,但我没有得到任何地方..

棘手的部分是总和必须在找到新标头时重新启动.标题之间没有空隙.

感谢大家!

PS.实际上,没有任何"块"没有"A",就像你在第二个标题下面看到的那样.我已经过滤并删除了那些.