完善一个查询表

业务员

半百 发表于 2023-3-7 16:04

两个条件如何写呢？比如不包含虎穴，也不包含皮

太极拍天雄

再练习一下，3种情况统计。

业务员

业务员 发表于 2023-3-7 19:49
两个条件如何写呢？比如不包含虎穴，也不包含皮

If InStr(ar(i, 4), "虎穴") = 0 And InStr(ar(i, 4), "皮") = 0 Then

业务员

太极拍天雄 发表于 2023-3-7 21:42
再练习一下，3种情况统计。

这是一个VBA代码块，其作用是遍历Excel表格中的一列数据，查找特定字符串并进行计算。
具体地，它会从第2行开始遍历Excel表格中列"E"，如果遇到包含"总计（包装单位）"的单元格，则将其对应的行号记录为"k2"，并将该行对应的列"G"清零。
接着，如果"k2"不为0（即找到了"总计"所在的行），则从"k1"（即上一个非空单元格所在的行）开始遍历到"k2-1"，将这些行对应的列"G"的值相加，并赋值给"k2"所在行的列"G"。
最后，将"k2"的值重新赋为0，开始下一轮遍历。
需要注意的是，此代码块中的"."指代的是一个Excel应用程序对象，需要在代码中进行声明和初始化。

人工智能的解释。有帮助

业务员

业务员 发表于 2023-3-7 22:08
这是一个VBA代码块，其作用是遍历Excel表格中的一列数据，查找特定字符串并进行计算。
具体地，它会从第 ...

但是不对，计算  重复了