想制作一张表格,实现自动计算方案价格,只需输入A、B、C品牌,任意型号数量,就可以在附表中调用该品牌型号产品价格,并且乘以数量,自动计算总价。如S5单元格要汇总计算:80型号1台,22型号2台,56型号1台,在表二中分别查找对应型号单价,分别乘以数量,在相加汇总到S5单元格。求专家赐教。万分感谢
æ建议å¨æ±æ»è¡¨çæåé¢æ·»å ä¸è¡ï¼æ·»å åçA1ãA2ãA3表示A5对åºåå·å¨ä¸ä¸ªåçä¸çåä»·ï¼å ¬å¼åå«ä¸ºï¼
=VLOOKUP(A$5,åçä»·æ ¼!$A:$D,2,0)
=VLOOKUP(A$5,åçä»·æ ¼!$A:$D,3,0)
=VLOOKUP(A$5,åçä»·æ ¼!$A:$D,4,0)
æ·»å åçæ±æ»è¡¨å¦ä¸å¾ï¼
å ¬å¼å好å³å¦å®æ以åï¼1~3è¡å¯ä»¥éèï¼è¿æ ·ä½ çè¡¨æ ¼çå¤è§ååæ¥å®å ¨ä¸è´äºã
ç±äºæå ¥äº3è¡ï¼ä½ åæ¥éè¦è®¡ç®çS3ãT3ãU3å为äºS6ãT6ãU6ï¼ä»ä»¬çå ¬å¼æ¯ï¼
=SUMPRODUCT($A$1:$R$1,A6:R6)
=SUMPRODUCT($A$2:$R$2,A6:R6)
=SUMPRODUCT($A$3:$R$3,A6:R6)
ä¸æå³å¯ï¼å¦ä¸å¾ï¼
SUMPRODUCT表示两个åæ°åºå对åºä½ç½®çä¹ç§¯æ±åï¼SUMPRODUCT($A$1:$R$1,A6:R6)表示A1*A6+B1*B6+.....+R1*R6
'自定义公式-按ALT+F11-插入-模块-粘贴代码
Function 求和(a As Range, b As Range)
Dim i As Integer
For i = 1 To a.Rows.Count
求和 = 求和 + a.Cells(i, 1) * b.Cells(1, i)
Next
End Function
公式右拉下拉
追问虽然我没有实践操作,但是首先感谢你帮助我,我其实想要的是学习过程,并不是结果,你给的这些函数怪我学识较浅,确实没有看懂,如能给个公式而不是代码,我能理解一些,恳请兄台再助一臂之力
追答用公式不能一次到位,需要辅助表,如阳光上的桥的解答,用vba代码就很方便,而且这个算简单的代码了0.0,如果有兴趣可以研究下。公式确实复杂,不增加辅助表的会会写的很长很长
本回答被网友采纳