求公式，有点难哦

付春才

求公式，有点麻烦，具体见附件，谢谢

风儿哦

=IF(OR(B3=$H$3,B3=$H$4,B3=$H$5),LOOKUP(C3,$E$14:$E$16,$F$14:$F$16),LOOKUP(C3,$E$5:$E$10,$F$5:$F$10))

付春才

风儿哦 发表于 2018-8-7 17:09
=IF(OR(B3=$H$3,B3=$H$4,B3=$H$5),LOOKUP(C3,$E$14:$E$16,$F$14:$F$16),LOOKUP(C3,$E$5:$E$10,$F$5:$F$10))

谢谢 实用      

任飘渺

=IF(B3={"DC01-WL";"DC03-WL";"DC03-IF"},LOOKUP(C3,{0;1000;1200},{300;100;0}),LOOKUP(C3,{0;1000;1200;1601;1701;1801},{300;100;0;50;80;200}))

jiangxiaoyun

• 
  

C列单元格格式有问题，最后复制--粘贴--值，操作一次。
不然结果可能错误。
这个问题没什么难度。

iwangyi

Sub CC()
For I = 3 To 11
If InStr(Cells(3, 5), Cells(I, 2)) > 0 Then
  For J = 5 To 10
   If Cells(I, 3) <= Cells(J, 5) Then Cells(I, 4) = Cells(J - 1, 6): GoTo 100
  Next
100:
  Else
  For K = 14 To 16
  If Cells(I, 3) <= Cells(14, 5) Then Cells(I, 4) = Cells(K - 1, 6): GoTo 200
  Next
200:
End If
Next
End Sub

iwangyi

更正由于没有自清  楼主的条件(不包括DC01-WL，DC03-WL，DC03-IF)     不包括三个字，为此改正如下：
Sub CC()
For I = 3 To 11
If InStr(Cells(12, 5), Cells(I, 2)) > 0 Then
  For J = 14 To 16
   If Cells(I, 3) <= Cells(J, 5) Then Cells(I, 4) = Cells(J - 1, 6): GoTo 100
  Next
100:
  Else
  For K = 5 To 10
  If Cells(I, 3) <= Cells(K, 5) Then Cells(I, 4) = Cells(K - 1, 6): GoTo 200
  Next
200:
End If
Next
End Sub

iwangyi

上附件********

iwangyi

此种类型问题在定制选材报价中遇到较多，选择加工工艺，选择加工材料选择越灵活，计算越复杂，但要求出结果又要快以便选择方案与决定结果。为此楼主的问题是一个比较切合实际的好问题。

付春才

iwangyi 发表于 2018-8-7 18:43
此种类型问题在定制选材报价中遇到较多，选择加工工艺，选择加工材料选择越灵活，计算越复杂，但要求出结果 ...

这就是工作实际中遇到的问题，谢谢了