VBA:将单元格与基于同一行中另一个单元格的数字相乘

希望你能帮助一个新的VBA用户。 我的问题是,我有2列,我不想根据列2中同一行中的另一个单元格中的文本乘以第一列中的单元格的数量。这是相对简单的单行可以通过一个函数来解决:

Function Function_Name(x, y) If y = "text_name" then Function_Name = x * 12 End Function 

但是,例如,当我有10行,我不能使用它。 我曾尝试创build一个循环:

 Function Function_Name(x, y) sumx = 0 For i = x To x If y = "text1" Then sumx = x * 12 If y = "text2" Then sumx = x * 6 sumx = sumx + sumx Next i Function_Name = sumx End Function 

这是不是一个选项来引用任何特定的行或列(例如“B2:B12,C2:C13”),因为它与通缉的地区变化很大。 我想要多行的总和,其中一行中的单元格乘以基于另一个单元格的文本的数字。 我可以创build一个新的列,使用第一个函数并将其拖放到行中,但是有没有更简单的方法来处理循环? 感谢您的阅读,祝您有美好的一天!