如果（excel，vba）某一行有的单元格的值为0，则如何用vba在下面插入一行？

Question

如题所述

Answer 1

1、某一特征的行（至少有一个单元格为0）
对第x行计算
可以用连乘函数product(x:x)

值为0则满足特征条件
2、如果是在上面的基础上进行加一行操作
VBA中是
rows(x+1).insert
+1表示该行之后
如果是某个单元格（假设为C5）值为0时才加一行，
则用以下语句
if [c5]=0 then
rows(6).insert
end if