循环并查找2个文本字符串的宏，然后在EXCEL工作表上求和偏移值

Question

这是我在这里的第一篇文章，我在宏中停留以查找两个文本字符串Ex。然后，汽车和船只将C列之间的所有内容相加，冲洗并在同一张纸上重复（循环进行下一次巧合）。

原创

A           B      C
CARS        1
ANYTHING    3 
ANYTHING    2 
BOATS       8 

结果。

A              B      C
CARS           1 ---> 1   
ANYTHING       3 ---> 3
ANYTHING       2 ---> 2
BOATS          8 ---> 8
SUM                  14 <--Calculated/sum
TAX               0.035 <--Fixed
TOTAL           SUM*TAX <--Calculated

对于下一个巧合，我已经使用记录的宏和共享知识努力了几天，但是似乎一切正常，我希望有人可以阐明我的问题，对此我深表感谢。

Answer 1

我不知道您为什么需要VBA。简单的工作表公式已绰绰有余。

'sum in B5
=SUM(INDEX(B:B, MATCH("cars", A:A, 0)):INDEX(B:B, MATCH("boats", A:A, 0)))
'total in B7
=B5*SUM(1, B6)